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."))