From 90e9eb3d4fa431ed0e7864caead19cd2e06b2c65 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Thu, 5 Nov 2015 14:37:37 -0800 Subject: 2376 --- edit/010-warnings.mu | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'edit/010-warnings.mu') diff --git a/edit/010-warnings.mu b/edit/010-warnings.mu index af23d0ce..59e328c1 100644 --- a/edit/010-warnings.mu +++ b/edit/010-warnings.mu @@ -5,10 +5,9 @@ container programming-environment-data [ ] # copy code from recipe editor, persist, load into mu, save any warnings -recipe! update-recipes [ +recipe! update-recipes env:address:programming-environment-data, screen:address:screen -> errors-found?:boolean, env:address:programming-environment-data, screen:address:screen [ local-scope - env:address:programming-environment-data <- next-ingredient - screen:address:screen <- next-ingredient + load-ingredients recipes:address:editor-data <- get *env, recipes:offset in:address:array:character <- editor-contents recipes save [recipes.mu], in @@ -19,9 +18,10 @@ recipe! update-recipes [ break-unless *recipe-warnings status:address:array:character <- new [errors found] update-status screen, status, 1/red - reply 1/errors-found, env/same-as-ingredient:0, screen/same-as-ingredient:1 + errors-found? <- copy 1/true + reply } - reply 0/no-errors-found, env/same-as-ingredient:0, screen/same-as-ingredient:1 + errors-found? <- copy 0/false ] before [ @@ -46,9 +46,9 @@ container sandbox-data [ warnings:address:array:character ] -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 warnings:address:address:array:character <- get-address *sandbox, warnings:offset -- cgit 1.4.1-2-gfad0