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

flush output ports to avoid confusing tests output

Browse Source 
svn: r12201
This commit is contained in:
Eli Barzilay 2008-10-31 15:30:28 +00:00
parent cc02b65628
commit e2ac0f673b
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/tests/run-automated-tests.ss
View File

@ -50,6 +50,8 @@
(define name (cadr t)) (define name (cadr t))
(define stderr (current-error-port)) (define stderr (current-error-port))
(define (echo fmt . args) (define (echo fmt . args)
(flush (current-output-port))
(flush (current-error-port))
(fprintf stderr ">>> ~a: ~a\n" name (apply format fmt args))) (fprintf stderr ">>> ~a: ~a\n" name (apply format fmt args)))
(newline stderr) (newline stderr)
(echo "running...") (echo "running...")