about summary refs log tree commit diff stats
path: root/shell/global.mu
diff options
context:
space:
mode:
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"
 }