From 1eac9e9281e7582e5995c14bc0003b551e28c85b Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Tue, 1 Mar 2022 12:22:04 -0600 Subject: added sleep to output fetchign loop --- src/lib.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/lib.lisp') diff --git a/src/lib.lisp b/src/lib.lisp index 9253484..89ac890 100644 --- a/src/lib.lisp +++ b/src/lib.lisp @@ -622,5 +622,6 @@ printed to OUTPUT-STREAM. " (listen shell-output))) (loop while (listen shell-output) do (princ (read-line shell-output) output-stream) - (terpri output-stream)))))) + (terpri output-stream) + (sleep 0.005)))))) -- cgit v1.2.3