remove debug printf

svn: r14578 original commit: 1edd4770f4f73daf82601a20d9e4c44854fee261
2009-04-21 17:43:33 +00:00 · 2009-04-21 17:43:33 +00:00 · 4d2d5bfc9f
commit 4d2d5bfc9f
parent a5c24172b8
1 changed files with 0 additions and 1 deletions
--- a/collects/typed-scheme/typecheck/tc-app-unit.ss
+++ b/collects/typed-scheme/typecheck/tc-app-unit.ss
@ -816,7 +816,6 @@
                 (or 
                  (type-annotation f #:infer #t)
                  (generalize (tc-expr/t ac))))])
-       (printf "case 2 ~a~n" ts)
       (tc/rec-lambda/check form args body lp ts expected)
       (ret expected))]))