From 350ca0c64e2cb0115aa32e073db5e78e752e7196 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 5 Nov 2015 14:22:39 -0800 Subject: 2375 - layer 9 done --- edit/009-sandbox-trace.mu | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'edit') diff --git a/edit/009-sandbox-trace.mu b/edit/009-sandbox-trace.mu index 142897d0..5e34e8d1 100644 --- a/edit/009-sandbox-trace.mu +++ b/edit/009-sandbox-trace.mu @@ -126,9 +126,9 @@ container sandbox-data [ ] # replaced in a later layer -recipe! update-sandbox [ +recipe! update-sandbox sandbox:address:sandbox-data -> sandbox:address:sandbox-data [ local-scope - sandbox:address:sandbox-data <- next-ingredient + load-ingredients data:address:array:character <- get *sandbox, data:offset response:address:address:array:character <- get-address *sandbox, response:offset trace:address:address:array:character <- get-address *sandbox, trace:offset @@ -165,12 +165,11 @@ after [ } ] -recipe find-click-in-sandbox-code [ +recipe find-click-in-sandbox-code env:address:programming-environment-data, click-row:number -> sandbox:address:sandbox-data [ local-scope - env:address:programming-environment-data <- next-ingredient - click-row:number <- next-ingredient + load-ingredients # assert click-row >= sandbox.starting-row-on-screen - sandbox:address:sandbox-data <- get *env, sandbox:offset + sandbox <- get *env, sandbox:offset start:number <- get *sandbox, starting-row-on-screen:offset clicked-on-sandboxes?:boolean <- greater-or-equal click-row, start assert clicked-on-sandboxes?, [extract-sandbox called on click to sandbox editor] -- cgit 1.4.1-2-gfad0