diff options
Diffstat (limited to 'src/interp/parsing.lisp')
| -rw-r--r-- | src/interp/parsing.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/parsing.lisp b/src/interp/parsing.lisp index 5f52da48..66b4598e 100644 --- a/src/interp/parsing.lisp +++ b/src/interp/parsing.lisp @@ -86,7 +86,7 @@ :adjustable t :initial-contents s)))) (defun get-a-line (stream) - (if (and (IS-CONSOLE stream) (not |$leanMode|)) + (if (and (|ioTerminal?| stream) (not |$leanMode|)) (|printPrompt|)) (let ((ll (read-a-line stream))) (if (stringp ll) (make-string-adjustable ll) ll))) |