1225

Finally start tracing the actual instructions as they run.

1 files changed, 66 insertions, 0 deletions

diff --git a/cpp/.traces/channel-write-full b/cpp/.traces/channel-write-full
index 857b4756..fe81114d 100644
--- a/cpp/.traces/channel-write-full
+++ b/cpp/.traces/channel-write-full
@@ -19,13 +19,17 @@ after-brace/0: channel-full? ...
 new/0: routine allocated memory from 1000 to 101000
 schedule/0: test-channel-write-full
 run/0: instruction test-channel-write-full/0
+run/0: {name: "1", value: 1, type: 2-10, properties: ["1": "address":"channel"]} <- init-channel {name: "1", value: 1, type: 0, properties: ["1": "literal", "capacity": ]}
 run/0: instruction init-channel/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1000
 run/0: instruction init-channel/1
+run/0: {name: "result", value: 1, type: 2-10, properties: ["result": "address":"channel"]} <- new {name: "channel", value: 10, type: 0, properties: ["channel": "type"]}
 mem/0: new alloc: 1030
 mem/0: storing 1030 in location 1002
 run/0: instruction init-channel/2
+run/0: {name: "full", value: 2, type: 2-1, properties: ["full": "address":"integer"]} <- get-address {name: "result", value: 1, type: 2-10, properties: ["result": "address":"channel", "deref": ]}, {name: "first-full", value: 0, type: 0, properties: ["first-full": "offset"]}
 run/0: ingredient 0 is result
 mem/0: location 1002 is 1030
 run/0: ingredient 1 is first-full
@@ -33,10 +37,12 @@ run/0: address to copy is 1030
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1003
 run/0: instruction init-channel/3
+run/0: {name: "full", value: 2, type: 2-1, properties: ["full": "address":"integer", "deref": ]} <- copy {name: "0", value: 0, type: 0, properties: ["0": "literal"]}
 run/0: ingredient 0 is 0
 mem/0: location 1003 is 1030
 mem/0: storing 0 in location 1030
 run/0: instruction init-channel/4
+run/0: {name: "free", value: 3, type: 2-1, properties: ["free": "address":"integer"]} <- get-address {name: "result", value: 1, type: 2-10, properties: ["result": "address":"channel", "deref": ]}, {name: "first-free", value: 1, type: 0, properties: ["first-free": "offset"]}
 run/0: ingredient 0 is result
 mem/0: location 1002 is 1030
 run/0: ingredient 1 is first-free
@@ -44,19 +50,23 @@ run/0: address to copy is 1031
 run/0: product 0 is 1031
 mem/0: storing 1031 in location 1004
 run/0: instruction init-channel/5
+run/0: {name: "free", value: 3, type: 2-1, properties: ["free": "address":"integer", "deref": ]} <- copy {name: "0", value: 0, type: 0, properties: ["0": "literal"]}
 run/0: ingredient 0 is 0
 mem/0: location 1004 is 1031
 mem/0: storing 0 in location 1031
 run/0: instruction init-channel/6
+run/0: {name: "capacity", value: 4, type: 1, properties: ["capacity": "integer"]} <- next-ingredient 
 run/0: product 0 is 1
 mem/0: storing 1 in location 1005
 run/0: instruction init-channel/7
+run/0: {name: "capacity", value: 4, type: 1, properties: ["capacity": "integer"]} <- add {name: "capacity", value: 4, type: 1, properties: ["capacity": "integer"]}, {name: "1", value: 1, type: 0, properties: ["1": "literal"]}
 run/0: ingredient 0 is capacity
 mem/0: location 1005 is 1
 run/0: ingredient 1 is 1
 run/0: product 0 is 2
 mem/0: storing 2 in location 1005
 run/0: instruction init-channel/8
+run/0: {name: "dest", value: 5, type: 2-2-5-1, properties: ["dest": "address":"address":"array":"location"]} <- get-address {name: "result", value: 1, type: 2-10, properties: ["result": "address":"channel", "deref": ]}, {name: "data", value: 2, type: 0, properties: ["data": "offset"]}
 run/0: ingredient 0 is result
 mem/0: location 1002 is 1030
 run/0: ingredient 1 is data
