about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-01-11 22:57:04 -0800
committerKartik K. Agaram <vc@akkartik.com>2015-01-11 22:57:04 -0800
commit491f9d7eb21861707c2d6ede22a1f3176e205cfa (patch)
treeaa3c49d8d9eacaaa2aaa01e2d70eadd321b9af7a
parentbfdfcf74260485a8ce85a6522583dce948f28c60 (diff)
downloadmu-491f9d7eb21861707c2d6ede22a1f3176e205cfa.tar.gz
537
-rw-r--r--mu.arc5
1 files changed, 0 insertions, 5 deletions
diff --git a/mu.arc b/mu.arc
index 81f07f2c..a06f90eb 100644
--- a/mu.arc
+++ b/mu.arc
@@ -1869,13 +1869,8 @@
   { begin
     (c:character <- read-key)
     (loop-unless c:character)
-;?     (print-primitive (("AAA " literal)))
-;?     (print-primitive c:character)
     (curr:tagged-value <- save-type c:character)
     (stdin:channel-address/deref <- write stdin:channel-address curr:tagged-value)
-;?     (print-primitive (("keyboard: stdin is " literal)))
-;?     (print-primitive stdin:channel-address)
-;?     (print-primitive (("\n" literal)))
     (loop)
   }
 )