about summary refs log tree commit diff stats
path: root/shell/global.mu
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2021-04-10 22:38:02 -0700
committerKartik K. Agaram <vc@akkartik.com>2021-04-10 22:38:02 -0700
commitf38c2a1502648b0be16fc2e984420886cf64cdee (patch)
treec6ffcfa28c1eb7743f8099e90b1eb2f9375ece99 /shell/global.mu
parent1afc02113ae7a088bf1a02ef423fcd875292c6c2 (diff)
downloadmu-f38c2a1502648b0be16fc2e984420886cf64cdee.tar.gz
.
Diffstat (limited to 'shell/global.mu')
-rw-r--r--shell/global.mu7
1 files changed, 6 insertions, 1 deletions
diff --git a/shell/global.mu b/shell/global.mu
index 22b38764..1c0dd506 100644
--- a/shell/global.mu
+++ b/shell/global.mu
@@ -12,16 +12,21 @@ fn initialize-globals _self: (addr global-table) {
   var self/esi: (addr global-table) <- copy _self
   var data-ah/eax: (addr handle array global) <- get self, data
   populate data-ah, 0x10
+  # generic
+  append-primitive self, "="
+  # for numbers
   append-primitive self, "+"
   append-primitive self, "-"
   append-primitive self, "*"
   append-primitive self, "/"
   append-primitive self, "sqrt"
+  # for pairs
   append-primitive self, "car"
   append-primitive self, "cdr"
   append-primitive self, "cons"
-  append-primitive self, "="
+  # for screens
   append-primitive self, "print"
+  # for keyboards
   append-primitive self, "key"
 }