We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
inverted-unless
1 parent 32d2a82 commit eb5463dCopy full SHA for eb5463d
typed-racket-lib/typed-racket/private/with-types.rkt
@@ -50,7 +50,7 @@
50
(define (with-type-helper stx body fvids fvtys exids extys resty expr? ctx te-mode)
51
(define old-context (unbox typed-context?))
52
(define old-te-mode (unbox type-enforcement-mode))
53
- (unless (not old-context)
+ (when old-context
54
(tc-error/stx stx (format "with-type cannot be used in a typed module. ~a " old-context)))
55
(set-box! typed-context? #t)
56
(set-box! type-enforcement-mode te-mode)
0 commit comments