@@ -64,35 +74,45 @@ run/0: address to copy is 1032
 run/0: product 0 is 1032
 mem/0: storing 1032 in location 1006
 run/0: instruction init-channel/9
+run/0: {name: "dest", value: 5, type: 2-2-5-1, properties: ["dest": "address":"address":"array":"location", "deref": ]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "capacity", value: 4, type: 1, properties: ["capacity": "integer"]}
 mem/0: location 1005 is 2
 mem/0: array size is 2
 mem/0: new alloc: 1033
 mem/0: location 1006 is 1032
 mem/0: storing 1033 in location 1032
 run/0: instruction init-channel/10
+run/0: reply {name: "result", value: 1, type: 2-10, properties: ["result": "address":"channel"]}
 mem/0: location 1002 is 1030
 run/0: result 0 is 1030
 mem/0: storing 1030 in location 1
 run/0: instruction test-channel-write-full/1
+run/0: {name: "1", value: 1, type: 2-10, properties: ["1": "address":"channel"]} <- write {name: "1", value: 1, type: 2-10, properties: ["1": "address":"channel"]}, {name: "34", value: 34, type: 0, properties: ["34": "literal"]}
 mem/0: location 1 is 1030
 run/0: instruction write/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1035
 run/0: instruction write/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1037
 run/0: instruction write/2
+run/0: {name: "val", value: 2, type: 1, properties: ["val": "location"]} <- next-ingredient 
 run/0: product 0 is 34
 mem/0: storing 34 in location 1038
 run/0: instruction write/4
+run/0: {name: "full", value: 3, type: 3, properties: ["full": "boolean"]} <- channel-full? {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]}
 mem/0: location 1037 is 1030
 run/0: instruction channel-full?/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1065
 run/0: instruction channel-full?/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1067
 run/0: instruction channel-full?/2
+run/0: {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-free", value: 1, type: 0, properties: ["first-free": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1067 is 1030
 run/0: ingredient 1 is first-free
@@ -102,20 +122,25 @@ mem/0: location 1031 is 0
 run/0: product 0 is 0
 mem/0: storing 0 in location 1068
 run/0: instruction channel-full?/3
+run/0: {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]} <- add {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}, {name: "1", value: 1, type: 0, properties: ["1": "literal"]}
 run/0: ingredient 0 is tmp
 mem/0: location 1068 is 0
 run/0: ingredient 1 is 1
 run/0: product 0 is 1
 mem/0: storing 1 in location 1068
 run/0: instruction channel-full?/5
+run/0: {name: "len", value: 3, type: 1, properties: ["len": "integer"]} <- channel-capacity {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]}
 mem/0: location 1067 is 1030
 run/0: instruction channel-capacity/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1095
 run/0: instruction channel-capacity/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1097
 run/0: instruction channel-capacity/2
