From c1cf821bd9bf26c3c7913e4449842f97411ab4e6 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Fri, 31 Oct 2008 19:50:22 +0000 Subject: [PATCH] stupid typo svn: r12204 --- collects/tests/run-automated-tests.ss | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/tests/run-automated-tests.ss b/collects/tests/run-automated-tests.ss index 6419c52bb6..5951f75c55 100755 --- a/collects/tests/run-automated-tests.ss +++ b/collects/tests/run-automated-tests.ss @@ -50,8 +50,8 @@ (define name (cadr t)) (define stderr (current-error-port)) (define (echo fmt . args) - (flush (current-output-port)) - (flush (current-error-port)) + (flush-output (current-output-port)) + (flush-output (current-error-port)) (fprintf stderr ">>> ~a: ~a\n" name (apply format fmt args))) (newline stderr) (echo "running...")