From 97dd2c654f727f38ca5d15798540286913988662 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Mon, 12 Jan 2015 00:06:14 -0800 Subject: 543 --- stdin.mu | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/stdin.mu b/stdin.mu index 8d71738c..b1905d2b 100644 --- a/stdin.mu +++ b/stdin.mu @@ -8,7 +8,7 @@ ;? (print-primitive stdin:channel-address) ;? (print-primitive (("\n" literal))) (fork-helper send-keys-to-stdin:fn nil:literal/globals nil:literal/limit stdin:channel-address) - ; now read characters from stdin + ; now read characters from stdin until a 'q' is typed (print-primitive (("? " literal))) { begin (x:tagged-value stdin:channel-address/deref <- read stdin:channel-address) -- cgit 1.4.1-2-gfad0