diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2015-11-12 22:31:49 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2015-11-12 22:31:49 -0800 |
commit | be422222cd20a0d68cc7600cbe373acd22ecfdc4 (patch) | |
tree | 7766fa1925c55aa5f50aa1783cf439de21c5af3f /sandbox/008-sandbox-test.mu | |
parent | b61dfa4fd3596d3095c8ff00913cc443dd751ad0 (diff) | |
download | mu-be422222cd20a0d68cc7600cbe373acd22ecfdc4.tar.gz |
2428 - sandbox/ working again
Diffstat (limited to 'sandbox/008-sandbox-test.mu')
-rw-r--r-- | sandbox/008-sandbox-test.mu | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/sandbox/008-sandbox-test.mu b/sandbox/008-sandbox-test.mu index bc6ca80a..a73064df 100644 --- a/sandbox/008-sandbox-test.mu +++ b/sandbox/008-sandbox-test.mu @@ -31,10 +31,9 @@ after <global-touch> [ } ] -recipe find-click-in-sandbox-output [ +recipe find-click-in-sandbox-output 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 start:number <- get *sandbox, starting-row-on-screen:offset @@ -58,9 +57,9 @@ recipe find-click-in-sandbox-output [ reply sandbox ] -recipe toggle-expected-response [ +recipe toggle-expected-response sandbox:address:sandbox-data -> sandbox:address:sandbox-data [ local-scope - sandbox:address:sandbox-data <- next-ingredient + load-ingredients expected-response:address:address:array:character <- get-address *sandbox, expected-response:offset { # if expected-response is set, reset @@ -71,7 +70,6 @@ recipe toggle-expected-response [ # if not, current response is the expected response response:address:array:character <- get *sandbox, response:offset *expected-response <- copy response - reply sandbox/same-as-ingredient:0 ] # when rendering a sandbox, color it in red/green if expected response exists |