suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Preserve thread values.

Browse Source 
This avoid problems with tests that are broken by changing environment,
like the TR tests that implicitly rely on a specific printer.
This commit is contained in:
Eli Barzilay 2011-09-08 20:58:39 -04:00
parent 29019a42ae
commit 26857abe43
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/tests/run-automated-tests.rkt
View File

@ -54,6 +54,7 @@
#:load? [load? #f] #:handler? [handler? #t]
#:timeout [timeout 10] ; in minutes
#:additional-modules [additional-modules '()])
(define gloabl-state (current-preserved-thread-cell-values))
(define stderr (current-error-port))
(define (echo fmt . args)
(flush-output (current-output-port))
@ -92,7 +93,8 @@
(thunk))
(thunk)))
(kill-thread timeout-thread)
(echo "no failures."))))
(echo "no failures.")))
(current-preserved-thread-cell-values gloabl-state))
(all-tests)