diff --git a/typed-racket-lib/typed-racket/base-env/prims-contract.rkt b/typed-racket-lib/typed-racket/base-env/prims-contract.rkt index 739f9408..2a525186 100644 --- a/typed-racket-lib/typed-racket/base-env/prims-contract.rkt +++ b/typed-racket-lib/typed-racket/base-env/prims-contract.rkt @@ -140,7 +140,7 @@ (define ((r/t-maker legacy) stx) - (unless (unbox typed-context?) + (unless (or (unbox typed-context?) (eq? (syntax-local-context) 'module-begin)) (raise-syntax-error #f "only allowed in a typed module" stx)) (syntax-parse stx [(_ lib:expr (~var c (clause legacy #'lib)) ...)