about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-06-03 09:57:40 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-06-03 09:57:40 -0700
commitee0ec58c89508444b280a247a03195114197998a (patch)
tree78db8c5584d04bc65148960ac7d4def5f9a00a3e
parent12c3ee1e4576f13808e962b2f818fb5d61466e9d (diff)
downloadmu-ee0ec58c89508444b280a247a03195114197998a.tar.gz
1521
-rw-r--r--repl.mu13
1 files changed, 0 insertions, 13 deletions
diff --git a/repl.mu b/repl.mu
index 5bbba673..cae95386 100644
--- a/repl.mu
+++ b/repl.mu
@@ -8,28 +8,15 @@ recipe main [
   0:literal/real-screen <- print-string 0:literal/real-screen, msg:address:array:character
   {
     inst:address:array:character, 0:literal/real-keyboard, 0:literal/real-screen <- read-instruction 0:literal/real-keyboard, 0:literal/real-screen
-#?     $print [ccc: ], inst:address:array:character #? 1
-#?     move-cursor-down-on-display #? 1
     break-unless inst:address:array:character
-#?     0:literal/real-screen <- print-string 0:literal/real-screen, inst:address:array:character
     run-interactive inst:address:array:character
-#?     print-character-to-display 97:literal/a
-#?     print-character-to-display 97:literal/a
-#?     print-character-to-display 97:literal/a
-#?     print-character-to-display 10:literal/newline
     # assume run-interactive printed on the current line
-#?     $print [a7] #? 1
     move-cursor-down-on-display
-#?     move-cursor-down-on-display #? 1
-#?     move-cursor-down-on-display #? 1
-#?     move-cursor-down-on-display #? 1
-#?     move-cursor-down-on-display #? 1
     clear-line-on-display  # just to refresh the screen
     loop
   }
 #?   wait-for-key-from-keyboard #? 1
   return-to-console
-#?   $print [aaaa] #? 1
 ]
 
 # basic keyboard input; just text and enter