From 4d2d5bfc9fe69c51cd687f69a3e59552c7edf388 Mon Sep 17 00:00:00 2001
From: Sam Tobin-Hochstadt <samth@racket-lang.org>
Date: Tue, 21 Apr 2009 17:43:33 +0000
Subject: [PATCH] remove debug printf

svn: r14578

original commit: 1edd4770f4f73daf82601a20d9e4c44854fee261
---
 collects/typed-scheme/typecheck/tc-app-unit.ss | 1 -
 1 file changed, 1 deletion(-)

diff --git a/collects/typed-scheme/typecheck/tc-app-unit.ss b/collects/typed-scheme/typecheck/tc-app-unit.ss
index 698e3c9c..e0a64c4c 100644
--- 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))]))