From 574da98a871eb75d1cb81b43cbf348e0647c2cd5 Mon Sep 17 00:00:00 2001
From: Eric Dobson <eric.n.dobson@gmail.com>
Date: Sat, 20 Jul 2013 08:49:07 -0700
Subject: [PATCH] Make breaks actually break out of running all the TR tests.

original commit: e75f3dea7af767314c2b2b137d1fad026d476721
---
 .../typed-racket-tests/tests/typed-racket/main.rkt            | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/pkgs/typed-racket-pkgs/typed-racket-tests/tests/typed-racket/main.rkt b/pkgs/typed-racket-pkgs/typed-racket-tests/tests/typed-racket/main.rkt
index 906ead4d..f8ab1906 100644
--- a/pkgs/typed-racket-pkgs/typed-racket-tests/tests/typed-racket/main.rkt
+++ b/pkgs/typed-racket-pkgs/typed-racket-tests/tests/typed-racket/main.rkt
@@ -4,6 +4,7 @@
          mzlib/etc racket/port
          compiler/compiler racket/promise
          racket/match mzlib/compile
+         racket/promise
          "unit-tests/all-tests.rkt"
          "unit-tests/test-utils.rkt"
          "optimizer/run.rkt"
@@ -146,7 +147,8 @@
 
 
 (define (go tests) (test/gui tests))
-(define (go/text tests) (run-tests tests 'verbose))
+(define (go/text tests)
+  (force (delay/thread (run-tests tests 'verbose))))
 
 (provide go go/text just-one places start-workers
          verbose?