Remove debugging output from test case in typed-racket-test/succeed/define-typed-untyped-identifier-syntax-properties.rkt

This commit is contained in:
Georges Dupéron 2016-04-07 16:47:17 +02:00 committed by Sam Tobin-Hochstadt
parent 2fc669e136
commit e33c902842

View File

@ -12,12 +12,10 @@
(for-syntax syntax/strip-context))
(define-require-syntax (typed/untyped-typed stx)
(displayln 'typed)
(syntax-case stx ()
[(_ m s) (replace-context stx #'(submod m s typed))]))
(define-require-syntax (typed/untyped-untyped stx)
(displayln 'untyped)
(syntax-case stx ()
[(_ m s) (replace-context stx #'(submod m s untyped))]))