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

2016-04-07 12:17:54 +02:00
1 changed files with 0 additions and 2 deletions
--- a/typed-racket-test/succeed/define-typed-untyped-identifier-syntax-properties.rkt
+++ b/typed-racket-test/succeed/define-typed-untyped-identifier-syntax-properties.rkt
@ -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))]))