about summary refs log tree commit diff stats
path: root/edit
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-11-15 00:37:29 -0800
committerKartik K. Agaram <vc@akkartik.com>2015-11-15 00:37:29 -0800
commitef96f57ce264c8e0bd98f6e8622d1c1e2eceafb2 (patch)
treef2113d385fde9c4b9579521402eab5ec9c1f208d /edit
parent7ecb3374340c02cc2c54abf4a5d4a617f362b4c4 (diff)
downloadmu-ef96f57ce264c8e0bd98f6e8622d1c1e2eceafb2.tar.gz
2441 - never miss any specializations
I was failing to specialize calls containing literals. And then I had to
deal with whether literals should map to numbers or characters. (Answer:
both.)

One of the issues that still remains: shape-shifting recipes can't be
called with literals for addresses, even if it's 0.
Diffstat (limited to 'edit')
-rw-r--r--edit/001-editor.mu3
-rw-r--r--edit/005-sandbox.mu3
2 files changed, 4 insertions, 2 deletions
diff --git a/edit/001-editor.mu b/edit/001-editor.mu
index 4b8da7a8..97953274 100644
--- a/edit/001-editor.mu
+++ b/edit/001-editor.mu
@@ -64,7 +64,8 @@ recipe new-editor s:address:array:character, screen:address:screen, left:number,
   x <- get-address *result, cursor-column:offset
   *x <- copy left
   init:address:address:duplex-list:character <- get-address *result, data:offset
-  *init <- push-duplex 167/§, 0/tail
+  *init <- copy 0
+  *init <- push-duplex 167/§, *init
   top-of-screen:address:address:duplex-list:character <- get-address *result, top-of-screen:offset
   *top-of-screen <- copy *init
   y:address:address:duplex-list:character <- get-address *result, before-cursor:offset
diff --git a/edit/005-sandbox.mu b/edit/005-sandbox.mu
index 358d148c..53e42701 100644
--- a/edit/005-sandbox.mu
+++ b/edit/005-sandbox.mu
@@ -151,7 +151,8 @@ recipe run-sandboxes env:address:programming-environment-data, screen:address:sc
     *dest <- copy new-sandbox
     # clear sandbox editor
     init:address:address:duplex-list:character <- get-address *current-sandbox, data:offset
-    *init <- push-duplex 167/§, 0/tail
+    *init <- copy 0
+    *init <- push-duplex 167/§, *init
     top-of-screen:address:address:duplex-list:character <- get-address *current-sandbox, top-of-screen:offset
     *top-of-screen <- copy *init
   }