diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-11-15 01:02:53 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-11-15 01:02:53 -0800 |
commit | 687dd3f5da63bee9dd310bc4ac2844ece43e3fba (patch) | |
tree | 3e57d03f17a59c97a9ba10b15ee87084eced66e1 /edit | |
parent | ef96f57ce264c8e0bd98f6e8622d1c1e2eceafb2 (diff) | |
download | mu-687dd3f5da63bee9dd310bc4ac2844ece43e3fba.tar.gz |
2442
Fix the drawback in the previous commit: if an ingredient is just a literal 0 we'll skip its type-checking and hope to map type ingredients elsewhere.
Diffstat (limited to 'edit')
-rw-r--r-- | edit/001-editor.mu | 3 | ||||
-rw-r--r-- | edit/005-sandbox.mu | 3 |
2 files changed, 2 insertions, 4 deletions
diff --git a/edit/001-editor.mu b/edit/001-editor.mu index 97953274..4b8da7a8 100644 --- a/edit/001-editor.mu +++ b/edit/001-editor.mu @@ -64,8 +64,7 @@ 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 <- copy 0 - *init <- push-duplex 167/§, *init + *init <- push-duplex 167/§, 0/tail 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 53e42701..358d148c 100644 --- a/edit/005-sandbox.mu +++ b/edit/005-sandbox.mu @@ -151,8 +151,7 @@ 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 <- copy 0 - *init <- push-duplex 167/§, *init + *init <- push-duplex 167/§, 0/tail top-of-screen:address:address:duplex-list:character <- get-address *current-sandbox, top-of-screen:offset *top-of-screen <- copy *init } |