From c5ffb6e1cc9c5ff880d037c53b8ebc8562be0008 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Mon, 25 May 2015 22:27:19 -0700 Subject: 1459 --- html/062array.mu.html | 14 ++++++++------ 1 file changed, 8 insertions(+), 6 deletions(-) (limited to 'html/062array.mu.html') diff --git a/html/062array.mu.html b/html/062array.mu.html index 259e74fa..f8b82277 100644 --- a/html/062array.mu.html +++ b/html/062array.mu.html @@ -2,7 +2,7 @@ -~/Desktop/s/mu/062array.mu +062array.mu @@ -13,6 +13,8 @@ pre { white-space: pre-wrap; font-family: monospace; color: #d0d0d0; background-color: #000000; } body { font-family: monospace; color: #d0d0d0; background-color: #000000; } * { font-size: 1em; } +.muRecipe { color: #ff8700; } +.muScenario { color: #00af00; } .Delimiter { color: #c000c0; } .Comment { color: #8080ff; } .Constant { color: #008080; } @@ -29,7 +31,7 @@ body { font-family: monospace; color: #d0d0d0; background-color: #000000; } 
-scenario array-from-args [
+scenario array-from-args [
   run [
     1:address:array:location <- init-array 0:literal, 1:literal, 2:literal
     2:array:location <- copy 1:address:array:location/deref
@@ -43,12 +45,12 @@ scenario array-from-args [
 ]
 
 # create an array out of a list of scalar args
-recipe init-array [
-  default-space:address:array:location <- new location:type, 30:literal
+recipe init-array [
+  default-space:address:array:location <- new location:type, 30:literal
   capacity:number <- copy 0:literal
   {
     # while read curr-value
-    curr-value:location, exists?:boolean <- next-ingredient
+    curr-value:location, exists?:boolean <- next-ingredient
     break-unless exists?:boolean
     capacity:number <- add capacity:number, 1:literal
     loop
@@ -60,7 +62,7 @@ recipe init-array [
     # while read curr-value
     done?:boolean <- greater-or-equal i:number, capacity:number
     break-if done?:boolean
-    curr-value:location, exists?:boolean <- next-ingredient
+    curr-value:location, exists?:boolean <- next-ingredient
     assert exists?:boolean, [error in rewinding ingredients to init-array]
     tmp:address:location <- index-address result:address:array:location/deref, i:number
     tmp:address:location/deref <- copy curr-value:location
-- 
cgit 1.4.1-2-gfad0