+run/0: {name: "q", value: 2, type: 2-5-1, properties: ["q": "address":"array":"location"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "data", value: 2, type: 0, properties: ["data": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1097 is 1030
 run/0: ingredient 1 is data
@@ -125,13 +150,16 @@ mem/0: location 1032 is 1033
 run/0: product 0 is 1033
 mem/0: storing 1033 in location 1098
 run/0: instruction channel-capacity/3
+run/0: {name: "result", value: 3, type: 1, properties: ["result": "integer"]} <- length {name: "q", value: 2, type: 2-5-1, properties: ["q": "address":"array":"location", "deref": ]}
 mem/0: location 1098 is 1033
 mem/0: storing 2 in location 1099
 run/0: instruction channel-capacity/4
+run/0: reply {name: "result", value: 3, type: 1, properties: ["result": "integer"]}
 mem/0: location 1099 is 2
 run/0: result 0 is 2
 mem/0: storing 2 in location 1069
 run/0: instruction channel-full?/6
+run/0: {name: "at-end?", value: 4, type: 3, properties: ["at-end?": "boolean"]} <- greater-or-equal {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}, {name: "len", value: 3, type: 1, properties: ["len": "integer"]}
 run/0: ingredient 0 is tmp
 mem/0: location 1068 is 1
 run/0: ingredient 1 is len
@@ -139,11 +167,13 @@ mem/0: location 1069 is 2
 run/0: product 0 is 0
 mem/0: storing 0 in location 1070
 run/0: instruction channel-full?/7
+run/0: break-unless {name: "at-end?", value: 4, type: 3, properties: ["at-end?": "boolean"]}, {name: "", value: 1, type: , properties: ["": ]}
 mem/0: location 1070 is 0
 run/0: ingredient 0 is 0
 run/0: ingredient 1 is 
 run/0: jumping to instruction 9
 run/0: instruction channel-full?/10
+run/0: {name: "full", value: 5, type: 1, properties: ["full": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-full", value: 0, type: 0, properties: ["first-full": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1067 is 1030
 run/0: ingredient 1 is first-full
@@ -153,6 +183,7 @@ mem/0: location 1030 is 0
 run/0: product 0 is 0
 mem/0: storing 0 in location 1071
 run/0: instruction channel-full?/11
+run/0: {name: "result", value: 6, type: 3, properties: ["result": "boolean"]} <- equal {name: "full", value: 5, type: 1, properties: ["full": "integer"]}, {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}
 run/0: ingredient 0 is full
 mem/0: location 1071 is 0
 run/0: ingredient 1 is tmp
@@ -160,15 +191,18 @@ mem/0: location 1068 is 1
 run/0: product 0 is 0
 mem/0: storing 0 in location 1072
 run/0: instruction channel-full?/12
+run/0: reply {name: "result", value: 6, type: 3, properties: ["result": "boolean"]}
 mem/0: location 1072 is 0
 run/0: result 0 is 0
 mem/0: storing 0 in location 1039
 run/0: instruction write/5
+run/0: break-unless {name: "full", value: 3, type: 3, properties: ["full": "boolean"]}, {name: "", value: 2, type: , properties: ["": ]}
 mem/0: location 1039 is 0
 run/0: ingredient 0 is 0
 run/0: ingredient 1 is 
 run/0: jumping to instruction 8
 run/0: instruction write/9
+run/0: {name: "circular-buffer", value: 5, type: 2-5-1, properties: ["circular-buffer": "address":"array":"location"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "data", value: 2, type: 0, properties: ["data": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1037 is 1030
 run/0: ingredient 1 is data
@@ -178,6 +212,7 @@ mem/0: location 1032 is 1033
 run/0: product 0 is 1033
 mem/0: storing 1033 in location 1041
 run/0: instruction write/10
+run/0: {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer"]} <- get-address {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-free", value: 1, type: 0, properties: ["first-free": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1037 is 1030
 run/0: ingredient 1 is first-free
@@ -185,6 +220,7 @@ run/0: address to copy is 1031
 run/0: product 0 is 1031
 mem/0: storing 1031 in location 1042
 run/0: instruction write/11
+run/0: {name: "dest", value: 7, type: 2-1, properties: ["dest": "address":"location"]} <- index-address {name: "circular-buffer", value: 5, type: 2-5-1, properties: ["circular-buffer": "address":"array":"location", "deref": ]}, {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer", "deref": ]}
 run/0: ingredient 0 is circular-buffer
 mem/0: location 1041 is 1033
 run/0: ingredient 1 is {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer", "deref": ]}
@@ -194,11 +230,13 @@ run/0: address to copy is 1034
 run/0: product 0 is 1034
 mem/0: storing 1034 in location 1043
 run/0: instruction write/12
+run/0: {name: "dest", value: 7, type: 2-1, properties: ["dest": "address":"location", "deref": ]} <- copy {name: "val", value: 2, type: 1, properties: ["val": "location"]}
 run/0: ingredient 0 is val
 mem/0: location 1038 is 34
 mem/0: location 1043 is 1034
 mem/0: storing 34 in location 1034
 run/0: instruction write/13
+run/0: {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer", "deref": ]} <- add {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer", "deref": ]}, {name: "1", value: 1, type: 0, properties: ["1": "literal"]}
 run/0: ingredient 0 is free
 mem/0: location 1042 is 1031
 mem/0: location 1031 is 0
@@ -207,9 +245,11 @@ run/0: product 0 is 1
 mem/0: location 1042 is 1031
 mem/0: storing 1 in location 1031
 run/0: instruction write/15
+run/0: {name: "len", value: 8, type: 1, properties: ["len": "integer"]} <- length {name: "circular-buffer", value: 5, type: 2-5-1, properties: ["circular-buffer": "address":"array":"location", "deref": ]}
 mem/0: location 1041 is 1033
 mem/0: storing 2 in location 1044
 run/0: instruction write/16
+run/0: {name: "at-end?", value: 9, type: 3, properties: ["at-end?": "boolean"]} <- greater-or-equal {name: "free", value: 6, type: 2-1, properties: ["free": "address":"integer", "deref": ]}, {name: "len", value: 8, type: 1, properties: ["len": "integer"]}
 run/0: ingredient 0 is free
 mem/0: location 1042 is 1031
 mem/0: location 1031 is 1
@@ -218,23 +258,29 @@ mem/0: location 1044 is 2
 run/0: product 0 is 0
 mem/0: storing 0 in location 1045
 run/0: instruction write/17
+run/0: break-unless {name: "at-end?", value: 9, type: 3, properties: ["at-end?": "boolean"]}, {name: "", value: 1, type: , properties: ["": ]}
 mem/0: location 1045 is 0
 run/0: ingredient 0 is 0
 run/0: ingredient 1 is 
 run/0: jumping to instruction 19
 run/0: instruction write/20
+run/0: reply {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "same-as-ingredient": "0"]}
 mem/0: location 1037 is 1030
 run/0: result 0 is 1030
 mem/0: storing 1030 in location 1
 run/0: instruction test-channel-write-full/2
+run/0: {name: "2", value: 2, type: 1, properties: ["2": "integer"]} <- channel-empty? {name: "1", value: 1, type: 2-10, properties: ["1": "address":"channel"]}
 mem/0: location 1 is 1030
 run/0: instruction channel-empty?/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1125
 run/0: instruction channel-empty?/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1127
 run/0: instruction channel-empty?/2
+run/0: {name: "full", value: 2, type: 1, properties: ["full": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-full", value: 0, type: 0, properties: ["first-full": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1127 is 1030
 run/0: ingredient 1 is first-full
@@ -244,6 +290,7 @@ mem/0: location 1030 is 0
 run/0: product 0 is 0
 mem/0: storing 0 in location 1128
 run/0: instruction channel-empty?/3
+run/0: {name: "free", value: 3, type: 1, properties: ["free": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-free", value: 1, type: 0, properties: ["first-free": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1127 is 1030
 run/0: ingredient 1 is first-free
@@ -253,6 +300,7 @@ mem/0: location 1031 is 1
 run/0: product 0 is 1
 mem/0: storing 1 in location 1129
 run/0: instruction channel-empty?/4
+run/0: {name: "result", value: 4, type: 3, properties: ["result": "boolean"]} <- equal {name: "full", value: 2, type: 1, properties: ["full": "integer"]}, {name: "free", value: 3, type: 1, properties: ["free": "integer"]}
 run/0: ingredient 0 is full
 mem/0: location 1128 is 0
 run/0: ingredient 1 is free
@@ -260,18 +308,23 @@ mem/0: location 1129 is 1
 run/0: product 0 is 0
 mem/0: storing 0 in location 1130
 run/0: instruction channel-empty?/5
+run/0: reply {name: "result", value: 4, type: 3, properties: ["result": "boolean"]}
 mem/0: location 1130 is 0
 run/0: result 0 is 0
 mem/0: storing 0 in location 2
 run/0: instruction test-channel-write-full/3
+run/0: {name: "3", value: 3, type: 1, properties: ["3": "integer"]} <- channel-full? {name: "1", value: 1, type: 2-10, properties: ["1": "address":"channel"]}
 mem/0: location 1 is 1030
 run/0: instruction channel-full?/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1155
 run/0: instruction channel-full?/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1157
 run/0: instruction channel-full?/2
+run/0: {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-free", value: 1, type: 0, properties: ["first-free": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1157 is 1030
 run/0: ingredient 1 is first-free
@@ -281,20 +334,25 @@ mem/0: location 1031 is 1
 run/0: product 0 is 1
 mem/0: storing 1 in location 1158
 run/0: instruction channel-full?/3
+run/0: {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]} <- add {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}, {name: "1", value: 1, type: 0, properties: ["1": "literal"]}
 run/0: ingredient 0 is tmp
 mem/0: location 1158 is 1
 run/0: ingredient 1 is 1
 run/0: product 0 is 2
 mem/0: storing 2 in location 1158
 run/0: instruction channel-full?/5
+run/0: {name: "len", value: 3, type: 1, properties: ["len": "integer"]} <- channel-capacity {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]}
 mem/0: location 1157 is 1030
 run/0: instruction channel-capacity/0
+run/0: {name: "default-space", value: 0, type: 2-5-1, properties: ["default-space": "address":"array":"location"]} <- new {name: "location", value: 1, type: 0, properties: ["location": "type"]}, {name: "30", value: 30, type: 0, properties: ["30": "literal"]}
 mem/0: array size is 30
 mem/0: new alloc: 1185
 run/0: instruction channel-capacity/1
+run/0: {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel"]} <- next-ingredient 
 run/0: product 0 is 1030
 mem/0: storing 1030 in location 1187
 run/0: instruction channel-capacity/2
+run/0: {name: "q", value: 2, type: 2-5-1, properties: ["q": "address":"array":"location"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "data", value: 2, type: 0, properties: ["data": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1187 is 1030
 run/0: ingredient 1 is data
@@ -304,13 +362,16 @@ mem/0: location 1032 is 1033
 run/0: product 0 is 1033
 mem/0: storing 1033 in location 1188
 run/0: instruction channel-capacity/3
+run/0: {name: "result", value: 3, type: 1, properties: ["result": "integer"]} <- length {name: "q", value: 2, type: 2-5-1, properties: ["q": "address":"array":"location", "deref": ]}
 mem/0: location 1188 is 1033
 mem/0: storing 2 in location 1189
 run/0: instruction channel-capacity/4
+run/0: reply {name: "result", value: 3, type: 1, properties: ["result": "integer"]}
 mem/0: location 1189 is 2
 run/0: result 0 is 2
 mem/0: storing 2 in location 1159
 run/0: instruction channel-full?/6
+run/0: {name: "at-end?", value: 4, type: 3, properties: ["at-end?": "boolean"]} <- greater-or-equal {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}, {name: "len", value: 3, type: 1, properties: ["len": "integer"]}
 run/0: ingredient 0 is tmp
 mem/0: location 1158 is 2
 run/0: ingredient 1 is len
@@ -318,13 +379,16 @@ mem/0: location 1159 is 2
 run/0: product 0 is 1
 mem/0: storing 1 in location 1160
 run/0: instruction channel-full?/7
+run/0: break-unless {name: "at-end?", value: 4, type: 3, properties: ["at-end?": "boolean"]}, {name: "", value: 1, type: , properties: ["": ]}
 mem/0: location 1160 is 1
 run/0: ingredient 0 is 1
 run/0: jump-unless fell through
 run/0: instruction channel-full?/8
+run/0: {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]} <- copy {name: "0", value: 0, type: 0, properties: ["0": "literal"]}
 run/0: ingredient 0 is 0
 mem/0: storing 0 in location 1158
 run/0: instruction channel-full?/10
+run/0: {name: "full", value: 5, type: 1, properties: ["full": "integer"]} <- get {name: "chan", value: 1, type: 2-10, properties: ["chan": "address":"channel", "deref": ]}, {name: "first-full", value: 0, type: 0, properties: ["first-full": "offset"]}
 run/0: ingredient 0 is chan
 mem/0: location 1157 is 1030
 run/0: ingredient 1 is first-full
@@ -334,6 +398,7 @@ mem/0: location 1030 is 0
 run/0: product 0 is 0
 mem/0: storing 0 in location 1161
 run/0: instruction channel-full?/11
+run/0: {name: "result", value: 6, type: 3, properties: ["result": "boolean"]} <- equal {name: "full", value: 5, type: 1, properties: ["full": "integer"]}, {name: "tmp", value: 2, type: 1, properties: ["tmp": "integer"]}
 run/0: ingredient 0 is full
 mem/0: location 1161 is 0
 run/0: ingredient 1 is tmp
@@ -341,6 +406,7 @@ mem/0: location 1158 is 0
 run/0: product 0 is 1
 mem/0: storing 1 in location 1162
 run/0: instruction channel-full?/12
+run/0: reply {name: "result", value: 6, type: 3, properties: ["result": "boolean"]}
 mem/0: location 1162 is 1
 run/0: result 0 is 1
 mem/0: storing 1 in location 3