update repl

2015-05-29 20:43:05 +09:00 · 2015-05-29 20:43:05 +09:00 · ab9c33fc22
parent cd4b1be54c
commit ab9c33fc22
1 changed files with 3 additions and 1 deletions
--- a/contrib/20.repl/repl.scm
+++ b/contrib/20.repl/repl.scm
@ -11,7 +11,9 @@
   (else
    (begin
      (define (readline str)
-        (if (tty?) (display str))
+        (when (tty?)
+          (display str)
+          (flush-output-port))
        (read-line))
      (define (add-history str)
        #f))))