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

Remove output redirection.

Browse Source 
svn: r11849
This commit is contained in:
Sam Tobin-Hochstadt 2008-09-24 14:02:20 +00:00
parent 6d93ceb809
commit 81b9f63852
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/tests/typed-scheme/main.ss
View File

@ -55,8 +55,7 @@
(parameterize ([read-accept-reader #t] (parameterize ([read-accept-reader #t]
[current-load-relative-directory path] [current-load-relative-directory path]
[current-directory path]) [current-directory path])
(with-output-to-file "/dev/null" #:exists 'append (loader p)))))))
(lambda () (loader p)))))))))
(apply test-suite dir (apply test-suite dir
tests))) tests)))