From 7b2de5373380a0bc833215dd9d3beed87fa686c3 Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Tue, 1 Jun 2010 16:30:04 -0400 Subject: [PATCH] Re-enable the printer here. --- collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt b/collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt index 3ab510d654..25a881d3c8 100644 --- a/collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt +++ b/collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt @@ -62,6 +62,7 @@ [(_ e) #`(parameterize ([delay-errors? #f] [current-namespace (namespace-anchor->namespace anch)] + [custom-printer #t] [orig-module-stx (quote-syntax e)]) (let ([ex (expand 'e)]) (parameterize ([mutated-vars (find-mutated-vars ex)]) @@ -72,6 +73,7 @@ [(_ e) #`(parameterize ([delay-errors? #f] [current-namespace (namespace-anchor->namespace anch)] + [custom-printer #t] [orig-module-stx (quote-syntax e)]) (let ([ex (expand 'e)]) (parameterize ([mutated-vars (find-mutated-vars ex)])