about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-07-11 00:05:56 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-07-11 00:05:56 -0700
commit8d7af1ab94cee5d3fd4d4188a6de50426dc55c9b (patch)
tree041ed4e4cb7450110d0075882d8eac57dce7d9fa
parentda75cfb193197e0edc3434ca3d55a560a1931d26 (diff)
downloadmu-8d7af1ab94cee5d3fd4d4188a6de50426dc55c9b.tar.gz
1756
-rw-r--r--edit.mu26
1 files changed, 19 insertions, 7 deletions
diff --git a/edit.mu b/edit.mu
index 469e61f8..dbdd2c58 100644
--- a/edit.mu
+++ b/edit.mu
@@ -831,6 +831,24 @@ recipe render-all [
   right:number <- get current-sandbox:address:editor-data/deref, right:offset
   row:number, screen:address <- render screen:address, current-sandbox:address:editor-data
   sandbox:address:sandbox-data <- get-address env:address:programming-environment-data/deref, sandbox:offset
+  row:number, screen:address <- render-sandboxes screen:address, sandbox:address:sandbox-data, left:number, right:number, row:number
+  # clear next line, in case we just processed a backspace
+  row:number <- add row:number, 1:literal
+  move-cursor screen:address, row:number, left:number
+  clear-line-delimited screen:address, left:number, right:number
+  update-cursor screen:address, recipes:address:editor-data, current-sandbox:address:editor-data, sandbox-in-focus?:boolean
+  show-screen screen:address
+  reply screen:address/same-as-ingredient:0
+]
+
+recipe render-sandboxes [
+  default-space:address:array:location <- new location:type, 40:literal
+  screen:address <- next-ingredient
+  sandbox:address:sandbox-data <- next-ingredient
+  left:number <- next-ingredient
+  right:number <- next-ingredient
+  row:number <- next-ingredient
+  reply-unless sandbox:address:sandbox-data, row:number/same-as-ingredient:4, screen:address/same-as-ingredient:0
   sandbox-response:address:array:character <- get sandbox:address:sandbox-data/deref, response:offset
   sandbox-warnings:address:array:character <- get sandbox:address:sandbox-data/deref, warnings:offset
   {
@@ -843,13 +861,7 @@ recipe render-all [
   }
   # draw solid line after sandbox
   draw-horizontal screen:address, row:number, left:number, right:number, 9473:literal/horizontal-double
-  # clear next line, in case we just processed a backspace
-  row:number <- add row:number, 1:literal
-  move-cursor screen:address, row:number, left:number
-  clear-line-delimited screen:address, left:number, right:number
-  update-cursor screen:address, recipes:address:editor-data, current-sandbox:address:editor-data, sandbox-in-focus?:boolean
-  show-screen screen:address
-  reply screen:address/same-as-ingredient:0
+  reply row:number/same-as-ingredient:4, screen:address/same-as-ingredient:0
 ]
 
 recipe update-cursor [