about summary refs log tree commit diff stats
path: root/shell/print.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2021-07-25 16:15:20 -0700
committerKartik K. Agaram <vc@akkartik.com>2021-07-25 16:24:45 -0700
commitff24d7b8104338f386f78be6cbca7fd39cd9e045 (patch)
treeafdc08ae2469c4def159f417216d4f1548fe5a7c /shell/print.mu
parent251f317c387c5bd6c938cff3e6af4be63f42eb4f (diff)
downloadmu-ff24d7b8104338f386f78be6cbca7fd39cd9e045.tar.gz
.
Diffstat (limited to 'shell/print.mu')
-rw-r--r--shell/print.mu10
1 files changed, 5 insertions, 5 deletions
diff --git a/shell/print.mu b/shell/print.mu
index 0469c002..65e387a7 100644
--- a/shell/print.mu
+++ b/shell/print.mu
@@ -68,7 +68,7 @@ fn print-cell _in: (addr handle cell), out: (addr stream byte), trace: (addr tra
   compare *in-type, 4/primitive
   {
     break-if-!=
-    var overflow?/eax: boolean <- try-write out, "[primitive]"
+    var overflow?/eax: boolean <- try-write out, "{primitive}"
     compare overflow?, 0/false
     {
       break-if-=
@@ -89,12 +89,12 @@ fn print-cell _in: (addr handle cell), out: (addr stream byte), trace: (addr tra
       error trace, "print-cell: no space for screen"
       return
     }
-    write out, "[screen "
+    write out, "{screen "
     var screen-ah/eax: (addr handle screen) <- get in-addr, screen-data
     var screen/eax: (addr screen) <- lookup *screen-ah
     var screen-addr/eax: int <- copy screen
     write-int32-hex out, screen-addr
-    write out, "]"
+    write out, "}"
     trace-higher trace
     return
   }
@@ -109,12 +109,12 @@ fn print-cell _in: (addr handle cell), out: (addr stream byte), trace: (addr tra
       error trace, "print-cell: no space for keyboard"
       return
     }
-    write out, "[keyboard "
+    write out, "{keyboard "
     var keyboard-ah/eax: (addr handle gap-buffer) <- get in-addr, keyboard-data
     var keyboard/eax: (addr gap-buffer) <- lookup *keyboard-ah
     var keyboard-addr/eax: int <- copy keyboard
     write-int32-hex out, keyboard-addr
-    write out, "]"
+    write out, "}"
     trace-higher trace
     return
   }