diff options
Diffstat (limited to 'module/system/repl/repl.scm')
-rw-r--r-- | module/system/repl/repl.scm | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/module/system/repl/repl.scm b/module/system/repl/repl.scm index fc525b547..1c3407159 100644 --- a/module/system/repl/repl.scm +++ b/module/system/repl/repl.scm @@ -92,13 +92,6 @@ *unspecified*) (else ((language-reader lang) port env)))))))) -(define (flush-all-input) - (if (and (char-ready?) - (not (eof-object? (peek-char)))) - (begin - (read-char) - (flush-all-input)))) - ;; repl-reader is a function defined in boot-9.scm, and is replaced by ;; something else if readline has been activated. much of this hoopla is ;; to be able to re-use the existing readline machinery. |