test2.rkt (283B)
1 #lang racket 2 (require remember) 3 (remember-io-file "io2.rkt") 4 (begin-for-syntax 5 (require rackunit) 6 ;; Manually check for an error the first time this 7 ;; file is compiled after emptying io2.rkt 8 (check-true (remembered? 'bar '(1 2 3 xyz))) 9 (remember-write! 'bar '(1 2 3 xyz)))