===: main29 c{0: 0 (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) -- nil c{0: 1 (((x string-address)) <- ((new)) run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l) -- nil c{0: 2 (((s stream-address)) <- ((init-stream)) ((x string-address))) -- nil c{0: 3 (((traces instruction-trace-address-array-address)) <- ((parse-traces)) ((s stream-address))) -- nil c{0: 4 (((2 terminal-address) (raw)) <- ((init-fake-terminal)) ((17 literal)) ((15 literal))) -- nil c{0: 5 (((3 space-address) (raw) (browser-state)) <- ((browser-state)) ((traces instruction-trace-address-array-address)) ((3 literal) (screen-height))) -- nil c{0: 6 (((0 space-address) (names browser-state)) <- ((copy)) ((3 space-address) (raw) (browser-state))) -- nil c{0: 7 (((4 string-address) (raw)) <- ((get)) ((2 terminal-address) (raw) (deref)) ((data offset))) -- nil c{0: 8 (((first-index-on-page integer) (space 1)) <- ((copy)) ((1 literal))) -- nil c{0: 9 (((first-subindex-on-page integer) (space 1)) <- ((copy)) ((1 literal))) -- nil c{0: 10 (((last-index-on-page integer) (space 1)) <- ((copy)) ((3 literal))) -- nil c{0: 11 (((last-subindex-on-page integer) (space 1)) <- ((copy)) ((-2 literal))) -- nil c{0: 12 (((expanded-index integer) (space 1)) <- ((copy)) ((1 literal))) -- nil c{0: 13 (((expanded-children integer) (space 1)) <- ((copy)) ((3 literal))) -- nil c{0: 14 (((to-top)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) -- nil c{0: 15 (((print-page)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) -- nil c{0: 16 (((s string-address)) <- ((new)) k ) -- nil c{0: 17 (((k keyboard-address)) <- ((init-keyboard)) ((s string-address))) -- nil c{0: 18 (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) -- nil c{0: 19 (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) -- nil c{1: 0 ✓ (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) c{1: 1 ✓ (((x string-address)) <- ((new)) run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l) c{1: 2 ✓ (((s stream-address)) <- ((init-stream)) ((x string-address))) c{1: 3 ✓ (((traces instruction-trace-address-array-address)) <- ((parse-traces)) ((s stream-address))) c{1: 4 ✓ (((2 terminal-address) (raw)) <- ((init-fake-terminal)) ((17 literal)) ((15 literal))) c{1: 5 ✓ (((3 space-address) (raw) (browser-state)) <- ((browser-state)) ((traces instruction-trace-address-array-address)) ((3 literal) (screen-height))) c{1: 6 ✓ (((0 space-address) (names browser-state)) <- ((copy)) ((3 space-address) (raw) (browser-state))) c{1: 7 ✓ (((4 string-address) (raw)) <- ((get)) ((2 terminal-address) (raw) (deref)) ((data offset))) c{1: 8 ✓ (((first-index-on-page integer) (space 1)) <- ((copy)) ((1 literal))) c{1: 9 ✓ (((first-subindex-on-page integer) (space 1)) <- ((copy)) ((1 literal))) c{1: 10 ✓ (((last-index-on-page integer) (space 1)) <- ((copy)) ((3 literal))) c{1: 11 ✓ (((last-subindex-on-page integer) (space 1)) <- ((copy)) ((-2 literal))) c{1: 12 ✓ (((expanded-index integer) (space 1)) <- ((copy)) ((1 literal))) c{1: 13 ✓ (((expanded-children integer) (space 1)) <- ((copy)) ((3 literal))) c{1: 14 ✓ (((to-top)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) c{1: 15 ✓ (((print-page)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) c{1: 16 ✓ (((s string-address)) <- ((new)) k ) c{1: 17 ✓ (((k keyboard-address)) <- ((init-keyboard)) ((s string-address))) c{1: 18 ✓ (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) c{1: 19 ✓ (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) -: next-space-generator of main29 is browser-state cn0: convert-names in main29 cn0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) nil nil cn0: checking arg ((space literal)) cn0: checking arg ((30 literal) (capacity)) cn0: checking oarg ((default-space space-address)) maybe-add: ((default-space space-address)) cn0: (((x string-address)) <- ((new)) run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l) nil nil cn0: checking arg run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l cn0: checking oarg ((x string-address)) maybe-add: ((x string-address)) cn0: location for oarg ((x string-address)): 1 cn0: (((s stream-address)) <- ((init-stream)) ((x string-address))) ((x 1)) nil cn0: checking arg ((x string-address)) maybe-add: ((x string-address)) cn0: checking oarg ((s stream-address)) maybe-add: ((s stream-address)) cn0: location for oarg ((s stream-address)): 2 cn0: (((traces instruction-trace-address-array-address)) <- ((parse-traces)) ((s stream-address))) ((s 2) (x 1)) nil cn0: checking arg ((s stream-address)) maybe-add: ((s stream-address)) cn0: checking oarg ((traces instruction-trace-address-array-address)) maybe-add: ((traces instruction-trace-address-array-address)) cn0: location for oarg ((traces instruction-trace-address-array-address)): 3 cn0: (((2 terminal-address) (raw)) <- ((init-fake-terminal)) ((17 literal)) ((15 literal))) ((s 2) (traces 3) (x 1)) nil cn0: checking arg ((17 literal)) cn0: checking arg ((15 literal)) cn0: checking oarg ((2 terminal-address) (raw)) maybe-add: ((2 terminal-address) (raw)) cn0: (((3 space-address) (raw) (browser-state)) <- ((browser-state)) ((traces instruction-trace-address-array-address)) ((3 literal) (screen-height))) ((s 2) (traces 3) (x 1)) nil cn0: checking arg ((traces instruction-trace-address-array-address)) maybe-add: ((traces instruction-trace-address-array-address)) cn0: checking arg ((3 literal) (screen-height)) cn0: checking oarg ((3 space-address) (raw) (browser-state)) maybe-add: ((3 space-address) (raw) (browser-state)) cn0: (((0 space-address) (names browser-state)) <- ((copy)) ((3 space-address) (raw) (browser-state))) ((s 2) (traces 3) (x 1)) nil cn0: checking arg ((3 space-address) (raw) (browser-state)) maybe-add: ((3 space-address) (raw) (browser-state)) cn0: checking oarg ((0 space-address) (names browser-state)) maybe-add: ((0 space-address) (names browser-state)) cn0: (((4 string-address) (raw)) <- ((get)) ((2 terminal-address) (raw) (deref)) ((data offset))) ((s 2) (traces 3) (x 1)) nil cn0: field-access data in 2terminal-addressrawderef of type terminal cn0: new field; computing location cn0: field location 4 cn0: checking arg ((2 terminal-address) (raw) (deref)) maybe-add: ((2 terminal-address) (raw) (deref)) cn0: checking arg ((data offset)) cn0: checking oarg ((4 string-address) (raw)) maybe-add: ((4 string-address) (raw)) cn0: (((first-index-on-page integer) (space 1)) <- ((copy)) ((1 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((1 literal)) cn0: checking oarg ((first-index-on-page integer) (space 1)) maybe-add: ((first-index-on-page integer) (space 1)) cn0: (((first-subindex-on-page integer) (space 1)) <- ((copy)) ((1 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((1 literal)) cn0: checking oarg ((first-subindex-on-page integer) (space 1)) maybe-add: ((first-subindex-on-page integer) (space 1)) cn0: (((last-index-on-page integer) (space 1)) <- ((copy)) ((3 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((3 literal)) cn0: checking oarg ((last-index-on-page integer) (space 1)) maybe-add: ((last-index-on-page integer) (space 1)) cn0: (((last-subindex-on-page integer) (space 1)) <- ((copy)) ((-2 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((-2 literal)) cn0: checking oarg ((last-subindex-on-page integer) (space 1)) maybe-add: ((last-subindex-on-page integer) (space 1)) cn0: (((expanded-index integer) (space 1)) <- ((copy)) ((1 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((1 literal)) cn0: checking oarg ((expanded-index integer) (space 1)) maybe-add: ((expanded-index integer) (space 1)) cn0: (((expanded-children integer) (space 1)) <- ((copy)) ((3 literal))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((3 literal)) cn0: checking oarg ((expanded-children integer) (space 1)) maybe-add: ((expanded-children integer) (space 1)) cn0: (((to-top)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((0 space-address) (browser-state)) maybe-add: ((0 space-address) (browser-state)) cn0: checking arg ((2 terminal-address) (raw)) maybe-add: ((2 terminal-address) (raw)) cn0: (((print-page)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((0 space-address) (browser-state)) maybe-add: ((0 space-address) (browser-state)) cn0: checking arg ((2 terminal-address) (raw)) maybe-add: ((2 terminal-address) (raw)) cn0: (((s string-address)) <- ((new)) k ) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg k cn0: checking oarg ((s string-address)) maybe-add: ((s string-address)) cn0: (((k keyboard-address)) <- ((init-keyboard)) ((s string-address))) ((data 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((s string-address)) maybe-add: ((s string-address)) cn0: checking oarg ((k keyboard-address)) maybe-add: ((k keyboard-address)) cn0: location for oarg ((k keyboard-address)): 4 cn0: (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) ((data 4) (k 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((3 space-address) (raw) (browser-state)) maybe-add: ((3 space-address) (raw) (browser-state)) cn0: checking arg ((k keyboard-address)) maybe-add: ((k keyboard-address)) cn0: checking arg ((2 terminal-address) (raw)) maybe-add: ((2 terminal-address) (raw)) cn0: (((process-key)) ((3 space-address) (raw) (browser-state)) ((k keyboard-address)) ((2 terminal-address) (raw))) ((data 4) (k 4) (s 2) (traces 3) (x 1)) ((data t)) cn0: checking arg ((3 space-address) (raw) (browser-state)) maybe-add: ((3 space-address) (raw) (browser-state)) cn0: checking arg ((k keyboard-address)) maybe-add: ((k keyboard-address)) cn0: checking arg ((2 terminal-address) (raw)) maybe-add: ((2 terminal-address) (raw)) cn1: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) cn1: (((1 string-address)) <- ((new)) run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l) cn1: (((2 stream-address)) <- ((init-stream)) ((1 string-address))) cn1: (((3 instruction-trace-address-array-address)) <- ((parse-traces)) ((2 stream-address))) cn1: (((2 terminal-address) (raw)) <- ((init-fake-terminal)) ((17 literal)) ((15 literal))) cn1: (((3 space-address) (raw) (browser-state)) <- ((browser-state)) ((3 instruction-trace-address-array-address)) ((3 literal) (screen-height))) cn1: (((0 space-address) (names browser-state)) <- ((copy)) ((3 space-address) (raw) (browser-state))) cn1: (((4 string-address) (raw)) <- ((get)) ((2 terminal-address) (raw) (deref)) ((4 offset))) cn1: (((4 integer) (space 1)) <- ((copy)) ((1 literal))) cn1: (((5 integer) (space 1)) <- ((copy)) ((1 literal))) cn1: (((6 integer) (space 1)) <- ((copy)) ((3 literal))) cn1: (((7 integer) (space 1)) <- ((copy)) ((-2 literal))) cn1: (((2 integer) (space 1)) <- ((copy)) ((1 literal))) cn1: (((3 integer) (space 1)) <- ((copy)) ((3 literal))) cn1: (((to-top)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) cn1: (((print-page)) ((0 space-address) (browser-state)) ((2 terminal-address) (raw))) cn1: (((2 string-address)) <- ((new)) k ) cn1: (((4 keyboard-address)) <- ((init-keyboard)) ((2 string-address))) cn1: (((process-key)) ((3 space-address) (raw) (browser-state)) ((4 keyboard-address)) ((2 terminal-address) (raw))) cn1: (((process-key)) ((3 space-address) (raw) (browser-state)) ((4 keyboard-address)) ((2 terminal-address) (raw))) schedule: main29 run: main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity))) run: main29 0: 1000 => ((default-space space-address)) run: main29 1: (((1 string-address)) <- ((new)) run: main 0: a b c mem: 0 a run: main 1: d e f mem: 1 a mem: 1 b mem: 1 c run: main 2: g hi mem: 2 a run: main 3: j run: main 4: k run: main 5: l) run: main29 1: 1031 => ((1 string-address)) mem: ((1 string-address)): 1002 <= 1031 run: main29 2: (((2 stream-address)) <- ((init-stream)) ((1 string-address))) mem: ((1 string-address)) => 1031 run: init-stream/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: init-stream/main29 0: 1177 => ((default-space space-address)) run: init-stream/main29 1: (((1 string-address)) <- ((next-input))) arg: nil 0 (1031) run: init-stream/main29 1: 1031 => ((1 string-address)) mem: ((1 string-address)): 1179 <= 1031 run: init-stream/main29 2: (((2 stream-address)) <- ((new)) ((stream literal))) run: init-stream/main29 2: 1208 => ((2 stream-address)) mem: ((2 stream-address)): 1180 <= 1208 run: init-stream/main29 3: (((3 integer-address)) <- ((get-address)) ((2 stream-address) (deref)) ((0 offset))) run: init-stream/main29 3: 1208 => ((3 integer-address)) mem: ((3 integer-address)): 1181 <= 1208 run: init-stream/main29 4: (((3 integer-address) (deref)) <- ((copy)) ((0 literal))) run: init-stream/main29 4: 0 => ((3 integer-address) (deref)) mem: ((3 integer-address) (deref)): 1208 <= 0 run: init-stream/main29 5: (((4 string-address-address)) <- ((get-address)) ((2 stream-address) (deref)) ((1 offset))) run: init-stream/main29 5: 1209 => ((4 string-address-address)) mem: ((4 string-address-address)): 1182 <= 1209 run: init-stream/main29 6: (((4 string-address-address) (deref)) <- ((copy)) ((1 string-address))) mem: ((1 string-address)) => 1031 run: init-stream/main29 6: 1031 => ((4 string-address-address) (deref)) mem: ((4 string-address-address) (deref)): 1209 <= 1031 run: init-stream/main29 7: (((reply)) ((2 stream-address))) mem: ((2 stream-address)) => 1208 run: main29 2: 1208 => ((2 stream-address)) mem: ((2 stream-address)): 1003 <= 1208 run: main29 3: (((3 instruction-trace-address-array-address)) <- ((parse-traces)) ((2 stream-address))) mem: ((2 stream-address)) => 1208 run: parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: parse-traces/main29 0: 1210 => ((default-space space-address)) run: parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1212 <= 1208 run: parse-traces/main29 2: ((($print)) ((counting lines literal))) run: parse-traces/main29 3: (((2 integer)) <- ((copy)) ((0 literal))) run: parse-traces/main29 3: 0 => ((2 integer)) mem: ((2 integer)): 1213 <= 0 run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1241 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1243 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 0 run: end-of-stream?/parse-traces/main29 2: 0 => ((2 integer)) mem: ((2 integer)): 1244 <= 0 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1245 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1246 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 0 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1247 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1272 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1274 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1275 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1276 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 0 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1032 byte) (raw)) => r run: read-character/parse-traces/main29 4: #\r => ((4 character)) mem: ((4 character)): 1277 <= #\r run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 0 run: read-character/parse-traces/main29 5: 1 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 1 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => r run: parse-traces/main29 6: #\r => ((4 character)) mem: ((4 character)): 1215 <= #\r run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => r run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1303 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1305 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 1 run: end-of-stream?/parse-traces/main29 2: 1 => ((2 integer)) mem: ((2 integer)): 1306 <= 1 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1307 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1308 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 1 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1309 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1334 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1336 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1337 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1338 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 1 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1033 byte) (raw)) => u run: read-character/parse-traces/main29 4: #\u => ((4 character)) mem: ((4 character)): 1339 <= #\u run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 1 run: read-character/parse-traces/main29 5: 2 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 2 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => u run: parse-traces/main29 6: #\u => ((4 character)) mem: ((4 character)): 1215 <= #\u run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => u run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1365 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1367 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 2 run: end-of-stream?/parse-traces/main29 2: 2 => ((2 integer)) mem: ((2 integer)): 1368 <= 2 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1369 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1370 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 2 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1371 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1396 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1398 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1399 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1400 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 2 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1034 byte) (raw)) => n run: read-character/parse-traces/main29 4: #\n => ((4 character)) mem: ((4 character)): 1401 <= #\n run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 2 run: read-character/parse-traces/main29 5: 3 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 3 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => n run: parse-traces/main29 6: #\n => ((4 character)) mem: ((4 character)): 1215 <= #\n run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => n run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1427 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1429 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 3 run: end-of-stream?/parse-traces/main29 2: 3 => ((2 integer)) mem: ((2 integer)): 1430 <= 3 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1431 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1432 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 3 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1433 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1458 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1460 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1461 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1462 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 3 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1035 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 1463 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 3 run: read-character/parse-traces/main29 5: 4 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 4 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1489 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1491 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 4 run: end-of-stream?/parse-traces/main29 2: 4 => ((2 integer)) mem: ((2 integer)): 1492 <= 4 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1493 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1494 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 4 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1495 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1520 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1522 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1523 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1524 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 4 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1036 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 1525 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 4 run: read-character/parse-traces/main29 5: 5 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 5 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1551 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1553 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 5 run: end-of-stream?/parse-traces/main29 2: 5 => ((2 integer)) mem: ((2 integer)): 1554 <= 5 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1555 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1556 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 5 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1557 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1582 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1584 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1585 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1586 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 5 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1037 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 1587 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 5 run: read-character/parse-traces/main29 5: 6 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 6 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1613 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1615 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 6 run: end-of-stream?/parse-traces/main29 2: 6 => ((2 integer)) mem: ((2 integer)): 1616 <= 6 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1617 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1618 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 6 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1619 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1644 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1646 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1647 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1648 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 6 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1038 byte) (raw)) => a run: read-character/parse-traces/main29 4: #\a => ((4 character)) mem: ((4 character)): 1649 <= #\a run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 6 run: read-character/parse-traces/main29 5: 7 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 7 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => a run: parse-traces/main29 6: #\a => ((4 character)) mem: ((4 character)): 1215 <= #\a run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => a run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1675 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1677 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 7 run: end-of-stream?/parse-traces/main29 2: 7 => ((2 integer)) mem: ((2 integer)): 1678 <= 7 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1679 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1680 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 7 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1681 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1706 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1708 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1709 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1710 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 7 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1039 byte) (raw)) => i run: read-character/parse-traces/main29 4: #\i => ((4 character)) mem: ((4 character)): 1711 <= #\i run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 7 run: read-character/parse-traces/main29 5: 8 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 8 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => i run: parse-traces/main29 6: #\i => ((4 character)) mem: ((4 character)): 1215 <= #\i run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => i run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1737 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1739 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 8 run: end-of-stream?/parse-traces/main29 2: 8 => ((2 integer)) mem: ((2 integer)): 1740 <= 8 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1741 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1742 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 8 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1743 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1768 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1770 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1771 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1772 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 8 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1040 byte) (raw)) => n run: read-character/parse-traces/main29 4: #\n => ((4 character)) mem: ((4 character)): 1773 <= #\n run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 8 run: read-character/parse-traces/main29 5: 9 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 9 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => n run: parse-traces/main29 6: #\n => ((4 character)) mem: ((4 character)): 1215 <= #\n run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => n run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1799 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1801 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 9 run: end-of-stream?/parse-traces/main29 2: 9 => ((2 integer)) mem: ((2 integer)): 1802 <= 9 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1803 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1804 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 9 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1805 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1830 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1832 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1833 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1834 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 9 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1041 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 1835 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 9 run: read-character/parse-traces/main29 5: 10 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 10 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1861 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1863 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 10 run: end-of-stream?/parse-traces/main29 2: 10 => ((2 integer)) mem: ((2 integer)): 1864 <= 10 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1865 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1866 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 10 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1867 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1892 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1894 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1895 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1896 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 10 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1042 byte) (raw)) => 0 run: read-character/parse-traces/main29 4: #\0 => ((4 character)) mem: ((4 character)): 1897 <= #\0 run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 10 run: read-character/parse-traces/main29 5: 11 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 11 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => 0 run: parse-traces/main29 6: #\0 => ((4 character)) mem: ((4 character)): 1215 <= #\0 run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => 0 run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1923 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1925 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 11 run: end-of-stream?/parse-traces/main29 2: 11 => ((2 integer)) mem: ((2 integer)): 1926 <= 11 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1927 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1928 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 11 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1929 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 1954 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1956 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 1957 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1958 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 11 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1043 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 1959 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 11 run: read-character/parse-traces/main29 5: 12 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 12 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 1985 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 1987 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 12 run: end-of-stream?/parse-traces/main29 2: 12 => ((2 integer)) mem: ((2 integer)): 1988 <= 12 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 1989 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 1990 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 12 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 1991 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2016 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2018 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2019 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2020 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 12 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1044 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 2021 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 12 run: read-character/parse-traces/main29 5: 13 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 13 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2047 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2049 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 13 run: end-of-stream?/parse-traces/main29 2: 13 => ((2 integer)) mem: ((2 integer)): 2050 <= 13 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2051 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2052 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 13 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2053 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2078 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2080 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2081 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2082 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 13 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1045 byte) (raw)) => a run: read-character/parse-traces/main29 4: #\a => ((4 character)) mem: ((4 character)): 2083 <= #\a run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 13 run: read-character/parse-traces/main29 5: 14 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 14 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => a run: parse-traces/main29 6: #\a => ((4 character)) mem: ((4 character)): 1215 <= #\a run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => a run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2109 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2111 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 14 run: end-of-stream?/parse-traces/main29 2: 14 => ((2 integer)) mem: ((2 integer)): 2112 <= 14 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2113 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2114 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 14 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2115 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2140 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2142 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2143 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2144 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 14 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1046 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 2145 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 14 run: read-character/parse-traces/main29 5: 15 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 15 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2171 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2173 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 15 run: end-of-stream?/parse-traces/main29 2: 15 => ((2 integer)) mem: ((2 integer)): 2174 <= 15 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2175 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2176 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 15 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2177 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2202 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2204 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2205 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2206 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 15 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1047 byte) (raw)) => b run: read-character/parse-traces/main29 4: #\b => ((4 character)) mem: ((4 character)): 2207 <= #\b run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 15 run: read-character/parse-traces/main29 5: 16 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 16 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => b run: parse-traces/main29 6: #\b => ((4 character)) mem: ((4 character)): 1215 <= #\b run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => b run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2233 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2235 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 16 run: end-of-stream?/parse-traces/main29 2: 16 => ((2 integer)) mem: ((2 integer)): 2236 <= 16 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2237 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2238 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 16 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2239 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2264 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2266 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2267 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2268 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 16 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1048 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 2269 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 16 run: read-character/parse-traces/main29 5: 17 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 17 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2295 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2297 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 17 run: end-of-stream?/parse-traces/main29 2: 17 => ((2 integer)) mem: ((2 integer)): 2298 <= 17 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2299 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2300 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 17 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2301 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2326 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2328 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2329 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2330 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 17 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1049 byte) (raw)) => c run: read-character/parse-traces/main29 4: #\c => ((4 character)) mem: ((4 character)): 2331 <= #\c run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 17 run: read-character/parse-traces/main29 5: 18 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 18 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => c run: parse-traces/main29 6: #\c => ((4 character)) mem: ((4 character)): 1215 <= #\c run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => c run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2357 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2359 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 18 run: end-of-stream?/parse-traces/main29 2: 18 => ((2 integer)) mem: ((2 integer)): 2360 <= 18 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2361 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2362 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 18 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2363 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2388 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2390 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2391 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2392 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 18 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1050 byte) (raw)) => run: read-character/parse-traces/main29 4: #\newline => ((4 character)) mem: ((4 character)): 2393 <= #\newline run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 18 run: read-character/parse-traces/main29 5: 19 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 19 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\newline => ((4 character)) mem: ((4 character)): 1215 <= #\newline run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: t => ((5 boolean)) mem: ((5 boolean)): 1216 <= t run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => t run: parse-traces/main29 9: (((2 integer)) <- ((add)) ((2 integer)) ((1 literal))) mem: ((2 integer)) => 0 run: parse-traces/main29 9: 1 => ((2 integer)) mem: ((2 integer)): 1213 <= 1 run: parse-traces/main29 10: ((($print)) (( literal))) run: parse-traces/main29 11: ((($print)) ((2 integer))) mem: ((2 integer)) => 1 run: parse-traces/main29 12: ((($print)) (( literal))) run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2419 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2421 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 19 run: end-of-stream?/parse-traces/main29 2: 19 => ((2 integer)) mem: ((2 integer)): 2422 <= 19 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2423 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2424 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 19 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2425 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2450 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2452 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2453 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2454 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 19 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1051 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 2455 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 19 run: read-character/parse-traces/main29 5: 20 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 20 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2481 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2483 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 20 run: end-of-stream?/parse-traces/main29 2: 20 => ((2 integer)) mem: ((2 integer)): 2484 <= 20 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2485 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2486 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 20 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2487 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2512 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2514 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2515 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2516 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 20 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1052 byte) (raw)) => e run: read-character/parse-traces/main29 4: #\e => ((4 character)) mem: ((4 character)): 2517 <= #\e run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 20 run: read-character/parse-traces/main29 5: 21 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 21 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => e run: parse-traces/main29 6: #\e => ((4 character)) mem: ((4 character)): 1215 <= #\e run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => e run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2543 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2545 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 21 run: end-of-stream?/parse-traces/main29 2: 21 => ((2 integer)) mem: ((2 integer)): 2546 <= 21 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2547 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2548 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 21 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2549 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2574 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2576 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2577 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2578 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 21 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1053 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 2579 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 21 run: read-character/parse-traces/main29 5: 22 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 22 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2605 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2607 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 22 run: end-of-stream?/parse-traces/main29 2: 22 => ((2 integer)) mem: ((2 integer)): 2608 <= 22 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2609 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2610 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 22 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2611 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2636 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2638 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2639 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2640 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 22 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1054 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 2641 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 22 run: read-character/parse-traces/main29 5: 23 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 23 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2667 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2669 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 23 run: end-of-stream?/parse-traces/main29 2: 23 => ((2 integer)) mem: ((2 integer)): 2670 <= 23 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2671 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2672 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 23 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2673 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2698 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2700 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2701 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2702 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 23 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1055 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 2703 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 23 run: read-character/parse-traces/main29 5: 24 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 24 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) schedule: scheduling parse-traces/main29 for further processing schedule: parse-traces/main29 run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2729 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2731 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 24 run: end-of-stream?/parse-traces/main29 2: 24 => ((2 integer)) mem: ((2 integer)): 2732 <= 24 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2733 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2734 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 24 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2735 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2760 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2762 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2763 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2764 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 24 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1056 byte) (raw)) => 0 run: read-character/parse-traces/main29 4: #\0 => ((4 character)) mem: ((4 character)): 2765 <= #\0 run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 24 run: read-character/parse-traces/main29 5: 25 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 25 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => 0 run: parse-traces/main29 6: #\0 => ((4 character)) mem: ((4 character)): 1215 <= #\0 run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => 0 run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2791 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2793 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 25 run: end-of-stream?/parse-traces/main29 2: 25 => ((2 integer)) mem: ((2 integer)): 2794 <= 25 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2795 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2796 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 25 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2797 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2822 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2824 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2825 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2826 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 25 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1057 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 2827 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 25 run: read-character/parse-traces/main29 5: 26 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 26 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2853 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2855 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 26 run: end-of-stream?/parse-traces/main29 2: 26 => ((2 integer)) mem: ((2 integer)): 2856 <= 26 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2857 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2858 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 26 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2859 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2884 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2886 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2887 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2888 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 26 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1058 byte) (raw)) => a run: read-character/parse-traces/main29 4: #\a => ((4 character)) mem: ((4 character)): 2889 <= #\a run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 26 run: read-character/parse-traces/main29 5: 27 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 27 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => a run: parse-traces/main29 6: #\a => ((4 character)) mem: ((4 character)): 1215 <= #\a run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => a run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2915 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2917 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 27 run: end-of-stream?/parse-traces/main29 2: 27 => ((2 integer)) mem: ((2 integer)): 2918 <= 27 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2919 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2920 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 27 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2921 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 2946 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2948 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 2949 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2950 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 27 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1059 byte) (raw)) => run: read-character/parse-traces/main29 4: #\newline => ((4 character)) mem: ((4 character)): 2951 <= #\newline run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 27 run: read-character/parse-traces/main29 5: 28 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 28 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\newline => ((4 character)) mem: ((4 character)): 1215 <= #\newline run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: t => ((5 boolean)) mem: ((5 boolean)): 1216 <= t run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => t run: parse-traces/main29 9: (((2 integer)) <- ((add)) ((2 integer)) ((1 literal))) mem: ((2 integer)) => 1 run: parse-traces/main29 9: 2 => ((2 integer)) mem: ((2 integer)): 1213 <= 2 run: parse-traces/main29 10: ((($print)) (( literal))) run: parse-traces/main29 11: ((($print)) ((2 integer))) mem: ((2 integer)) => 2 run: parse-traces/main29 12: ((($print)) (( literal))) run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 2977 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 2979 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 28 run: end-of-stream?/parse-traces/main29 2: 28 => ((2 integer)) mem: ((2 integer)): 2980 <= 28 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 2981 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 2982 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 28 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 2983 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3008 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3010 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3011 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3012 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 28 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1060 byte) (raw)) => r run: read-character/parse-traces/main29 4: #\r => ((4 character)) mem: ((4 character)): 3013 <= #\r run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 28 run: read-character/parse-traces/main29 5: 29 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 29 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => r run: parse-traces/main29 6: #\r => ((4 character)) mem: ((4 character)): 1215 <= #\r run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => r run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3039 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3041 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 29 run: end-of-stream?/parse-traces/main29 2: 29 => ((2 integer)) mem: ((2 integer)): 3042 <= 29 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3043 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3044 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 29 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3045 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3070 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3072 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3073 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3074 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 29 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1061 byte) (raw)) => u run: read-character/parse-traces/main29 4: #\u => ((4 character)) mem: ((4 character)): 3075 <= #\u run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 29 run: read-character/parse-traces/main29 5: 30 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 30 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => u run: parse-traces/main29 6: #\u => ((4 character)) mem: ((4 character)): 1215 <= #\u run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => u run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3101 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3103 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 30 run: end-of-stream?/parse-traces/main29 2: 30 => ((2 integer)) mem: ((2 integer)): 3104 <= 30 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3105 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3106 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 30 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3107 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3132 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3134 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3135 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3136 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 30 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1062 byte) (raw)) => n run: read-character/parse-traces/main29 4: #\n => ((4 character)) mem: ((4 character)): 3137 <= #\n run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 30 run: read-character/parse-traces/main29 5: 31 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 31 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => n run: parse-traces/main29 6: #\n => ((4 character)) mem: ((4 character)): 1215 <= #\n run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => n run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3163 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3165 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 31 run: end-of-stream?/parse-traces/main29 2: 31 => ((2 integer)) mem: ((2 integer)): 3166 <= 31 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3167 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3168 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 31 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3169 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3194 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3196 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3197 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3198 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 31 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1063 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 3199 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 31 run: read-character/parse-traces/main29 5: 32 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 32 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3225 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3227 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 32 run: end-of-stream?/parse-traces/main29 2: 32 => ((2 integer)) mem: ((2 integer)): 3228 <= 32 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3229 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3230 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 32 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3231 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3256 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3258 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3259 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3260 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 32 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1064 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 3261 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 32 run: read-character/parse-traces/main29 5: 33 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 33 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3287 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3289 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 33 run: end-of-stream?/parse-traces/main29 2: 33 => ((2 integer)) mem: ((2 integer)): 3290 <= 33 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3291 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3292 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 33 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3293 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3318 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3320 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3321 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3322 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 33 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1065 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 3323 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 33 run: read-character/parse-traces/main29 5: 34 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 34 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3349 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3351 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 34 run: end-of-stream?/parse-traces/main29 2: 34 => ((2 integer)) mem: ((2 integer)): 3352 <= 34 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3353 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3354 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 34 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3355 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3380 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3382 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3383 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3384 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 34 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1066 byte) (raw)) => a run: read-character/parse-traces/main29 4: #\a => ((4 character)) mem: ((4 character)): 3385 <= #\a run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 34 run: read-character/parse-traces/main29 5: 35 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 35 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => a run: parse-traces/main29 6: #\a => ((4 character)) mem: ((4 character)): 1215 <= #\a run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => a run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3411 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3413 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 35 run: end-of-stream?/parse-traces/main29 2: 35 => ((2 integer)) mem: ((2 integer)): 3414 <= 35 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3415 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3416 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 35 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3417 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3442 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3444 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3445 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3446 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 35 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1067 byte) (raw)) => i run: read-character/parse-traces/main29 4: #\i => ((4 character)) mem: ((4 character)): 3447 <= #\i run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 35 run: read-character/parse-traces/main29 5: 36 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 36 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => i run: parse-traces/main29 6: #\i => ((4 character)) mem: ((4 character)): 1215 <= #\i run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => i run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3473 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3475 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 36 run: end-of-stream?/parse-traces/main29 2: 36 => ((2 integer)) mem: ((2 integer)): 3476 <= 36 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3477 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3478 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 36 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3479 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3504 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3506 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3507 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3508 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 36 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1068 byte) (raw)) => n run: read-character/parse-traces/main29 4: #\n => ((4 character)) mem: ((4 character)): 3509 <= #\n run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 36 run: read-character/parse-traces/main29 5: 37 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 37 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => n run: parse-traces/main29 6: #\n => ((4 character)) mem: ((4 character)): 1215 <= #\n run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => n run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3535 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3537 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 37 run: end-of-stream?/parse-traces/main29 2: 37 => ((2 integer)) mem: ((2 integer)): 3538 <= 37 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3539 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3540 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 37 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3541 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3566 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3568 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3569 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3570 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 37 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1069 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 3571 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 37 run: read-character/parse-traces/main29 5: 38 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 38 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3597 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3599 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 38 run: end-of-stream?/parse-traces/main29 2: 38 => ((2 integer)) mem: ((2 integer)): 3600 <= 38 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3601 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3602 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 38 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3603 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3628 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3630 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3631 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3632 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 38 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1070 byte) (raw)) => 1 run: read-character/parse-traces/main29 4: #\1 => ((4 character)) mem: ((4 character)): 3633 <= #\1 run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 38 run: read-character/parse-traces/main29 5: 39 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 39 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => 1 run: parse-traces/main29 6: #\1 => ((4 character)) mem: ((4 character)): 1215 <= #\1 run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => 1 run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3659 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3661 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 39 run: end-of-stream?/parse-traces/main29 2: 39 => ((2 integer)) mem: ((2 integer)): 3662 <= 39 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3663 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3664 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 39 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3665 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3690 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3692 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3693 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3694 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 39 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1071 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 3695 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 39 run: read-character/parse-traces/main29 5: 40 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 40 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3721 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3723 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 40 run: end-of-stream?/parse-traces/main29 2: 40 => ((2 integer)) mem: ((2 integer)): 3724 <= 40 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3725 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3726 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 40 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3727 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3752 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3754 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3755 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3756 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 40 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1072 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 3757 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 40 run: read-character/parse-traces/main29 5: 41 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 41 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3783 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3785 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 41 run: end-of-stream?/parse-traces/main29 2: 41 => ((2 integer)) mem: ((2 integer)): 3786 <= 41 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3787 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3788 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 41 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3789 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3814 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3816 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3817 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3818 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 41 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1073 byte) (raw)) => d run: read-character/parse-traces/main29 4: #\d => ((4 character)) mem: ((4 character)): 3819 <= #\d run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 41 run: read-character/parse-traces/main29 5: 42 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 42 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => d run: parse-traces/main29 6: #\d => ((4 character)) mem: ((4 character)): 1215 <= #\d run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => d run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3845 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3847 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 42 run: end-of-stream?/parse-traces/main29 2: 42 => ((2 integer)) mem: ((2 integer)): 3848 <= 42 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3849 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3850 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 42 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3851 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3876 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3878 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3879 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3880 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 42 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1074 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 3881 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 42 run: read-character/parse-traces/main29 5: 43 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 43 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3907 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3909 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 43 run: end-of-stream?/parse-traces/main29 2: 43 => ((2 integer)) mem: ((2 integer)): 3910 <= 43 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3911 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3912 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 43 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3913 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 3938 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3940 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 3941 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3942 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 43 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1075 byte) (raw)) => e run: read-character/parse-traces/main29 4: #\e => ((4 character)) mem: ((4 character)): 3943 <= #\e run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 43 run: read-character/parse-traces/main29 5: 44 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 44 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => e run: parse-traces/main29 6: #\e => ((4 character)) mem: ((4 character)): 1215 <= #\e run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => e run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 3969 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 3971 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 44 run: end-of-stream?/parse-traces/main29 2: 44 => ((2 integer)) mem: ((2 integer)): 3972 <= 44 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 3973 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 3974 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 44 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 3975 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4000 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4002 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4003 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4004 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 44 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1076 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 4005 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 44 run: read-character/parse-traces/main29 5: 45 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 45 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4031 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4033 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 45 run: end-of-stream?/parse-traces/main29 2: 45 => ((2 integer)) mem: ((2 integer)): 4034 <= 45 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4035 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4036 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 45 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4037 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4062 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4064 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4065 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4066 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 45 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1077 byte) (raw)) => f run: read-character/parse-traces/main29 4: #\f => ((4 character)) mem: ((4 character)): 4067 <= #\f run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 45 run: read-character/parse-traces/main29 5: 46 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 46 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => f run: parse-traces/main29 6: #\f => ((4 character)) mem: ((4 character)): 1215 <= #\f run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => f run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4093 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4095 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 46 run: end-of-stream?/parse-traces/main29 2: 46 => ((2 integer)) mem: ((2 integer)): 4096 <= 46 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4097 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4098 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 46 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4099 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4124 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4126 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4127 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4128 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 46 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1078 byte) (raw)) => run: read-character/parse-traces/main29 4: #\newline => ((4 character)) mem: ((4 character)): 4129 <= #\newline run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 46 run: read-character/parse-traces/main29 5: 47 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 47 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\newline => ((4 character)) mem: ((4 character)): 1215 <= #\newline run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: t => ((5 boolean)) mem: ((5 boolean)): 1216 <= t run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => t run: parse-traces/main29 9: (((2 integer)) <- ((add)) ((2 integer)) ((1 literal))) mem: ((2 integer)) => 2 run: parse-traces/main29 9: 3 => ((2 integer)) mem: ((2 integer)): 1213 <= 3 run: parse-traces/main29 10: ((($print)) (( literal))) run: parse-traces/main29 11: ((($print)) ((2 integer))) mem: ((2 integer)) => 3 run: parse-traces/main29 12: ((($print)) (( literal))) run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4155 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4157 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 47 run: end-of-stream?/parse-traces/main29 2: 47 => ((2 integer)) mem: ((2 integer)): 4158 <= 47 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4159 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4160 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 47 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4161 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4186 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4188 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4189 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4190 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 47 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1079 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 4191 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 47 run: read-character/parse-traces/main29 5: 48 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 48 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4217 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4219 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 48 run: end-of-stream?/parse-traces/main29 2: 48 => ((2 integer)) mem: ((2 integer)): 4220 <= 48 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4221 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4222 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 48 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4223 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4248 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4250 <= 1208 schedule: scheduling read-character/parse-traces/main29 for further processing schedule: read-character/parse-traces/main29 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4251 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4252 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 48 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1080 byte) (raw)) => e run: read-character/parse-traces/main29 4: #\e => ((4 character)) mem: ((4 character)): 4253 <= #\e run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 48 run: read-character/parse-traces/main29 5: 49 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 49 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => e run: parse-traces/main29 6: #\e => ((4 character)) mem: ((4 character)): 1215 <= #\e run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => e run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4279 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4281 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 49 run: end-of-stream?/parse-traces/main29 2: 49 => ((2 integer)) mem: ((2 integer)): 4282 <= 49 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4283 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4284 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 49 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4285 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4310 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4312 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4313 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4314 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 49 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1081 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 4315 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 49 run: read-character/parse-traces/main29 5: 50 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 50 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4341 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4343 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 50 run: end-of-stream?/parse-traces/main29 2: 50 => ((2 integer)) mem: ((2 integer)): 4344 <= 50 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4345 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4346 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 50 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4347 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4372 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4374 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4375 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4376 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 50 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1082 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 4377 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 50 run: read-character/parse-traces/main29 5: 51 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 51 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4403 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4405 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 51 run: end-of-stream?/parse-traces/main29 2: 51 => ((2 integer)) mem: ((2 integer)): 4406 <= 51 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4407 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4408 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 51 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4409 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4434 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4436 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4437 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4438 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 51 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1083 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 4439 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 51 run: read-character/parse-traces/main29 5: 52 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 52 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4465 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4467 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 52 run: end-of-stream?/parse-traces/main29 2: 52 => ((2 integer)) mem: ((2 integer)): 4468 <= 52 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4469 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4470 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 52 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4471 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4496 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4498 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4499 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4500 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 52 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1084 byte) (raw)) => 1 run: read-character/parse-traces/main29 4: #\1 => ((4 character)) mem: ((4 character)): 4501 <= #\1 run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 52 run: read-character/parse-traces/main29 5: 53 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 53 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => 1 run: parse-traces/main29 6: #\1 => ((4 character)) mem: ((4 character)): 1215 <= #\1 run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => 1 run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4527 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4529 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 53 run: end-of-stream?/parse-traces/main29 2: 53 => ((2 integer)) mem: ((2 integer)): 4530 <= 53 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4531 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4532 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 53 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4533 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4558 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4560 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4561 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4562 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 53 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1085 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 4563 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 53 run: read-character/parse-traces/main29 5: 54 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 54 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4589 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4591 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 54 run: end-of-stream?/parse-traces/main29 2: 54 => ((2 integer)) mem: ((2 integer)): 4592 <= 54 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4593 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4594 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 54 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4595 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4620 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4622 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4623 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4624 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 54 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1086 byte) (raw)) => a run: read-character/parse-traces/main29 4: #\a => ((4 character)) mem: ((4 character)): 4625 <= #\a run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 54 run: read-character/parse-traces/main29 5: 55 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 55 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => a run: parse-traces/main29 6: #\a => ((4 character)) mem: ((4 character)): 1215 <= #\a run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => a run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4651 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4653 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 55 run: end-of-stream?/parse-traces/main29 2: 55 => ((2 integer)) mem: ((2 integer)): 4654 <= 55 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4655 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4656 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 55 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4657 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4682 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4684 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4685 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4686 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 55 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1087 byte) (raw)) => run: read-character/parse-traces/main29 4: #\newline => ((4 character)) mem: ((4 character)): 4687 <= #\newline run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 55 run: read-character/parse-traces/main29 5: 56 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 56 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\newline => ((4 character)) mem: ((4 character)): 1215 <= #\newline run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: t => ((5 boolean)) mem: ((5 boolean)): 1216 <= t run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => t run: parse-traces/main29 9: (((2 integer)) <- ((add)) ((2 integer)) ((1 literal))) mem: ((2 integer)) => 3 run: parse-traces/main29 9: 4 => ((2 integer)) mem: ((2 integer)): 1213 <= 4 run: parse-traces/main29 10: ((($print)) (( literal))) run: parse-traces/main29 11: ((($print)) ((2 integer))) mem: ((2 integer)) => 4 run: parse-traces/main29 12: ((($print)) (( literal))) run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4713 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4715 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 56 run: end-of-stream?/parse-traces/main29 2: 56 => ((2 integer)) mem: ((2 integer)): 4716 <= 56 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4717 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4718 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 56 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4719 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4744 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4746 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4747 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4748 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 56 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1088 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 4749 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 56 run: read-character/parse-traces/main29 5: 57 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 57 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4775 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4777 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 57 run: end-of-stream?/parse-traces/main29 2: 57 => ((2 integer)) mem: ((2 integer)): 4778 <= 57 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4779 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4780 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 57 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4781 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4806 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4808 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4809 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4810 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 57 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1089 byte) (raw)) => e run: read-character/parse-traces/main29 4: #\e => ((4 character)) mem: ((4 character)): 4811 <= #\e run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 57 run: read-character/parse-traces/main29 5: 58 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 58 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => e run: parse-traces/main29 6: #\e => ((4 character)) mem: ((4 character)): 1215 <= #\e run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => e run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4837 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4839 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 58 run: end-of-stream?/parse-traces/main29 2: 58 => ((2 integer)) mem: ((2 integer)): 4840 <= 58 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4841 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4842 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 58 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4843 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4868 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4870 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4871 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4872 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 58 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1090 byte) (raw)) => m run: read-character/parse-traces/main29 4: #\m => ((4 character)) mem: ((4 character)): 4873 <= #\m run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 58 run: read-character/parse-traces/main29 5: 59 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 59 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => m run: parse-traces/main29 6: #\m => ((4 character)) mem: ((4 character)): 1215 <= #\m run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => m run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4899 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4901 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 59 run: end-of-stream?/parse-traces/main29 2: 59 => ((2 integer)) mem: ((2 integer)): 4902 <= 59 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4903 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4904 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 59 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4905 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4930 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4932 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4933 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4934 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 59 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1091 byte) (raw)) => : run: read-character/parse-traces/main29 4: #\: => ((4 character)) mem: ((4 character)): 4935 <= #\: run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 59 run: read-character/parse-traces/main29 5: 60 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 60 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => : run: parse-traces/main29 6: #\: => ((4 character)) mem: ((4 character)): 1215 <= #\: run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => : run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 4961 => ((default-space space-address)) run: end-of-stream?/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: end-of-stream?/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4963 <= 1208 run: end-of-stream?/parse-traces/main29 2: (((2 integer)) <- ((get)) ((1 stream-address) (deref)) ((0 offset))) mem: ((1208 integer) (raw)) => 60 run: end-of-stream?/parse-traces/main29 2: 60 => ((2 integer)) mem: ((2 integer)): 4964 <= 60 run: end-of-stream?/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: end-of-stream?/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4965 <= 1031 run: end-of-stream?/parse-traces/main29 4: (((4 integer)) <- ((length)) ((3 string-address) (deref))) array-len: ((3 string-address) (deref)) mem: ((1031 integer) (raw)) => 145 run: end-of-stream?/parse-traces/main29 4: 145 => ((4 integer)) mem: ((4 integer)): 4966 <= 145 run: end-of-stream?/parse-traces/main29 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer))) mem: ((2 integer)) => 60 mem: ((4 integer)) => 145 run: end-of-stream?/parse-traces/main29 5: nil => ((5 boolean)) mem: ((5 boolean)): 4967 <= nil run: end-of-stream?/parse-traces/main29 6: (((reply)) ((5 boolean))) mem: ((5 boolean)) => nil run: parse-traces/main29 4: nil => ((3 boolean)) mem: ((3 boolean)): 1214 <= nil run: parse-traces/main29 5: (((jump-if)) ((3 boolean)) ((8 offset))) mem: ((3 boolean)) => nil run: parse-traces/main29 6: (((4 character)) <- ((read-character)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: read-character/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: read-character/parse-traces/main29 0: 4992 => ((default-space space-address)) run: read-character/parse-traces/main29 1: (((1 stream-address)) <- ((next-input))) arg: nil 0 (1208) run: read-character/parse-traces/main29 1: 1208 => ((1 stream-address)) mem: ((1 stream-address)): 4994 <= 1208 run: read-character/parse-traces/main29 2: (((2 integer-address)) <- ((get-address)) ((1 stream-address) (deref)) ((0 offset))) run: read-character/parse-traces/main29 2: 1208 => ((2 integer-address)) mem: ((2 integer-address)): 4995 <= 1208 run: read-character/parse-traces/main29 3: (((3 string-address)) <- ((get)) ((1 stream-address) (deref)) ((1 offset))) mem: ((1209 string-address) (raw)) => 1031 run: read-character/parse-traces/main29 3: 1031 => ((3 string-address)) mem: ((3 string-address)): 4996 <= 1031 run: read-character/parse-traces/main29 4: (((4 character)) <- ((index)) ((3 string-address) (deref)) ((2 integer-address) (deref))) mem: ((2 integer-address) (deref)) => 60 array-len: ((1031 string) (raw)) mem: ((1031 integer) (raw)) => 145 mem: ((1092 byte) (raw)) => run: read-character/parse-traces/main29 4: #\space => ((4 character)) mem: ((4 character)): 4997 <= #\space run: read-character/parse-traces/main29 5: (((2 integer-address) (deref)) <- ((add)) ((2 integer-address) (deref)) ((1 literal))) mem: ((2 integer-address) (deref)) => 60 run: read-character/parse-traces/main29 5: 61 => ((2 integer-address) (deref)) mem: ((2 integer-address) (deref)): 1208 <= 61 run: read-character/parse-traces/main29 6: (((reply)) ((4 character))) mem: ((4 character)) => run: parse-traces/main29 6: #\space => ((4 character)) mem: ((4 character)): 1215 <= #\space run: parse-traces/main29 7: (((5 boolean)) <- ((equal)) ((4 character)) (( literal))) mem: ((4 character)) => run: parse-traces/main29 7: nil => ((5 boolean)) mem: ((5 boolean)): 1216 <= nil run: parse-traces/main29 8: (((jump-unless)) ((5 boolean)) ((4 offset))) mem: ((5 boolean)) => nil run: parse-traces/main29 13: (((jump)) ((-10 offset))) run: parse-traces/main29 4: (((3 boolean)) <- ((end-of-stream?)) ((1 stream-address))) mem: ((1 stream-address)) => 1208 run: end-of-stream?/parse-traces/main29 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) run: end-of-stream?/parse-traces/main29 0: 5023 => ((default-space space-address)) run: end-of-stream?/parse-traces/mai
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 101run_sandboxed.cc</title>
<meta name="Generator" content="Vim/7.4">
<meta name="plugin-version" content="vim7.4_v2">
<meta name="syntax" content="cpp">
<meta name="settings" content="use_css,pre_wrap,no_foldcolumn,expand_tabs,prevent_copy=">
<meta name="colorscheme" content="minimal">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #eeeeee; background-color: #080808; }
body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color: #080808; }
* { font-size: 12pt; font-size: 1em; }
.Constant { color: #00a0a0; }
.cSpecial { color: #008000; }
.traceContains { color: #008000; }
.Comment { color: #9090ff; }
.Delimiter { color: #800080; }
.Special { color: #c00000; }
.Identifier { color: #fcb165; }
.Normal { color: #eeeeee; background-color: #080808; padding-bottom: 1px; }
.CommentedCode { color: #6c6c6c; }
-->
</style>
<script type='text/javascript'>
<!--
-->
</script>
</head>
<body>
<pre id='vimCodeElement'>
<span class="Comment">//: Helper for various programming environments: run arbitrary mu code and</span>
<span class="Comment">//: return some result in string form.</span>
<span class="Delimiter">:(scenario run_interactive_code)</span>
def main [
<span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">0</span>
<span class="Constant">2</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [<span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">34</span>]
run-sandboxed <span class="Constant">2</span>:text
<span class="Constant">3</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">1</span>:num/<span class="Special">raw</span>
]
<span class="traceContains">+mem: storing 34 in location 3</span>
<span class="Delimiter">:(scenario run_interactive_empty)</span>
def main [
<span class="Constant">1</span>:text<span class="Special"> <- </span>copy <span class="Constant">0</span>/unsafe
<span class="Constant">2</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
]
<span class="Comment"># result is null</span>
<span class="traceContains">+mem: storing 0 in location 2</span>
<span class="Comment">//: As the name suggests, 'run-sandboxed' will prevent certain operations that</span>
<span class="Comment">//: regular Mu code can perform.</span>
<span class="Delimiter">:(before "End Globals")</span>
<span class="Normal">bool</span> Sandbox_mode = <span class="Constant">false</span><span class="Delimiter">;</span>
<span class="Comment">//: for starters, users can't override 'main' when the environment is running</span>
<span class="Delimiter">:(before "End Load Recipe Name")</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>Sandbox_mode && result<span class="Delimiter">.</span>name == <span class="Constant">"main"</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
slurp_balanced_bracket<span class="Delimiter">(</span>in<span class="Delimiter">);</span>
<span class="Identifier">return</span> -<span class="Constant">1</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Comment">//: run code in 'interactive mode', i.e. with errors off and return:</span>
<span class="Comment">//: stringified output in case we want to print it to screen</span>
<span class="Comment">//: any errors encountered</span>
<span class="Comment">//: simulated screen any prints went to</span>
<span class="Comment">//: any 'app' layer traces generated</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
RUN_SANDBOXED<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"run-sandboxed"</span><span class="Delimiter">,</span> RUN_SANDBOXED<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> RUN_SANDBOXED: <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>SIZE<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
raise << maybe<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'run-sandboxed' requires exactly one ingredient, but got '"</span> << inst<span class="Delimiter">.</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_text<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span>
raise << maybe<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'run-sandboxed' should be a string, but got '"</span> << to_string<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">))</span> << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> RUN_SANDBOXED: <span class="Delimiter">{</span>
<span class="Normal">bool</span> new_code_pushed_to_stack = run_interactive<span class="Delimiter">(</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">));</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!new_code_pushed_to_stack<span class="Delimiter">)</span> <span class="Delimiter">{</span>
products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">5</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>trace_error_contents<span class="Delimiter">());</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">2</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">3</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>trace_app_contents<span class="Delimiter">());</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">4</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span> <span class="Comment">// completed</span>
run_code_end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span> <span class="Comment">// done with this instruction</span>
<span class="Delimiter">}</span>
<span class="Normal">else</span> <span class="Delimiter">{</span>
<span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// not done with caller; don't increment current_step_index()</span>
<span class="Delimiter">}</span>
<span class="Delimiter">}</span>
<span class="Comment">//: To show results in the sandbox Mu uses a hack: it saves the products</span>
<span class="Comment">//: returned by each instruction while Track_most_recent_products is true, and</span>
<span class="Comment">//: keeps the most recent such result around so that it can be returned as the</span>
<span class="Comment">//: result of a sandbox.</span>
<span class="Delimiter">:(before "End Globals")</span>
<span class="Normal">bool</span> Track_most_recent_products = <span class="Constant">false</span><span class="Delimiter">;</span>
string Most_recent_products<span class="Delimiter">;</span>
<span class="Delimiter">:(before "End Setup")</span>
Track_most_recent_products = <span class="Constant">false</span><span class="Delimiter">;</span>
Most_recent_products = <span class="Constant">""</span><span class="Delimiter">;</span>
<span class="Delimiter">:(before "End Globals")</span>
trace_stream* Save_trace_stream = <span class="Constant">NULL</span><span class="Delimiter">;</span>
string Save_trace_file<span class="Delimiter">;</span>
<span class="Delimiter">:(code)</span>
<span class="Comment">// reads a string, tries to call it as code (treating it as a test), saving</span>
<span class="Comment">// all errors.</span>
<span class="Comment">// returns true if successfully called (no errors found during load and transform)</span>
<span class="Normal">bool</span> run_interactive<span class="Delimiter">(</span><span class="Normal">int</span> address<span class="Delimiter">)</span> <span class="Delimiter">{</span>
assert<span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"interactive"</span><span class="Delimiter">)</span> && get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"interactive"</span><span class="Delimiter">)</span> != <span class="Constant">0</span><span class="Delimiter">);</span>
<span class="Comment">// try to sandbox the run as best you can</span>
<span class="Comment">// todo: test this</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!Current_scenario<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">1</span><span class="Delimiter">;</span> i < Reserved_for_tests<span class="Delimiter">;</span> ++i<span class="Delimiter">)</span>
Memory<span class="Delimiter">.</span>erase<span class="Delimiter">(</span>i<span class="Delimiter">);</span>
<span class="Delimiter">}</span>
string command = trim<span class="Delimiter">(</span>strip_comments<span class="Delimiter">(</span>read_mu_text<span class="Delimiter">(</span>address<span class="Delimiter">)));</span>
Name[get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"interactive"</span><span class="Delimiter">)</span>]<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
run_code_begin<span class="Delimiter">(</span><span class="Comment">/*</span><span class="Comment">should_stash_snapshots</span><span class="Comment">*/</span><span class="Constant">true</span><span class="Delimiter">);</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>command<span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span>
<span class="Comment">// don't kill the current routine on parse errors</span>
routine* save_current_routine = Current_routine<span class="Delimiter">;</span>
Current_routine = <span class="Constant">NULL</span><span class="Delimiter">;</span>
<span class="Comment">// call run(string) but without the scheduling</span>
load<span class="Delimiter">(</span>string<span class="Delimiter">(</span><span class="Constant">"recipe! interactive [</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">)</span> +
<span class="Constant">"new-default-space</span><span class="cSpecial">\n</span><span class="Constant">"</span> + <span class="Comment">// disable automatic abandon so tests can see changes</span>
<span class="Constant">"screen:&:screen <- next-ingredient</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"$start-tracking-products</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
command + <span class="Constant">"</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"$stop-tracking-products</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"return screen</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"]</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">);</span>
transform_all<span class="Delimiter">();</span>
Current_routine = save_current_routine<span class="Delimiter">;</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>trace_count<span class="Delimiter">(</span><span class="Constant">"error"</span><span class="Delimiter">)</span> > <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">false</span><span class="Delimiter">;</span>
<span class="Comment">// now call 'sandbox' which will run 'interactive' in a separate routine,</span>
<span class="Comment">// and wait for it</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>Save_trace_stream<span class="Delimiter">)</span> <span class="Delimiter">{</span>
++Save_trace_stream<span class="Delimiter">-></span>callstack_depth<span class="Delimiter">;</span>
trace<span class="Delimiter">(</span><span class="Constant">9999</span><span class="Delimiter">,</span> <span class="Constant">"trace"</span><span class="Delimiter">)</span> << <span class="Constant">"run-sandboxed: incrementing callstack depth to "</span> << Save_trace_stream<span class="Delimiter">-></span>callstack_depth << end<span class="Delimiter">();</span>
assert<span class="Delimiter">(</span>Save_trace_stream<span class="Delimiter">-></span>callstack_depth < <span class="Constant">9000</span><span class="Delimiter">);</span> <span class="Comment">// 9998-101 plus cushion</span>
<span class="Delimiter">}</span>
Current_routine<span class="Delimiter">-></span>calls<span class="Delimiter">.</span>push_front<span class="Delimiter">(</span>call<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"sandbox"</span><span class="Delimiter">)));</span>
<span class="Identifier">return</span> <span class="Constant">true</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Comment">//: Carefully update all state to exactly how it was -- including snapshots.</span>
<span class="Delimiter">:(before "End Globals")</span>
map<string<span class="Delimiter">,</span> recipe_ordinal> Recipe_ordinal_snapshot_stash<span class="Delimiter">;</span>
map<recipe_ordinal<span class="Delimiter">,</span> recipe> Recipe_snapshot_stash<span class="Delimiter">;</span>
map<string<span class="Delimiter">,</span> type_ordinal> Type_ordinal_snapshot_stash<span class="Delimiter">;</span>
map<type_ordinal<span class="Delimiter">,</span> type_info> Type_snapshot_stash<span class="Delimiter">;</span>
map<recipe_ordinal<span class="Delimiter">,</span> map<string<span class="Delimiter">,</span> <span class="Normal">int</span>> > Name_snapshot_stash<span class="Delimiter">;</span>
map<string<span class="Delimiter">,</span> vector<recipe_ordinal> > Recipe_variants_snapshot_stash<span class="Delimiter">;</span>
map<string<span class="Delimiter">,</span> type_tree*> Type_abbreviations_snapshot_stash<span class="Delimiter">;</span>
<span class="Delimiter">:(code)</span>
<span class="Normal">void</span> run_code_begin<span class="Delimiter">(</span><span class="Normal">bool</span> should_stash_snapshots<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Comment">// stuff to undo later, in run_code_end()</span>
Hide_errors = <span class="Constant">true</span><span class="Delimiter">;</span>
Disable_redefine_checks = <span class="Constant">true</span><span class="Delimiter">;</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>should_stash_snapshots<span class="Delimiter">)</span>
stash_snapshots<span class="Delimiter">();</span>
Save_trace_stream = Trace_stream<span class="Delimiter">;</span>
Trace_stream = <span class="Normal">new</span> trace_stream<span class="Delimiter">;</span>
Trace_stream<span class="Delimiter">-></span>collect_depth = App_depth<span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Normal">void</span> run_code_end<span class="Delimiter">()</span> <span class="Delimiter">{</span>
Hide_errors = <span class="Constant">false</span><span class="Delimiter">;</span>
Disable_redefine_checks = <span class="Constant">false</span><span class="Delimiter">;</span>
<span class="CommentedCode">//? ofstream fout("sandbox.log");</span>
<span class="CommentedCode">//? fout << Trace_stream->readable_contents("");</span>
<span class="CommentedCode">//? fout.close();</span>
<span class="Normal">delete</span> Trace_stream<span class="Delimiter">;</span>
Trace_stream = Save_trace_stream<span class="Delimiter">;</span>
Save_trace_stream = <span class="Constant">NULL</span><span class="Delimiter">;</span>
Save_trace_file<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Recipe<span class="Delimiter">.</span>erase<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"interactive"</span><span class="Delimiter">));</span> <span class="Comment">// keep past sandboxes from inserting errors</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!Recipe_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">())</span>
unstash_snapshots<span class="Delimiter">();</span>
<span class="Delimiter">}</span>
<span class="Comment">// keep sync'd with save_snapshots and restore_snapshots</span>
<span class="Normal">void</span> stash_snapshots<span class="Delimiter">()</span> <span class="Delimiter">{</span>
assert<span class="Delimiter">(</span>Recipe_ordinal_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Recipe_ordinal_snapshot_stash = Recipe_ordinal_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Recipe_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Recipe_snapshot_stash = Recipe_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Type_ordinal_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Type_ordinal_snapshot_stash = Type_ordinal_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Type_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Type_snapshot_stash = Type_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Name_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Name_snapshot_stash = Name_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Recipe_variants_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Recipe_variants_snapshot_stash = Recipe_variants_snapshot<span class="Delimiter">;</span>
assert<span class="Delimiter">(</span>Type_abbreviations_snapshot_stash<span class="Delimiter">.</span>empty<span class="Delimiter">());</span>
Type_abbreviations_snapshot_stash = Type_abbreviations_snapshot<span class="Delimiter">;</span>
save_snapshots<span class="Delimiter">();</span>
<span class="Delimiter">}</span>
<span class="Normal">void</span> unstash_snapshots<span class="Delimiter">()</span> <span class="Delimiter">{</span>
restore_snapshots<span class="Delimiter">();</span>
Recipe_ordinal_snapshot = Recipe_ordinal_snapshot_stash<span class="Delimiter">;</span> Recipe_ordinal_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Recipe_snapshot = Recipe_snapshot_stash<span class="Delimiter">;</span> Recipe_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Type_ordinal_snapshot = Type_ordinal_snapshot_stash<span class="Delimiter">;</span> Type_ordinal_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Type_snapshot = Type_snapshot_stash<span class="Delimiter">;</span> Type_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Name_snapshot = Name_snapshot_stash<span class="Delimiter">;</span> Name_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Recipe_variants_snapshot = Recipe_variants_snapshot_stash<span class="Delimiter">;</span> Recipe_variants_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
Type_abbreviations_snapshot = Type_abbreviations_snapshot_stash<span class="Delimiter">;</span> Type_abbreviations_snapshot_stash<span class="Delimiter">.</span>clear<span class="Delimiter">();</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Load Recipes")</span>
load<span class="Delimiter">(</span>string<span class="Delimiter">(</span>
<span class="Constant">"recipe interactive [</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">)</span> + <span class="Comment">// just a dummy version to initialize the Recipe_ordinal and so on</span>
<span class="Constant">"]</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"recipe sandbox [</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"local-scope</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"screen:&:screen <- new-fake-screen 30, 5</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"routine-id:num <- start-running interactive, screen</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"limit-time routine-id, 100000/instructions</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"wait-for-routine routine-id</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"instructions-run:num <- number-of-instructions routine-id</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"stash instructions-run [instructions run]</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"sandbox-state:num <- routine-state routine-id</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"completed?:bool <- equal sandbox-state, 1/completed</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"output:text <- $most-recent-products</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"errors:text <- save-errors</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"stashes:text <- save-app-trace</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"$cleanup-run-sandboxed</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"return output, errors, screen, stashes, completed?</span><span class="cSpecial">\n</span><span class="Constant">"</span> +
<span class="Constant">"]</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">);</span>
<span class="Comment">//: adjust errors in the sandbox</span>
<span class="Delimiter">:(after "string maybe(string s)")</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>s == <span class="Constant">"interactive"</span><span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">""</span><span class="Delimiter">;</span>
<span class="Delimiter">:(scenario run_interactive_comments)</span>
def main [
<span class="Constant">1</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [<span class="Comment"># ab</span>
add <span class="Constant">2</span><span class="Delimiter">,</span> <span class="Constant">2</span>]
<span class="Constant">2</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
<span class="Constant">3</span>:@:<span class="Normal">char</span><span class="Special"> <- </span>copy *<span class="Constant">2</span>:text
]
<span class="traceContains">+mem: storing 52 in location 4</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
_START_TRACKING_PRODUCTS<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$start-tracking-products"</span><span class="Delimiter">,</span> _START_TRACKING_PRODUCTS<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> _START_TRACKING_PRODUCTS: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> _START_TRACKING_PRODUCTS: <span class="Delimiter">{</span>
Track_most_recent_products = <span class="Constant">true</span><span class="Delimiter">;</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
_STOP_TRACKING_PRODUCTS<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$stop-tracking-products"</span><span class="Delimiter">,</span> _STOP_TRACKING_PRODUCTS<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> _STOP_TRACKING_PRODUCTS: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> _STOP_TRACKING_PRODUCTS: <span class="Delimiter">{</span>
Track_most_recent_products = <span class="Constant">false</span><span class="Delimiter">;</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
_MOST_RECENT_PRODUCTS<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$most-recent-products"</span><span class="Delimiter">,</span> _MOST_RECENT_PRODUCTS<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> _MOST_RECENT_PRODUCTS: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> _MOST_RECENT_PRODUCTS: <span class="Delimiter">{</span>
products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>new_mu_text<span class="Delimiter">(</span>Most_recent_products<span class="Delimiter">));</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
SAVE_ERRORS<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"save-errors"</span><span class="Delimiter">,</span> SAVE_ERRORS<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> SAVE_ERRORS: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> SAVE_ERRORS: <span class="Delimiter">{</span>
products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>trace_error_contents<span class="Delimiter">());</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
SAVE_APP_TRACE<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"save-app-trace"</span><span class="Delimiter">,</span> SAVE_APP_TRACE<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> SAVE_APP_TRACE: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> SAVE_APP_TRACE: <span class="Delimiter">{</span>
products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>trace_app_contents<span class="Delimiter">());</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
_CLEANUP_RUN_SANDBOXED<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$cleanup-run-sandboxed"</span><span class="Delimiter">,</span> _CLEANUP_RUN_SANDBOXED<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> _CLEANUP_RUN_SANDBOXED: <span class="Delimiter">{</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> _CLEANUP_RUN_SANDBOXED: <span class="Delimiter">{</span>
run_code_end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(scenario "run_interactive_converts_result_to_text")</span>
def main [
<span class="Comment"># try to interactively add 2 and 2</span>
<span class="Constant">1</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [add <span class="Constant">2</span><span class="Delimiter">,</span> <span class="Constant">2</span>]
<span class="Constant">2</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
<span class="Constant">10</span>:@:<span class="Normal">char</span><span class="Special"> <- </span>copy <span class="Constant">2</span>:text/lookup
]
<span class="Comment"># first letter in the output should be '4' in unicode</span>
<span class="traceContains">+mem: storing 52 in location 11</span>
<span class="Delimiter">:(scenario "run_interactive_returns_text")</span>
def main [
<span class="Comment"># try to interactively add 2 and 2</span>
<span class="Constant">1</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [
<span class="Normal">x</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [a]
<span class="Normal">y</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [b]
<span class="Normal">z</span>:text<span class="Special"> <- </span>append x:text<span class="Delimiter">,</span> y:text
]
<span class="Constant">2</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
<span class="Constant">10</span>:@:<span class="Normal">char</span><span class="Special"> <- </span>copy <span class="Constant">2</span>:text/lookup
]
<span class="Comment"># output contains "ab"</span>
<span class="traceContains">+mem: storing 97 in location 11</span>
<span class="traceContains">+mem: storing 98 in location 12</span>
<span class="Delimiter">:(scenario "run_interactive_returns_errors")</span>
def main [
<span class="Comment"># run a command that generates an error</span>
<span class="Constant">1</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [x:num<span class="Special"> <- </span>copy <span class="Constant">34</span>
get x:num<span class="Delimiter">,</span> foo:offset]
<span class="Constant">2</span>:text<span class="Delimiter">,</span> <span class="Constant">3</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
<span class="Constant">10</span>:@:<span class="Normal">char</span><span class="Special"> <- </span>copy <span class="Constant">3</span>:text/lookup
]
<span class="Comment"># error should be "unknown element foo in container number"</span>
<span class="traceContains">+mem: storing 117 in location 11</span>
<span class="traceContains">+mem: storing 110 in location 12</span>
<span class="traceContains">+mem: storing 107 in location 13</span>
<span class="traceContains">+mem: storing 110 in location 14</span>
<span class="Comment"># ...</span>
<span class="Delimiter">:(scenario run_interactive_with_comment)</span>
def main [
<span class="Comment"># 2 instructions, with a comment after the first</span>
<span class="Constant">1</span>:&:@:num<span class="Special"> <- </span><span class="Normal">new</span> [a:num<span class="Special"> <- </span>copy <span class="Constant">0</span> <span class="Comment"># abc</span>
<span class="Normal">b</span>:num<span class="Special"> <- </span>copy <span class="Constant">0</span>
]
<span class="Constant">2</span>:text<span class="Delimiter">,</span> <span class="Constant">3</span>:text<span class="Special"> <- </span>run-sandboxed <span class="Constant">1</span>:text
]
<span class="Comment"># no errors</span>
<span class="traceContains">+mem: storing 0 in location 3</span>
<span class="Delimiter">:(before "End Running One Instruction")</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>Track_most_recent_products<span class="Delimiter">)</span> <span class="Delimiter">{</span>
track_most_recent_products<span class="Delimiter">(</span>current_instruction<span class="Delimiter">(),</span> products<span class="Delimiter">);</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(code)</span>
<span class="Normal">void</span> track_most_recent_products<span class="Delimiter">(</span><span class="Normal">const</span> instruction& instruction<span class="Delimiter">,</span> <span class="Normal">const</span> vector<vector<<span class="Normal">double</span>> >& products<span class="Delimiter">)</span> <span class="Delimiter">{</span>
ostringstream out<span class="Delimiter">;</span>
<span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < SIZE<span class="Delimiter">(</span>products<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Comment">// A sandbox can print a string result, but only if it is actually saved</span>
<span class="Comment">// to a variable in the sandbox, because otherwise the results are</span>
<span class="Comment">// reclaimed before the sandbox sees them. So you get these interactions</span>
<span class="Comment">// in the sandbox:</span>
<span class="Comment">//</span>
<span class="Comment">// new [abc]</span>
<span class="Comment">// => <address></span>
<span class="Comment">//</span>
<span class="Comment">// x:text <- new [abc]</span>
<span class="Comment">// => abc</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>i < SIZE<span class="Delimiter">(</span>instruction<span class="Delimiter">.</span>products<span class="Delimiter">))</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>is_mu_text<span class="Delimiter">(</span>instruction<span class="Delimiter">.</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!scalar<span class="Delimiter">(</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span> <span class="Comment">// error handled elsewhere</span>
out << read_mu_text<span class="Delimiter">(</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">))</span> << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span class="Identifier">continue</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">}</span>
<span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> j = <span class="Constant">0</span><span class="Delimiter">;</span> j < SIZE<span class="Delimiter">(</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">));</span> ++j<span class="Delimiter">)</span>
out << no_scientific<span class="Delimiter">(</span>products<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">).</span>at<span class="Delimiter">(</span>j<span class="Delimiter">))</span> << <span class="Constant">' '</span><span class="Delimiter">;</span>
out << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
Most_recent_products = out<span class="Delimiter">.</span>str<span class="Delimiter">();</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(code)</span>
string strip_comments<span class="Delimiter">(</span>string in<span class="Delimiter">)</span> <span class="Delimiter">{</span>
ostringstream result<span class="Delimiter">;</span>
<span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < SIZE<span class="Delimiter">(</span>in<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>in<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">)</span> != <span class="Constant">'#'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
result << in<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span>
<span class="Delimiter">}</span>
<span class="Normal">else</span> <span class="Delimiter">{</span>
<span class="Normal">while</span> <span class="Delimiter">(</span>i+<span class="Constant">1</span> < SIZE<span class="Delimiter">(</span>in<span class="Delimiter">)</span> && in<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i+<span class="Constant">1</span><span class="Delimiter">)</span> != <span class="cSpecial">'\n'</span><span class="Delimiter">)</span>
++i<span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">}</span>
<span class="Identifier">return</span> result<span class="Delimiter">.</span>str<span class="Delimiter">();</span>
<span class="Delimiter">}</span>
<span class="Normal">int</span> stringified_value_of_location<span class="Delimiter">(</span><span class="Normal">int</span> address<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Comment">// convert to string</span>
ostringstream out<span class="Delimiter">;</span>
out << no_scientific<span class="Delimiter">(</span>get_or_insert<span class="Delimiter">(</span>Memory<span class="Delimiter">,</span> address<span class="Delimiter">));</span>
<span class="Identifier">return</span> new_mu_text<span class="Delimiter">(</span>out<span class="Delimiter">.</span>str<span class="Delimiter">());</span>
<span class="Delimiter">}</span>
<span class="Normal">int</span> trace_error_contents<span class="Delimiter">()</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!Trace_stream<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span>
ostringstream out<span class="Delimiter">;</span>
<span class="Normal">for</span> <span class="Delimiter">(</span>vector<trace_line>::iterator p = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>begin<span class="Delimiter">();</span> p != Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>end<span class="Delimiter">();</span> ++p<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>p<span class="Delimiter">-></span>label != <span class="Constant">"error"</span><span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span>
out << p<span class="Delimiter">-></span>contents<span class="Delimiter">;</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>*--p<span class="Delimiter">-></span>contents<span class="Delimiter">.</span>end<span class="Delimiter">()</span> != <span class="cSpecial">'\n'</span><span class="Delimiter">)</span> out << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
string result = out<span class="Delimiter">.</span>str<span class="Delimiter">();</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>result<span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span>
truncate<span class="Delimiter">(</span>result<span class="Delimiter">);</span>
<span class="Identifier">return</span> new_mu_text<span class="Delimiter">(</span>result<span class="Delimiter">);</span>
<span class="Delimiter">}</span>
<span class="Normal">int</span> trace_app_contents<span class="Delimiter">()</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!Trace_stream<span class="Delimiter">)</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span>
ostringstream out<span class="Delimiter">;</span>
<span class="Normal">for</span> <span class="Delimiter">(</span>vector<trace_line>::iterator p = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>begin<span class="Delimiter">();</span> p != Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>end<span class="Delimiter">();</span> ++p<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>p<span class="Delimiter">-></span>depth != App_depth<span class="Delimiter">)</span> <span class="Identifier">continue</span><span class="Delimiter">;</span>
out << p<span class="Delimiter">-></span>contents<span class="Delimiter">;</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>*--p<span class="Delimiter">-></span>contents<span class="Delimiter">.</span>end<span class="Delimiter">()</span> != <span class="cSpecial">'\n'</span><span class="Delimiter">)</span> out << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
string result = out<span class="Delimiter">.</span>str<span class="Delimiter">();</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>result<span class="Delimiter">.</span>empty<span class="Delimiter">())</span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span>
truncate<span class="Delimiter">(</span>result<span class="Delimiter">);</span>
<span class="Identifier">return</span> new_mu_text<span class="Delimiter">(</span>result<span class="Delimiter">);</span>
<span class="Delimiter">}</span>
<span class="Normal">void</span> truncate<span class="Delimiter">(</span>string& x<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>SIZE<span class="Delimiter">(</span>x<span class="Delimiter">)</span> > <span class="Constant">1024</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
x<span class="Delimiter">.</span>erase<span class="Delimiter">(</span><span class="Constant">1024</span><span class="Delimiter">);</span>
*x<span class="Delimiter">.</span>rbegin<span class="Delimiter">()</span> = <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
*++x<span class="Delimiter">.</span>rbegin<span class="Delimiter">()</span> = <span class="Constant">'.'</span><span class="Delimiter">;</span>
*++++x<span class="Delimiter">.</span>rbegin<span class="Delimiter">()</span> = <span class="Constant">'.'</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">}</span>
<span class="Comment">//: simpler version of run-sandboxed: doesn't do any running, just loads</span>
<span class="Comment">//: recipes and reports errors.</span>
<span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
RELOAD<span class="Delimiter">,</span>
<span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
put<span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"reload"</span><span class="Delimiter">,</span> RELOAD<span class="Delimiter">);</span>
<span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span class="Normal">case</span> RELOAD: <span class="Delimiter">{</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>SIZE<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">)</span> != <span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
raise << maybe<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"'reload' requires exactly one ingredient, but got '"</span> << inst<span class="Delimiter">.</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Normal">if</span> <span class="Delimiter">(</span>!is_mu_text<span class="Delimiter">(</span>inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">)))</span> <span class="Delimiter">{</span>
raise << maybe<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Recipe<span class="Delimiter">,</span> r<span class="Delimiter">).</span>name<span class="Delimiter">)</span> << <span class="Constant">"first ingredient of 'reload' should be a string, but got '"</span> << inst<span class="Delimiter">.</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>original_string << <span class="Constant">"'</span><span class="cSpecial">\n</span><span class="Constant">"</span> << end<span class="Delimiter">();</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span class="Normal">case</span> RELOAD: <span class="Delimiter">{</span>
restore_non_recipe_snapshots<span class="Delimiter">();</span>
string code = read_mu_text<span class="Delimiter">(</span>ingredients<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">));</span>
run_code_begin<span class="Delimiter">(</span><span class="Comment">/*</span><span class="Comment">should_stash_snapshots</span><span class="Comment">*/</span><span class="Constant">false</span><span class="Delimiter">);</span>
routine* save_current_routine = Current_routine<span class="Delimiter">;</span>
Current_routine = <span class="Constant">NULL</span><span class="Delimiter">;</span>
Sandbox_mode = <span class="Constant">true</span><span class="Delimiter">;</span>
vector<recipe_ordinal> recipes_reloaded = load<span class="Delimiter">(</span>code<span class="Delimiter">);</span>
transform_all<span class="Delimiter">();</span>
Trace_stream<span class="Delimiter">-></span>newline<span class="Delimiter">();</span> <span class="Comment">// flush trace</span>
Sandbox_mode = <span class="Constant">false</span><span class="Delimiter">;</span>
Current_routine = save_current_routine<span class="Delimiter">;</span>
products<span class="Delimiter">.</span>resize<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
products<span class="Delimiter">.</span>at<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">).</span>push_back<span class="Delimiter">(</span>trace_error_contents<span class="Delimiter">());</span>
run_code_end<span class="Delimiter">();</span> <span class="Comment">// wait until we're done with the trace contents</span>
<span class="Identifier">break</span><span class="Delimiter">;</span>
<span class="Delimiter">}</span>
<span class="Delimiter">:(scenario reload_continues_past_error)</span>
def main [
local-scope
<span class="Normal">x</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [recipe foo [
get <span class="Constant">1234</span>:num<span class="Delimiter">,</span> foo:offset
]]
reload x
<span class="Constant">1</span>:num/<span class="Special">raw <- </span>copy <span class="Constant">34</span>
]
<span class="traceContains">+mem: storing 34 in location 1</span>
<span class="Delimiter">:(scenario reload_can_repeatedly_load_container_definitions)</span>
<span class="Comment"># define a container and try to create it (merge requires knowing container size)</span>
def main [
local-scope
<span class="Normal">x</span>:text<span class="Special"> <- </span><span class="Normal">new</span> [
container foo [
<span class="Normal">x</span>:num
<span class="Normal">y</span>:num
]
recipe bar [
local-scope
<span class="Normal">x</span>:foo<span class="Special"> <- </span>merge <span class="Constant">34</span><span class="Delimiter">,</span> <span class="Constant">35</span>
]
]
<span class="Comment"># save warning addresses in locations of type 'number' to avoid spurious changes to them due to 'abandon'</span>
<span class="Constant">1</span>:num/<span class="Special">raw <- </span>reload x
<span class="Constant">2</span>:num/<span class="Special">raw <- </span>reload x
]
<span class="Comment"># no errors on either load</span>
<span class="traceContains">+mem: storing 0 in location 1</span>
<span class="traceContains">+mem: storing 0 in location 2</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->