flush output ports to avoid confusing tests output
svn: r12201
This commit is contained in:
parent
cc02b65628
commit
e2ac0f673b
|
@ -50,6 +50,8 @@
|
|||
(define name (cadr t))
|
||||
(define stderr (current-error-port))
|
||||
(define (echo fmt . args)
|
||||
(flush (current-output-port))
|
||||
(flush (current-error-port))
|
||||
(fprintf stderr ">>> ~a: ~a\n" name (apply format fmt args)))
|
||||
(newline stderr)
|
||||
(echo "running...")
|
||||
|
|
Loading…
Reference in New Issue
Block a user