From e94b7c2f70d3000cade4a962a1974a747dbfdc39 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Fri, 24 Oct 2008 19:50:24 +0000 Subject: [PATCH] TS tests now work, and are not noisy when succeeding svn: r12119 original commit: 0ccbac0647a6a0dd129d9b7531514cfdca24d58d --- collects/tests/typed-scheme/run.ss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/tests/typed-scheme/run.ss b/collects/tests/typed-scheme/run.ss index d892dd34..af3dda3b 100644 --- a/collects/tests/typed-scheme/run.ss +++ b/collects/tests/typed-scheme/run.ss @@ -2,5 +2,6 @@ (require "main.ss") (current-namespace (make-base-namespace)) -(unless (= 0 (go/text)) +(unless (= 0 (parameterize ([error-display-handler void]) + (go/text))) (error "Typed Scheme Tests did not pass."))