diff options
Diffstat (limited to 'shell/global.mu')
-rw-r--r-- | shell/global.mu | 7 |
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" } |