This commit is contained in:
Kartik K. Agaram 2015-05-19 10:38:23 -07:00
parent f0fbbf79db
commit 33262afe87
2 changed files with 5 additions and 5 deletions

View File

@ -154,7 +154,7 @@ assert(MAX_PRIMITIVE_RECIPES < 100); // level 0 is primitives; until 99
Next_recipe_number = 100;
// End Load Recipes
:(before "End Test Run Initialization")
assert(Next_recipe_number < 1000); // functions being tested didn't overflow into test space
assert(Next_recipe_number < 1000); // recipes being tested didn't overflow into test space
:(before "End Setup")
Next_recipe_number = 1000; // consistent new numbers for each test

View File

@ -1,4 +1,4 @@
//: Spaces help isolate functions from each other. You can create them at will,
//: Spaces help isolate recipes from each other. You can create them at will,
//: and all addresses in arguments are implicitly based on the 'default-space'
//: (unless they have the /raw property)
@ -18,7 +18,7 @@ recipe main [
3:number <- copy 34:literal
# pretend array
1000:number <- copy 5:literal
# actual start of this function
# actual start of this recipe
default-space:address:array:location <- copy 1000:literal
1:address:number <- copy 3:literal
8:number/raw <- copy 1:address:number/deref
@ -60,7 +60,7 @@ recipe main [
13:number <- copy 35:literal
# pretend array
1000:number <- copy 5:literal
# actual start of this function
# actual start of this recipe
default-space:address:array:location <- copy 1000:literal
1:address:point <- copy 12:literal
9:number/raw <- get 1:address:point/deref, 1:offset
@ -80,7 +80,7 @@ recipe main [
14:number <- copy 35:literal
# pretend array
1000:number <- copy 5:literal
# actual start of this function
# actual start of this recipe
default-space:address:array:location <- copy 1000:literal
1:address:array:number <- copy 12:literal
9:number/raw <- index 1:address:array:number/deref, 1:literal