diff --git a/tests/cross-phase-persist.rkt b/tests/cross-phase-persist.rkt new file mode 100644 index 0000000..9449d57 --- /dev/null +++ b/tests/cross-phase-persist.rkt @@ -0,0 +1,2 @@ +(module cross-phase-persist '#%kernel + (#%declare #:cross-phase-persistent)) diff --git a/tests/test-cross-phase-persist.rkt b/tests/test-cross-phase-persist.rkt new file mode 100644 index 0000000..c6f8035 --- /dev/null +++ b/tests/test-cross-phase-persist.rkt @@ -0,0 +1,6 @@ +#lang racket +(require cover rackunit racket/runtime-path) +(define-runtime-path file "cross-phase-persist.rkt") +(parameterize ([current-cover-environment (make-cover-environment)]) + (test-files! file) + (check-equal? (get-test-coverage) (hash)))