new macro: with

1 files changed, 2 insertions, 1 deletions

diff --git a/shell/primitives.mu b/shell/primitives.mu
index 3ea943a5..1b25583c 100644
--- a/shell/primitives.mu
+++ b/shell/primitives.mu
@@ -14,6 +14,7 @@ fn initialize-primitives _self: (addr global-table) {
   append-primitive self, "<="
   append-primitive self, ">="
   # generic
+  append-primitive self, "apply"
   append-primitive self, "="
   append-primitive self, "no"
   append-primitive self, "not"
@@ -104,7 +105,7 @@ fn render-primitives screen: (addr screen), xmin: int, xmax: int, ymax: int {
   tmpx <- draw-text-rightward screen, ": stream grapheme -> stream", tmpx, xmax, y, 7/fg=grey, 0xdc/bg=green-bg
   y <- increment
   var tmpx/eax: int <- copy xmin
-  tmpx <- draw-text-rightward screen, "fn set if while cons car cdr no not and or = ", tmpx, xmax, y, 0x2a/fg=orange, 0xdc/bg=green-bg
+  tmpx <- draw-text-rightward screen, "fn apply set if while cons car cdr no not and or = ", tmpx, xmax, y, 0x2a/fg=orange, 0xdc/bg=green-bg
   # numbers
   tmpx <- draw-text-rightward screen, "< > <= >= + - * / % sqrt abs sgn", tmpx, xmax, y, 0x2a/fg=orange, 0xdc/bg=green-bg
 }