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 12:17:54 +02:00
parent 2fc669e136
commit 579c68daa2

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))]))