From be422222cd20a0d68cc7600cbe373acd22ecfdc4 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 12 Nov 2015 22:31:49 -0800 Subject: 2428 - sandbox/ working again --- sandbox/009-sandbox-trace.mu | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'sandbox/009-sandbox-trace.mu') diff --git a/sandbox/009-sandbox-trace.mu b/sandbox/009-sandbox-trace.mu index c05c00d8..1829e3a4 100644 --- a/sandbox/009-sandbox-trace.mu +++ b/sandbox/009-sandbox-trace.mu @@ -118,9 +118,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 @@ -157,12 +157,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