about summary refs log tree commit diff stats
path: root/apps/tile/environment.mu
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-10-11 22:11:03 -0700
committerKartik Agaram <vc@akkartik.com>2020-10-11 22:11:03 -0700
commit31a1ade9a2c86141b78ffd8415c4d64aaebecb5c (patch)
tree6ff62a7660e4b61649f674697dd677740626e770 /apps/tile/environment.mu
parent9cbb6dce5400aa2218daa6408f544d99fde6c614 (diff)
downloadmu-31a1ade9a2c86141b78ffd8415c4d64aaebecb5c.tar.gz
7003
Diffstat (limited to 'apps/tile/environment.mu')
-rw-r--r--apps/tile/environment.mu8
1 files changed, 4 insertions, 4 deletions
diff --git a/apps/tile/environment.mu b/apps/tile/environment.mu
index 643cd13f..2850f394 100644
--- a/apps/tile/environment.mu
+++ b/apps/tile/environment.mu
@@ -260,14 +260,14 @@ $process:body: {
     compare key, 0xe  # 14 = ctrl-n
     $process:next-word: {
       break-if-!=
-      print-string 0, "AA\n"
+#?       print-string 0, "AA\n"
       # jump to previous word at same level
       var next-word-ah/edx: (addr handle word) <- get cursor-word, next
       var next-word/eax: (addr word) <- lookup *next-word-ah
       {
         compare next-word, 0
         break-if-=
-        print-string 0, "BB\n"
+#?         print-string 0, "BB\n"
         copy-object next-word-ah, cursor-word-ah
         cursor-to-end next-word
         var cursor-call-path/eax: (addr handle call-path-element) <- get sandbox, cursor-call-path
@@ -275,14 +275,14 @@ $process:body: {
         break $process:body
       }
       # if next word doesn't exist, try to bump up one level
-      print-string 0, "CC\n"
+#?       print-string 0, "CC\n"
       var cursor-call-path-ah/edi: (addr handle call-path-element) <- get sandbox, cursor-call-path
       var cursor-call-path/eax: (addr call-path-element) <- lookup *cursor-call-path-ah
       var caller-cursor-element-ah/ecx: (addr handle call-path-element) <- get cursor-call-path, next
       var caller-cursor-element/eax: (addr call-path-element) <- lookup *caller-cursor-element-ah
       compare caller-cursor-element, 0
       break-if-=
-      print-string 0, "DD\n"
+#?       print-string 0, "DD\n"
       copy-object caller-cursor-element-ah, cursor-call-path-ah
       break $process:body
     }