update repl

2015-05-29 20:43:05 +09:00
parent cd4b1be54c
commit ab9c33fc22
1 changed files with 3 additions and 1 deletions
@@ -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))))