about summary refs log tree commit diff stats
path: root/055parse_tree.cc
diff options
context:
space:
mode:
Diffstat (limited to '055parse_tree.cc')
-rw-r--r--055parse_tree.cc11
1 files changed, 11 insertions, 0 deletions
diff --git a/055parse_tree.cc b/055parse_tree.cc
index 5192e8a2..73e737a4 100644
--- a/055parse_tree.cc
+++ b/055parse_tree.cc
@@ -69,6 +69,17 @@ container bar [
 ]
 +parse:   product: 1: ("foo" ("address" "array" "character") ("bar" "number"))
 
+:(scenario dilated_reagent_in_static_array)
+recipe main [
+  {1: (array (address shared number) 3)} <- create-array
+  5:address:address:shared:number <- index-address {1: (array (address shared number) 3)}, 0
+  *5:address:address:shared:number <- new number:type
+  **5:address:address:shared:number <- copy 34
+  6:number <- copy **5:address:address:shared:number
+]
++run: creating array of size 4
++mem: storing 34 in location 6
+
 //: an exception is 'new', which takes a type tree as its ingredient *value*
 
 :(scenario dilated_reagent_with_new)