summary refs log tree commit diff stats
path: root/doc/pydoc/test.tc_displayable.html
blob: a1ebcf8919ef93c759205b1a7ab9d14219488c68 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html><head><title>Python: module test.tc_displayable</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head><body bgcolor="#f0f0f8">

<table width="100%" cellspacing=0 cellpadding=2 border=0 summary="heading">
<tr bgcolor="#7799ee">
<td valign=bottom>&nbsp;<br>
<font color="#ffffff" face="helvetica, arial">&nbsp;<br><big><big><strong><a href="test.html"><font color="#ffffff">test</font></a>.tc_displayable</strong></big></big></font></td
><td align=right valign=bottom
><font color="#ffffff" face="helvetica, arial"><a href=".">index</a><br><a href="file:/home/hut/work/ranger/test/tc_displayable.py">/home/hut/work/ranger/test/tc_displayable.py</a></font></td></tr></table>
    <p></p>
<p>
<table width="100%" cellspacing=0 cellpadding=2 border=0 summary="section">
<tr bgcolor="#aa55cc">
<td colspan=3 valign=bottom>&nbsp;<br>
<font color="#ffffff" face="helvetica, arial"><big><strong>Modules</strong></big></font></td></tr>
    
<tr><td bgcolor="#aa55cc"><tt>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</tt></td><td>&nbsp;</td>
<td width="100%"><table width="100%" summary="list"><tr><td width="25%" valign=top><a href="curses.html">curses</a><br>
</td><td width="25%" valign=top><a href="unittest.html">unittest</a><br>
</td><td width="25%" valign=top></td><td width="25%" valign=top></td></tr></table></td></tr></table><p>
<table width="100%" cellspacing=0 cellpadding=2 border=0 summary="section">
<tr bgcolor="#ee77aa">
<td colspan=3 valign=bottom>&nbsp;<br>
<font color="#ffffff" face="helvetica, arial"><big><strong>Classes</strong></big></font></td></tr>
    
<tr><td bgcolor="#ee77aa"><tt>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</tt></td><td>&nbsp;</td>
<td width="100%"><dl>
<dt><font face="helvetica, arial"><a href="unittest.html#TestCase">unittest.TestCase</a>(<a href="builtins.html#object">builtins.object</a>)
</font></dt><dd>
<dl>
<dt><font face="helvetica, arial"><a href="test.tc_displayable.html#TestDisplayable">TestDisplayable</a>
</font></dt><dt><font face="helvetica, arial"><a href="test.tc_displayable.html#TestDisplayableContainer">TestDisplayableContainer</a>
</font></dt></dl>
</dd>
</dl>
 <p>
<table width="100%" cellspacing=0 cellpadding=2 border=0 summary="section">
<tr bgcolor="#ffc8d8">
<td colspan=3 valign=bottom>&nbsp;<br>
<font color="#000000" face="helvetica, arial"><a name="TestDisplayable">class <strong>TestDisplayable</strong></a>(<a href="unittest.html#TestCase">unittest.TestCase</a>)</font></td></tr>
    
<tr><td bgcolor="#ffc8d8"><tt>&nbsp;&nbsp;&nbsp;</tt></td><td>&nbsp;</td>
<td width="100%"><dl><dt>Method resolution order:</dt>
<dd><a href="test.tc_displayable.html#TestDisplayable">TestDisplayable</a></dd>
<dd><a href="unittest.html#TestCase">unittest.TestCase</a></dd>
<dd><a href="builtins.html#object">builtins.object</a></dd>
</dl>
<hr>
Methods defined here:<br>
<dl><dt><a name="TestDisplayable-setUp"><strong>setUp</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-tearDown"><strong>tearDown</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-test_boundaries"><strong>test_boundaries</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-test_colorscheme"><strong>test_colorscheme</strong></a>(self)</dt></dl>

<hr>
Methods inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><a name="TestDisplayable-__call__"><strong>__call__</strong></a>(self, *args, **kwds)</dt></dl>

<dl><dt><a name="TestDisplayable-__eq__"><strong>__eq__</strong></a>(self, other)</dt></dl>

<dl><dt><a name="TestDisplayable-__hash__"><strong>__hash__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-__init__"><strong>__init__</strong></a>(self, methodName<font color="#909090">='runTest'</font>)</dt><dd><tt>Create&nbsp;an&nbsp;instance&nbsp;of&nbsp;the&nbsp;class&nbsp;that&nbsp;will&nbsp;use&nbsp;the&nbsp;named&nbsp;test<br>
method&nbsp;when&nbsp;executed.&nbsp;Raises&nbsp;a&nbsp;ValueError&nbsp;if&nbsp;the&nbsp;instance&nbsp;does<br>
not&nbsp;have&nbsp;a&nbsp;method&nbsp;with&nbsp;the&nbsp;specified&nbsp;name.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-__ne__"><strong>__ne__</strong></a>(self, other)</dt></dl>

<dl><dt><a name="TestDisplayable-__repr__"><strong>__repr__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-__str__"><strong>__str__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-addCleanup"><strong>addCleanup</strong></a>(self, function, *args, **kwargs)</dt><dd><tt>Add&nbsp;a&nbsp;function,&nbsp;with&nbsp;arguments,&nbsp;to&nbsp;be&nbsp;called&nbsp;when&nbsp;the&nbsp;test&nbsp;is<br>
completed.&nbsp;Functions&nbsp;added&nbsp;are&nbsp;called&nbsp;on&nbsp;a&nbsp;LIFO&nbsp;basis&nbsp;and&nbsp;are<br>
called&nbsp;after&nbsp;tearDown&nbsp;on&nbsp;test&nbsp;failure&nbsp;or&nbsp;success.<br>
&nbsp;<br>
Cleanup&nbsp;items&nbsp;are&nbsp;called&nbsp;even&nbsp;if&nbsp;setUp&nbsp;fails&nbsp;(unlike&nbsp;tearDown).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-addTypeEqualityFunc"><strong>addTypeEqualityFunc</strong></a>(self, typeobj, function)</dt><dd><tt>Add&nbsp;a&nbsp;type&nbsp;specific&nbsp;assertEqual&nbsp;style&nbsp;function&nbsp;to&nbsp;compare&nbsp;a&nbsp;type.<br>
&nbsp;<br>
This&nbsp;method&nbsp;is&nbsp;for&nbsp;use&nbsp;by&nbsp;<a href="unittest.html#TestCase">TestCase</a>&nbsp;subclasses&nbsp;that&nbsp;need&nbsp;to&nbsp;register<br>
their&nbsp;own&nbsp;type&nbsp;equality&nbsp;functions&nbsp;to&nbsp;provide&nbsp;nicer&nbsp;error&nbsp;messages.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;typeobj:&nbsp;The&nbsp;data&nbsp;type&nbsp;to&nbsp;call&nbsp;this&nbsp;function&nbsp;on&nbsp;when&nbsp;both&nbsp;values<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;are&nbsp;of&nbsp;the&nbsp;same&nbsp;type&nbsp;in&nbsp;<a href="#TestDisplayable-assertEqual">assertEqual</a>().<br>
&nbsp;&nbsp;&nbsp;&nbsp;function:&nbsp;The&nbsp;callable&nbsp;taking&nbsp;two&nbsp;arguments&nbsp;and&nbsp;an&nbsp;optional<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg=&nbsp;argument&nbsp;that&nbsp;raises&nbsp;self.<strong>failureException</strong>&nbsp;with&nbsp;a<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;useful&nbsp;error&nbsp;message&nbsp;when&nbsp;the&nbsp;two&nbsp;arguments&nbsp;are&nbsp;not&nbsp;equal.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertAlmostEqual"><strong>assertAlmostEqual</strong></a>(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertAlmostEquals"><strong>assertAlmostEquals</strong></a> = assertAlmostEqual(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertDictContainsSubset"><strong>assertDictContainsSubset</strong></a>(self, expected, actual, msg<font color="#909090">=None</font>)</dt><dd><tt>Checks&nbsp;whether&nbsp;actual&nbsp;is&nbsp;a&nbsp;superset&nbsp;of&nbsp;expected.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertDictEqual"><strong>assertDictEqual</strong></a>(self, d1, d2, msg<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayable-assertEqual"><strong>assertEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertEquals"><strong>assertEquals</strong></a> = assertEqual(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertFalse"><strong>assertFalse</strong></a>(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;if&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertGreater"><strong>assertGreater</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;&gt;&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertGreaterEqual"><strong>assertGreaterEqual</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;&gt;=&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertIn"><strong>assertIn</strong></a>(self, member, container, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;in&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertIs"><strong>assertIs</strong></a>(self, expr1, expr2, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;is&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertIsNone"><strong>assertIsNone</strong></a>(self, obj, msg<font color="#909090">=None</font>)</dt><dd><tt>Same&nbsp;as&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(obj&nbsp;is&nbsp;None),&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertIsNot"><strong>assertIsNot</strong></a>(self, expr1, expr2, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;is&nbsp;not&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertIsNotNone"><strong>assertIsNotNone</strong></a>(self, obj, msg<font color="#909090">=None</font>)</dt><dd><tt>Included&nbsp;for&nbsp;symmetry&nbsp;with&nbsp;assertIsNone.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertLess"><strong>assertLess</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;&lt;&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertLessEqual"><strong>assertLessEqual</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;&lt;=&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertListEqual"><strong>assertListEqual</strong></a>(self, list1, list2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;list-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;list1:&nbsp;The&nbsp;first&nbsp;list&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;list2:&nbsp;The&nbsp;second&nbsp;list&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertMultiLineEqual"><strong>assertMultiLineEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Assert&nbsp;that&nbsp;two&nbsp;multi-line&nbsp;strings&nbsp;are&nbsp;equal.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertNotAlmostEqual"><strong>assertNotAlmostEqual</strong></a>(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertNotAlmostEquals"><strong>assertNotAlmostEquals</strong></a> = assertNotAlmostEqual(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertNotEqual"><strong>assertNotEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertNotEquals"><strong>assertNotEquals</strong></a> = assertNotEqual(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertNotIn"><strong>assertNotIn</strong></a>(self, member, container, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayable-assertTrue">assertTrue</a>(a&nbsp;not&nbsp;in&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertRaises"><strong>assertRaises</strong></a>(self, excClass, callableObj<font color="#909090">=None</font>, *args, **kwargs)</dt><dd><tt>Fail&nbsp;unless&nbsp;an&nbsp;exception&nbsp;of&nbsp;class&nbsp;excClass&nbsp;is&nbsp;thrown<br>
by&nbsp;callableObj&nbsp;when&nbsp;invoked&nbsp;with&nbsp;arguments&nbsp;args&nbsp;and&nbsp;keyword<br>
arguments&nbsp;kwargs.&nbsp;If&nbsp;a&nbsp;different&nbsp;type&nbsp;of&nbsp;exception&nbsp;is<br>
thrown,&nbsp;it&nbsp;will&nbsp;not&nbsp;be&nbsp;caught,&nbsp;and&nbsp;the&nbsp;test&nbsp;case&nbsp;will&nbsp;be<br>
deemed&nbsp;to&nbsp;have&nbsp;suffered&nbsp;an&nbsp;error,&nbsp;exactly&nbsp;as&nbsp;for&nbsp;an<br>
unexpected&nbsp;exception.<br>
&nbsp;<br>
If&nbsp;called&nbsp;with&nbsp;callableObj&nbsp;omitted&nbsp;or&nbsp;None,&nbsp;will&nbsp;return&nbsp;a<br>
context&nbsp;object&nbsp;used&nbsp;like&nbsp;this::<br>
&nbsp;<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;with&nbsp;<a href="#TestDisplayable-assertRaises">assertRaises</a>(some_error_class):<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do_something()</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertRaisesRegexp"><strong>assertRaisesRegexp</strong></a>(self, expected_exception, expected_regexp, callable_obj<font color="#909090">=None</font>, *args, **kwargs)</dt><dd><tt>Asserts&nbsp;that&nbsp;the&nbsp;message&nbsp;in&nbsp;a&nbsp;raised&nbsp;exception&nbsp;matches&nbsp;a&nbsp;regexp.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;expected_exception:&nbsp;Exception&nbsp;class&nbsp;expected&nbsp;to&nbsp;be&nbsp;raised.<br>
&nbsp;&nbsp;&nbsp;&nbsp;expected_regexp:&nbsp;Regexp&nbsp;(re&nbsp;pattern&nbsp;object&nbsp;or&nbsp;string)&nbsp;expected<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;to&nbsp;be&nbsp;found&nbsp;in&nbsp;error&nbsp;message.<br>
&nbsp;&nbsp;&nbsp;&nbsp;callable_obj:&nbsp;Function&nbsp;to&nbsp;be&nbsp;called.<br>
&nbsp;&nbsp;&nbsp;&nbsp;args:&nbsp;Extra&nbsp;args.<br>
&nbsp;&nbsp;&nbsp;&nbsp;kwargs:&nbsp;Extra&nbsp;kwargs.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertRegexpMatches"><strong>assertRegexpMatches</strong></a>(self, text, expected_regex, msg<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayable-assertSameElements"><strong>assertSameElements</strong></a>(self, expected_seq, actual_seq, msg<font color="#909090">=None</font>)</dt><dd><tt>An&nbsp;unordered&nbsp;sequence&nbsp;specific&nbsp;comparison.<br>
&nbsp;<br>
Raises&nbsp;with&nbsp;an&nbsp;error&nbsp;message&nbsp;listing&nbsp;which&nbsp;elements&nbsp;of&nbsp;expected_seq<br>
are&nbsp;missing&nbsp;from&nbsp;actual_seq&nbsp;and&nbsp;vice&nbsp;versa&nbsp;if&nbsp;any.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertSequenceEqual"><strong>assertSequenceEqual</strong></a>(self, seq1, seq2, msg<font color="#909090">=None</font>, seq_type<font color="#909090">=None</font>)</dt><dd><tt>An&nbsp;equality&nbsp;assertion&nbsp;for&nbsp;ordered&nbsp;sequences&nbsp;(like&nbsp;lists&nbsp;and&nbsp;tuples).<br>
&nbsp;<br>
For&nbsp;the&nbsp;purposes&nbsp;of&nbsp;this&nbsp;function,&nbsp;a&nbsp;valid&nbsp;orderd&nbsp;sequence&nbsp;type&nbsp;is&nbsp;one<br>
which&nbsp;can&nbsp;be&nbsp;indexed,&nbsp;has&nbsp;a&nbsp;length,&nbsp;and&nbsp;has&nbsp;an&nbsp;equality&nbsp;operator.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq1:&nbsp;The&nbsp;first&nbsp;sequence&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq2:&nbsp;The&nbsp;second&nbsp;sequence&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq_type:&nbsp;The&nbsp;expected&nbsp;datatype&nbsp;of&nbsp;the&nbsp;sequences,&nbsp;or&nbsp;None&nbsp;if&nbsp;no<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;datatype&nbsp;should&nbsp;be&nbsp;enforced.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertSetEqual"><strong>assertSetEqual</strong></a>(self, set1, set2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;set-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;set1:&nbsp;The&nbsp;first&nbsp;set&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;set2:&nbsp;The&nbsp;second&nbsp;set&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.<br>
&nbsp;<br>
For&nbsp;more&nbsp;general&nbsp;containership&nbsp;equality,&nbsp;assertSameElements&nbsp;will&nbsp;work<br>
with&nbsp;things&nbsp;other&nbsp;than&nbsp;sets.&nbsp;&nbsp;&nbsp;&nbsp;This&nbsp;uses&nbsp;ducktyping&nbsp;to&nbsp;support<br>
different&nbsp;types&nbsp;of&nbsp;sets,&nbsp;and&nbsp;is&nbsp;optimized&nbsp;for&nbsp;sets&nbsp;specifically<br>
(parameters&nbsp;must&nbsp;support&nbsp;a&nbsp;difference&nbsp;method).</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertTrue"><strong>assertTrue</strong></a>(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;unless&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assertTupleEqual"><strong>assertTupleEqual</strong></a>(self, tuple1, tuple2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;tuple-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;tuple1:&nbsp;The&nbsp;first&nbsp;tuple&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;tuple2:&nbsp;The&nbsp;second&nbsp;tuple&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-assert_"><strong>assert_</strong></a> = assertTrue(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;unless&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-countTestCases"><strong>countTestCases</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-debug"><strong>debug</strong></a>(self)</dt><dd><tt>Run&nbsp;the&nbsp;test&nbsp;without&nbsp;collecting&nbsp;errors&nbsp;in&nbsp;a&nbsp;TestResult</tt></dd></dl>

<dl><dt><a name="TestDisplayable-defaultTestResult"><strong>defaultTestResult</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-doCleanups"><strong>doCleanups</strong></a>(self)</dt><dd><tt>Execute&nbsp;all&nbsp;cleanup&nbsp;functions.&nbsp;Normally&nbsp;called&nbsp;for&nbsp;you&nbsp;after<br>
tearDown.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-fail"><strong>fail</strong></a>(self, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;immediately,&nbsp;with&nbsp;the&nbsp;given&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-failIf"><strong>failIf</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failIfAlmostEqual"><strong>failIfAlmostEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failIfEqual"><strong>failIfEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failUnless"><strong>failUnless</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failUnlessAlmostEqual"><strong>failUnlessAlmostEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failUnlessEqual"><strong>failUnlessEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-failUnlessRaises"><strong>failUnlessRaises</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayable-id"><strong>id</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayable-run"><strong>run</strong></a>(self, result<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayable-shortDescription"><strong>shortDescription</strong></a>(self)</dt><dd><tt>Returns&nbsp;both&nbsp;the&nbsp;test&nbsp;method&nbsp;name&nbsp;and&nbsp;first&nbsp;line&nbsp;of&nbsp;its&nbsp;docstring.<br>
&nbsp;<br>
If&nbsp;no&nbsp;docstring&nbsp;is&nbsp;given,&nbsp;only&nbsp;returns&nbsp;the&nbsp;method&nbsp;name.<br>
&nbsp;<br>
This&nbsp;method&nbsp;overrides&nbsp;unittest.<a href="unittest.html#TestCase">TestCase</a>.<a href="#TestDisplayable-shortDescription">shortDescription</a>(),&nbsp;which<br>
only&nbsp;returns&nbsp;the&nbsp;first&nbsp;line&nbsp;of&nbsp;the&nbsp;docstring,&nbsp;obscuring&nbsp;the&nbsp;name<br>
of&nbsp;the&nbsp;test&nbsp;upon&nbsp;failure.</tt></dd></dl>

<dl><dt><a name="TestDisplayable-skipTest"><strong>skipTest</strong></a>(self, reason)</dt><dd><tt>Skip&nbsp;this&nbsp;test.</tt></dd></dl>

<hr>
Data descriptors inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><strong>__dict__</strong></dt>
<dd><tt>dictionary&nbsp;for&nbsp;instance&nbsp;variables&nbsp;(if&nbsp;defined)</tt></dd>
</dl>
<dl><dt><strong>__weakref__</strong></dt>
<dd><tt>list&nbsp;of&nbsp;weak&nbsp;references&nbsp;to&nbsp;the&nbsp;object&nbsp;(if&nbsp;defined)</tt></dd>
</dl>
<hr>
Data and other attributes inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><strong>failureException</strong> = &lt;class 'AssertionError'&gt;<dd><tt>Assertion&nbsp;failed.</tt></dl>

<dl><dt><strong>longMessage</strong> = False</dl>

</td></tr></table> <p>
<table width="100%" cellspacing=0 cellpadding=2 border=0 summary="section">
<tr bgcolor="#ffc8d8">
<td colspan=3 valign=bottom>&nbsp;<br>
<font color="#000000" face="helvetica, arial"><a name="TestDisplayableContainer">class <strong>TestDisplayableContainer</strong></a>(<a href="unittest.html#TestCase">unittest.TestCase</a>)</font></td></tr>
    
<tr><td bgcolor="#ffc8d8"><tt>&nbsp;&nbsp;&nbsp;</tt></td><td>&nbsp;</td>
<td width="100%"><dl><dt>Method resolution order:</dt>
<dd><a href="test.tc_displayable.html#TestDisplayableContainer">TestDisplayableContainer</a></dd>
<dd><a href="unittest.html#TestCase">unittest.TestCase</a></dd>
<dd><a href="builtins.html#object">builtins.object</a></dd>
</dl>
<hr>
Methods defined here:<br>
<dl><dt><a name="TestDisplayableContainer-setUp"><strong>setUp</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-tearDown"><strong>tearDown</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-test_click"><strong>test_click</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-test_container"><strong>test_container</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-test_focused_object"><strong>test_focused_object</strong></a>(self)</dt></dl>

<hr>
Methods inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><a name="TestDisplayableContainer-__call__"><strong>__call__</strong></a>(self, *args, **kwds)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-__eq__"><strong>__eq__</strong></a>(self, other)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-__hash__"><strong>__hash__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-__init__"><strong>__init__</strong></a>(self, methodName<font color="#909090">='runTest'</font>)</dt><dd><tt>Create&nbsp;an&nbsp;instance&nbsp;of&nbsp;the&nbsp;class&nbsp;that&nbsp;will&nbsp;use&nbsp;the&nbsp;named&nbsp;test<br>
method&nbsp;when&nbsp;executed.&nbsp;Raises&nbsp;a&nbsp;ValueError&nbsp;if&nbsp;the&nbsp;instance&nbsp;does<br>
not&nbsp;have&nbsp;a&nbsp;method&nbsp;with&nbsp;the&nbsp;specified&nbsp;name.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-__ne__"><strong>__ne__</strong></a>(self, other)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-__repr__"><strong>__repr__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-__str__"><strong>__str__</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-addCleanup"><strong>addCleanup</strong></a>(self, function, *args, **kwargs)</dt><dd><tt>Add&nbsp;a&nbsp;function,&nbsp;with&nbsp;arguments,&nbsp;to&nbsp;be&nbsp;called&nbsp;when&nbsp;the&nbsp;test&nbsp;is<br>
completed.&nbsp;Functions&nbsp;added&nbsp;are&nbsp;called&nbsp;on&nbsp;a&nbsp;LIFO&nbsp;basis&nbsp;and&nbsp;are<br>
called&nbsp;after&nbsp;tearDown&nbsp;on&nbsp;test&nbsp;failure&nbsp;or&nbsp;success.<br>
&nbsp;<br>
Cleanup&nbsp;items&nbsp;are&nbsp;called&nbsp;even&nbsp;if&nbsp;setUp&nbsp;fails&nbsp;(unlike&nbsp;tearDown).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-addTypeEqualityFunc"><strong>addTypeEqualityFunc</strong></a>(self, typeobj, function)</dt><dd><tt>Add&nbsp;a&nbsp;type&nbsp;specific&nbsp;assertEqual&nbsp;style&nbsp;function&nbsp;to&nbsp;compare&nbsp;a&nbsp;type.<br>
&nbsp;<br>
This&nbsp;method&nbsp;is&nbsp;for&nbsp;use&nbsp;by&nbsp;<a href="unittest.html#TestCase">TestCase</a>&nbsp;subclasses&nbsp;that&nbsp;need&nbsp;to&nbsp;register<br>
their&nbsp;own&nbsp;type&nbsp;equality&nbsp;functions&nbsp;to&nbsp;provide&nbsp;nicer&nbsp;error&nbsp;messages.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;typeobj:&nbsp;The&nbsp;data&nbsp;type&nbsp;to&nbsp;call&nbsp;this&nbsp;function&nbsp;on&nbsp;when&nbsp;both&nbsp;values<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;are&nbsp;of&nbsp;the&nbsp;same&nbsp;type&nbsp;in&nbsp;<a href="#TestDisplayableContainer-assertEqual">assertEqual</a>().<br>
&nbsp;&nbsp;&nbsp;&nbsp;function:&nbsp;The&nbsp;callable&nbsp;taking&nbsp;two&nbsp;arguments&nbsp;and&nbsp;an&nbsp;optional<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;msg=&nbsp;argument&nbsp;that&nbsp;raises&nbsp;self.<strong>failureException</strong>&nbsp;with&nbsp;a<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;useful&nbsp;error&nbsp;message&nbsp;when&nbsp;the&nbsp;two&nbsp;arguments&nbsp;are&nbsp;not&nbsp;equal.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertAlmostEqual"><strong>assertAlmostEqual</strong></a>(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertAlmostEquals"><strong>assertAlmostEquals</strong></a> = assertAlmostEqual(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertDictContainsSubset"><strong>assertDictContainsSubset</strong></a>(self, expected, actual, msg<font color="#909090">=None</font>)</dt><dd><tt>Checks&nbsp;whether&nbsp;actual&nbsp;is&nbsp;a&nbsp;superset&nbsp;of&nbsp;expected.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertDictEqual"><strong>assertDictEqual</strong></a>(self, d1, d2, msg<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-assertEqual"><strong>assertEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertEquals"><strong>assertEquals</strong></a> = assertEqual(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;unequal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertFalse"><strong>assertFalse</strong></a>(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;if&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertGreater"><strong>assertGreater</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;&gt;&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertGreaterEqual"><strong>assertGreaterEqual</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;&gt;=&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertIn"><strong>assertIn</strong></a>(self, member, container, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;in&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertIs"><strong>assertIs</strong></a>(self, expr1, expr2, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;is&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertIsNone"><strong>assertIsNone</strong></a>(self, obj, msg<font color="#909090">=None</font>)</dt><dd><tt>Same&nbsp;as&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(obj&nbsp;is&nbsp;None),&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertIsNot"><strong>assertIsNot</strong></a>(self, expr1, expr2, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;is&nbsp;not&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertIsNotNone"><strong>assertIsNotNone</strong></a>(self, obj, msg<font color="#909090">=None</font>)</dt><dd><tt>Included&nbsp;for&nbsp;symmetry&nbsp;with&nbsp;assertIsNone.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertLess"><strong>assertLess</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;&lt;&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertLessEqual"><strong>assertLessEqual</strong></a>(self, a, b, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;&lt;=&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertListEqual"><strong>assertListEqual</strong></a>(self, list1, list2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;list-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;list1:&nbsp;The&nbsp;first&nbsp;list&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;list2:&nbsp;The&nbsp;second&nbsp;list&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertMultiLineEqual"><strong>assertMultiLineEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Assert&nbsp;that&nbsp;two&nbsp;multi-line&nbsp;strings&nbsp;are&nbsp;equal.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertNotAlmostEqual"><strong>assertNotAlmostEqual</strong></a>(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertNotAlmostEquals"><strong>assertNotAlmostEquals</strong></a> = assertNotAlmostEqual(self, first, second, *, places<font color="#909090">=7</font>, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;their<br>
difference&nbsp;rounded&nbsp;to&nbsp;the&nbsp;given&nbsp;number&nbsp;of&nbsp;decimal&nbsp;places<br>
(default&nbsp;7)&nbsp;and&nbsp;comparing&nbsp;to&nbsp;zero.<br>
&nbsp;<br>
Note&nbsp;that&nbsp;decimal&nbsp;places&nbsp;(from&nbsp;zero)&nbsp;are&nbsp;usually&nbsp;not&nbsp;the&nbsp;same<br>
as&nbsp;significant&nbsp;digits&nbsp;(measured&nbsp;from&nbsp;the&nbsp;most&nbsp;signficant&nbsp;digit).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertNotEqual"><strong>assertNotEqual</strong></a>(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertNotEquals"><strong>assertNotEquals</strong></a> = assertNotEqual(self, first, second, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;if&nbsp;the&nbsp;two&nbsp;objects&nbsp;are&nbsp;equal&nbsp;as&nbsp;determined&nbsp;by&nbsp;the&nbsp;'=='<br>
operator.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertNotIn"><strong>assertNotIn</strong></a>(self, member, container, msg<font color="#909090">=None</font>)</dt><dd><tt>Just&nbsp;like&nbsp;<a href="#TestDisplayableContainer-assertTrue">assertTrue</a>(a&nbsp;not&nbsp;in&nbsp;b),&nbsp;but&nbsp;with&nbsp;a&nbsp;nicer&nbsp;default&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertRaises"><strong>assertRaises</strong></a>(self, excClass, callableObj<font color="#909090">=None</font>, *args, **kwargs)</dt><dd><tt>Fail&nbsp;unless&nbsp;an&nbsp;exception&nbsp;of&nbsp;class&nbsp;excClass&nbsp;is&nbsp;thrown<br>
by&nbsp;callableObj&nbsp;when&nbsp;invoked&nbsp;with&nbsp;arguments&nbsp;args&nbsp;and&nbsp;keyword<br>
arguments&nbsp;kwargs.&nbsp;If&nbsp;a&nbsp;different&nbsp;type&nbsp;of&nbsp;exception&nbsp;is<br>
thrown,&nbsp;it&nbsp;will&nbsp;not&nbsp;be&nbsp;caught,&nbsp;and&nbsp;the&nbsp;test&nbsp;case&nbsp;will&nbsp;be<br>
deemed&nbsp;to&nbsp;have&nbsp;suffered&nbsp;an&nbsp;error,&nbsp;exactly&nbsp;as&nbsp;for&nbsp;an<br>
unexpected&nbsp;exception.<br>
&nbsp;<br>
If&nbsp;called&nbsp;with&nbsp;callableObj&nbsp;omitted&nbsp;or&nbsp;None,&nbsp;will&nbsp;return&nbsp;a<br>
context&nbsp;object&nbsp;used&nbsp;like&nbsp;this::<br>
&nbsp;<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;with&nbsp;<a href="#TestDisplayableContainer-assertRaises">assertRaises</a>(some_error_class):<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do_something()</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertRaisesRegexp"><strong>assertRaisesRegexp</strong></a>(self, expected_exception, expected_regexp, callable_obj<font color="#909090">=None</font>, *args, **kwargs)</dt><dd><tt>Asserts&nbsp;that&nbsp;the&nbsp;message&nbsp;in&nbsp;a&nbsp;raised&nbsp;exception&nbsp;matches&nbsp;a&nbsp;regexp.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;expected_exception:&nbsp;Exception&nbsp;class&nbsp;expected&nbsp;to&nbsp;be&nbsp;raised.<br>
&nbsp;&nbsp;&nbsp;&nbsp;expected_regexp:&nbsp;Regexp&nbsp;(re&nbsp;pattern&nbsp;object&nbsp;or&nbsp;string)&nbsp;expected<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;to&nbsp;be&nbsp;found&nbsp;in&nbsp;error&nbsp;message.<br>
&nbsp;&nbsp;&nbsp;&nbsp;callable_obj:&nbsp;Function&nbsp;to&nbsp;be&nbsp;called.<br>
&nbsp;&nbsp;&nbsp;&nbsp;args:&nbsp;Extra&nbsp;args.<br>
&nbsp;&nbsp;&nbsp;&nbsp;kwargs:&nbsp;Extra&nbsp;kwargs.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertRegexpMatches"><strong>assertRegexpMatches</strong></a>(self, text, expected_regex, msg<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-assertSameElements"><strong>assertSameElements</strong></a>(self, expected_seq, actual_seq, msg<font color="#909090">=None</font>)</dt><dd><tt>An&nbsp;unordered&nbsp;sequence&nbsp;specific&nbsp;comparison.<br>
&nbsp;<br>
Raises&nbsp;with&nbsp;an&nbsp;error&nbsp;message&nbsp;listing&nbsp;which&nbsp;elements&nbsp;of&nbsp;expected_seq<br>
are&nbsp;missing&nbsp;from&nbsp;actual_seq&nbsp;and&nbsp;vice&nbsp;versa&nbsp;if&nbsp;any.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertSequenceEqual"><strong>assertSequenceEqual</strong></a>(self, seq1, seq2, msg<font color="#909090">=None</font>, seq_type<font color="#909090">=None</font>)</dt><dd><tt>An&nbsp;equality&nbsp;assertion&nbsp;for&nbsp;ordered&nbsp;sequences&nbsp;(like&nbsp;lists&nbsp;and&nbsp;tuples).<br>
&nbsp;<br>
For&nbsp;the&nbsp;purposes&nbsp;of&nbsp;this&nbsp;function,&nbsp;a&nbsp;valid&nbsp;orderd&nbsp;sequence&nbsp;type&nbsp;is&nbsp;one<br>
which&nbsp;can&nbsp;be&nbsp;indexed,&nbsp;has&nbsp;a&nbsp;length,&nbsp;and&nbsp;has&nbsp;an&nbsp;equality&nbsp;operator.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq1:&nbsp;The&nbsp;first&nbsp;sequence&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq2:&nbsp;The&nbsp;second&nbsp;sequence&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;seq_type:&nbsp;The&nbsp;expected&nbsp;datatype&nbsp;of&nbsp;the&nbsp;sequences,&nbsp;or&nbsp;None&nbsp;if&nbsp;no<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;datatype&nbsp;should&nbsp;be&nbsp;enforced.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertSetEqual"><strong>assertSetEqual</strong></a>(self, set1, set2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;set-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;set1:&nbsp;The&nbsp;first&nbsp;set&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;set2:&nbsp;The&nbsp;second&nbsp;set&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.<br>
&nbsp;<br>
For&nbsp;more&nbsp;general&nbsp;containership&nbsp;equality,&nbsp;assertSameElements&nbsp;will&nbsp;work<br>
with&nbsp;things&nbsp;other&nbsp;than&nbsp;sets.&nbsp;&nbsp;&nbsp;&nbsp;This&nbsp;uses&nbsp;ducktyping&nbsp;to&nbsp;support<br>
different&nbsp;types&nbsp;of&nbsp;sets,&nbsp;and&nbsp;is&nbsp;optimized&nbsp;for&nbsp;sets&nbsp;specifically<br>
(parameters&nbsp;must&nbsp;support&nbsp;a&nbsp;difference&nbsp;method).</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertTrue"><strong>assertTrue</strong></a>(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;unless&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assertTupleEqual"><strong>assertTupleEqual</strong></a>(self, tuple1, tuple2, msg<font color="#909090">=None</font>)</dt><dd><tt>A&nbsp;tuple-specific&nbsp;equality&nbsp;assertion.<br>
&nbsp;<br>
Args:<br>
&nbsp;&nbsp;&nbsp;&nbsp;tuple1:&nbsp;The&nbsp;first&nbsp;tuple&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;tuple2:&nbsp;The&nbsp;second&nbsp;tuple&nbsp;to&nbsp;compare.<br>
&nbsp;&nbsp;&nbsp;&nbsp;msg:&nbsp;Optional&nbsp;message&nbsp;to&nbsp;use&nbsp;on&nbsp;failure&nbsp;instead&nbsp;of&nbsp;a&nbsp;list&nbsp;of<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;differences.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-assert_"><strong>assert_</strong></a> = assertTrue(self, expr, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;the&nbsp;test&nbsp;unless&nbsp;the&nbsp;expression&nbsp;is&nbsp;true.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-countTestCases"><strong>countTestCases</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-debug"><strong>debug</strong></a>(self)</dt><dd><tt>Run&nbsp;the&nbsp;test&nbsp;without&nbsp;collecting&nbsp;errors&nbsp;in&nbsp;a&nbsp;TestResult</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-defaultTestResult"><strong>defaultTestResult</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-doCleanups"><strong>doCleanups</strong></a>(self)</dt><dd><tt>Execute&nbsp;all&nbsp;cleanup&nbsp;functions.&nbsp;Normally&nbsp;called&nbsp;for&nbsp;you&nbsp;after<br>
tearDown.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-fail"><strong>fail</strong></a>(self, msg<font color="#909090">=None</font>)</dt><dd><tt>Fail&nbsp;immediately,&nbsp;with&nbsp;the&nbsp;given&nbsp;message.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-failIf"><strong>failIf</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failIfAlmostEqual"><strong>failIfAlmostEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failIfEqual"><strong>failIfEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failUnless"><strong>failUnless</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failUnlessAlmostEqual"><strong>failUnlessAlmostEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failUnlessEqual"><strong>failUnlessEqual</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-failUnlessRaises"><strong>failUnlessRaises</strong></a> = deprecated_func(*args, **kwargs)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-id"><strong>id</strong></a>(self)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-run"><strong>run</strong></a>(self, result<font color="#909090">=None</font>)</dt></dl>

<dl><dt><a name="TestDisplayableContainer-shortDescription"><strong>shortDescription</strong></a>(self)</dt><dd><tt>Returns&nbsp;both&nbsp;the&nbsp;test&nbsp;method&nbsp;name&nbsp;and&nbsp;first&nbsp;line&nbsp;of&nbsp;its&nbsp;docstring.<br>
&nbsp;<br>
If&nbsp;no&nbsp;docstring&nbsp;is&nbsp;given,&nbsp;only&nbsp;returns&nbsp;the&nbsp;method&nbsp;name.<br>
&nbsp;<br>
This&nbsp;method&nbsp;overrides&nbsp;unittest.<a href="unittest.html#TestCase">TestCase</a>.<a href="#TestDisplayableContainer-shortDescription">shortDescription</a>(),&nbsp;which<br>
only&nbsp;returns&nbsp;the&nbsp;first&nbsp;line&nbsp;of&nbsp;the&nbsp;docstring,&nbsp;obscuring&nbsp;the&nbsp;name<br>
of&nbsp;the&nbsp;test&nbsp;upon&nbsp;failure.</tt></dd></dl>

<dl><dt><a name="TestDisplayableContainer-skipTest"><strong>skipTest</strong></a>(self, reason)</dt><dd><tt>Skip&nbsp;this&nbsp;test.</tt></dd></dl>

<hr>
Data descriptors inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><strong>__dict__</strong></dt>
<dd><tt>dictionary&nbsp;for&nbsp;instance&nbsp;variables&nbsp;(if&nbsp;defined)</tt></dd>
</dl>
<dl><dt><strong>__weakref__</strong></dt>
<dd><tt>list&nbsp;of&nbsp;weak&nbsp;references&nbsp;to&nbsp;the&nbsp;object&nbsp;(if&nbsp;defined)</tt></dd>
</dl>
<hr>
Data and other attributes inherited from <a href="unittest.html#TestCase">unittest.TestCase</a>:<br>
<dl><dt><strong>failureException</strong> = &lt;class 'AssertionError'&gt;<dd><tt>Assertion&nbsp;failed.</tt></dl>

<dl><dt><strong>longMessage</strong> = False</dl>

</td></tr></table></td></tr></table>
</body></html>
a id='n7692' href='#n7692'>7692 7693 7694 7695 7696 7697 7698 7699 7700 7701 7702 7703 7704 7705 7706 7707 7708 7709 7710 7711 7712 7713 7714 7715 7716 7717 7718 7719 7720 7721 7722 7723 7724 7725 7726 7727 7728 7729 7730 7731 7732 7733 7734 7735 7736 7737 7738 7739 7740 7741 7742 7743 7744 7745 7746 7747 7748 7749 7750 7751 7752 7753 7754 7755 7756 7757 7758 7759 7760 7761 7762 7763 7764 7765 7766 7767 7768 7769 7770 7771 7772 7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783 7784 7785 7786 7787 7788 7789 7790 7791 7792 7793 7794 7795 7796 7797 7798 7799 7800 7801 7802 7803 7804 7805 7806 7807 7808 7809 7810 7811 7812 7813 7814 7815 7816 7817 7818 7819 7820 7821 7822 7823 7824 7825 7826 7827 7828 7829 7830 7831 7832 7833 7834 7835 7836 7837 7838 7839 7840 7841 7842 7843 7844 7845 7846 7847 7848 7849 7850 7851 7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886 7887 7888 7889 7890 7891 7892 7893 7894 7895 7896 7897 7898 7899 7900 7901 7902 7903 7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919 7920 7921 7922 7923 7924 7925 7926 7927 7928 7929 7930 7931 7932 7933 7934 7935 7936 7937 7938 7939 7940 7941 7942 7943 7944 7945 7946 7947 7948 7949 7950 7951 7952 7953 7954 7955 7956 7957 7958 7959 7960 7961 7962 7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973 7974 7975 7976 7977 7978 7979 7980 7981 7982 7983 7984 7985 7986 7987 7988 7989 7990 7991 7992 7993 7994 7995 7996 7997 7998 7999 8000 8001 8002 8003 8004 8005 8006 8007 8008 8009 8010 8011 8012 8013 8014 8015 8016 8017 8018 8019 8020 8021 8022 8023 8024 8025 8026 8027 8028 8029 8030 8031 8032 8033 8034 8035 8036 8037 8038 8039 8040 8041 8042 8043 8044 8045 8046 8047 8048 8049 8050 8051 8052 8053 8054 8055 8056 8057 8058 8059 8060
c{0: 0 (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) -- nil
c{0: 1 (((s string-address)) <- ((new)) foo
) -- nil
c{0: 2 (((k keyboard-address)) <- ((init-keyboard)) ((s string-address))) -- nil
c{0: 3 (((stdin channel-address)) <- ((init-channel)) ((1 literal))) -- nil
c{0: 4 (((fork)) ((send-keys-to-stdin fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((k keyboard-address)) ((stdin channel-address))) -- nil
c{0: 5 (((buffered-stdin channel-address)) <- ((init-channel)) ((1 literal))) -- nil
c{0: 6 (((r integer) (routine)) <- ((fork)) ((buffer-lines fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((stdin channel-address)) ((buffered-stdin channel-address))) -- nil
c{0: 7 (((screen terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal))) -- nil
c{0: 8 (((5 string-address) (raw)) <- ((get)) ((screen terminal-address) (deref)) ((data offset))) -- nil
c{0: 9 (((fork-helper)) ((send-prints-to-stdout fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((screen terminal-address)) ((buffered-stdin channel-address))) -- nil
c{0: 10 (((sleep)) ((until-routine-done literal)) ((r integer) (routine))) -- nil
c{0: 11 (((sleep)) ((for-some-cycles literal)) ((500 literal))) -- nil
c{1: 0 ✓ (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
c{1: 1 ✓ (((s string-address)) <- ((new)) foo
)
c{1: 2 ✓ (((k keyboard-address)) <- ((init-keyboard)) ((s string-address)))
c{1: 3 ✓ (((stdin channel-address)) <- ((init-channel)) ((1 literal)))
c{1: 4 ✓ (((fork)) ((send-keys-to-stdin fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((k keyboard-address)) ((stdin channel-address)))
c{1: 5 ✓ (((buffered-stdin channel-address)) <- ((init-channel)) ((1 literal)))
c{1: 6 ✓ (((r integer) (routine)) <- ((fork)) ((buffer-lines fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((stdin channel-address)) ((buffered-stdin channel-address)))
c{1: 7 ✓ (((screen terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
c{1: 8 ✓ (((5 string-address) (raw)) <- ((get)) ((screen terminal-address) (deref)) ((data offset)))
c{1: 9 ✓ (((fork-helper)) ((send-prints-to-stdout fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((screen terminal-address)) ((buffered-stdin channel-address)))
c{1: 10 ✓ (((sleep)) ((until-routine-done literal)) ((r integer) (routine)))
c{1: 11 ✓ (((sleep)) ((for-some-cycles literal)) ((500 literal)))
cn0: convert-names in main
cn0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal))) nil nil
cn0: checking arg ((space literal))
cn0: checking arg ((30 literal))
cn0: checking oarg ((default-space space-address))
maybe-add: ((default-space space-address))
cn0: (((s string-address)) <- ((new)) foo
) nil nil
cn0: checking arg foo

cn0: checking oarg ((s string-address))
maybe-add: ((s string-address))
cn0: location for oarg ((s string-address)): 1
cn0: (((k keyboard-address)) <- ((init-keyboard)) ((s string-address))) ((s 1)) nil
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)): 2
cn0: (((stdin channel-address)) <- ((init-channel)) ((1 literal))) ((k 2) (s 1)) nil
cn0: checking arg ((1 literal))
cn0: checking oarg ((stdin channel-address))
maybe-add: ((stdin channel-address))
cn0: location for oarg ((stdin channel-address)): 3
cn0: (((fork)) ((send-keys-to-stdin fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((k keyboard-address)) ((stdin channel-address))) ((k 2) (s 1) (stdin 3)) nil
cn0: checking arg ((send-keys-to-stdin fn))
cn0: checking arg ((nil literal) (globals))
cn0: checking arg ((nil literal) (limit))
cn0: checking arg ((k keyboard-address))
maybe-add: ((k keyboard-address))
cn0: checking arg ((stdin channel-address))
maybe-add: ((stdin channel-address))
cn0: (((buffered-stdin channel-address)) <- ((init-channel)) ((1 literal))) ((k 2) (s 1) (stdin 3)) nil
cn0: checking arg ((1 literal))
cn0: checking oarg ((buffered-stdin channel-address))
maybe-add: ((buffered-stdin channel-address))
cn0: location for oarg ((buffered-stdin channel-address)): 4
cn0: (((r integer) (routine)) <- ((fork)) ((buffer-lines fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((stdin channel-address)) ((buffered-stdin channel-address))) ((buffered-stdin 4) (k 2) (s 1) (stdin 3)) nil
cn0: checking arg ((buffer-lines fn))
cn0: checking arg ((nil literal) (globals))
cn0: checking arg ((nil literal) (limit))
cn0: checking arg ((stdin channel-address))
maybe-add: ((stdin channel-address))
cn0: checking arg ((buffered-stdin channel-address))
maybe-add: ((buffered-stdin channel-address))
cn0: checking oarg ((r integer) (routine))
maybe-add: ((r integer) (routine))
cn0: location for oarg ((r integer) (routine)): 5
cn0: (((screen terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal))) ((buffered-stdin 4) (k 2) (r 5) (s 1) (stdin 3)) nil
cn0: checking arg ((20 literal))
cn0: checking arg ((10 literal))
cn0: checking oarg ((screen terminal-address))
maybe-add: ((screen terminal-address))
cn0: location for oarg ((screen terminal-address)): 6
cn0: (((5 string-address) (raw)) <- ((get)) ((screen terminal-address) (deref)) ((data offset))) ((buffered-stdin 4) (k 2) (r 5) (s 1) (screen 6) (stdin 3)) nil
cn0: field-access data in screenterminal-addressderef of type terminal
cn0: new field; computing location
cn0: field location 4
cn0: checking arg ((screen terminal-address) (deref))
maybe-add: ((screen terminal-address) (deref))
cn0: checking arg ((data offset))
cn0: checking oarg ((5 string-address) (raw))
maybe-add: ((5 string-address) (raw))
cn0: (((fork-helper)) ((send-prints-to-stdout fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((screen terminal-address)) ((buffered-stdin channel-address))) ((buffered-stdin 4) (data 4) (k 2) (r 5) (s 1) (screen 6) (stdin 3)) ((data t))
cn0: checking arg ((send-prints-to-stdout fn))
cn0: checking arg ((nil literal) (globals))
cn0: checking arg ((nil literal) (limit))
cn0: checking arg ((screen terminal-address))
maybe-add: ((screen terminal-address))
cn0: checking arg ((buffered-stdin channel-address))
maybe-add: ((buffered-stdin channel-address))
cn0: (((sleep)) ((until-routine-done literal)) ((r integer) (routine))) ((buffered-stdin 4) (data 4) (k 2) (r 5) (s 1) (screen 6) (stdin 3)) ((data t))
cn0: checking arg ((until-routine-done literal))
cn0: checking arg ((r integer) (routine))
maybe-add: ((r integer) (routine))
cn0: (((sleep)) ((for-some-cycles literal)) ((500 literal))) ((buffered-stdin 4) (data 4) (k 2) (r 5) (s 1) (screen 6) (stdin 3)) ((data t))
cn0: checking arg ((for-some-cycles literal))
cn0: checking arg ((500 literal))
cn1: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
cn1: (((1 string-address)) <- ((new)) foo
)
cn1: (((2 keyboard-address)) <- ((init-keyboard)) ((1 string-address)))
cn1: (((3 channel-address)) <- ((init-channel)) ((1 literal)))
cn1: (((fork)) ((send-keys-to-stdin fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((2 keyboard-address)) ((3 channel-address)))
cn1: (((4 channel-address)) <- ((init-channel)) ((1 literal)))
cn1: (((5 integer) (routine)) <- ((fork)) ((buffer-lines fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((3 channel-address)) ((4 channel-address)))
cn1: (((6 terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
cn1: (((5 string-address) (raw)) <- ((get)) ((6 terminal-address) (deref)) ((4 offset)))
cn1: (((fork-helper)) ((send-prints-to-stdout fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((6 terminal-address)) ((4 channel-address)))
cn1: (((sleep)) ((until-routine-done literal)) ((5 integer) (routine)))
cn1: (((sleep)) ((for-some-cycles literal)) ((500 literal)))
schedule: main
run: main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: main 0: 1000 => ((default-space space-address))
run: main 1: (((1 string-address)) <- ((new)) foo
)
run: main 1: 1031 => ((1 string-address))
mem: ((1 string-address)): 1002 <= 1031
run: main 2: (((2 keyboard-address)) <- ((init-keyboard)) ((1 string-address)))
mem: ((1 string-address)) => 1031
run: init-keyboard/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: init-keyboard/main 0: 1036 => ((default-space space-address))
run: init-keyboard/main 1: (((1 keyboard-address)) <- ((new)) ((keyboard literal)))
run: init-keyboard/main 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 1038 <= 1067
run: init-keyboard/main 2: (((2 string-address-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((1 offset)))
run: init-keyboard/main 2: 1068 => ((2 string-address-address))
mem: ((2 string-address-address)): 1039 <= 1068
run: init-keyboard/main 3: (((2 string-address-address) (deref)) <- ((next-input)))
arg: nil 0 (1031)
run: init-keyboard/main 3: 1031 => ((2 string-address-address) (deref))
mem: ((2 string-address-address) (deref)): 1068 <= 1031
run: init-keyboard/main 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: init-keyboard/main 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 1040 <= 1067
run: init-keyboard/main 5: (((3 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-keyboard/main 5: 0 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1067 <= 0
run: init-keyboard/main 6: (((reply)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: main 2: 1067 => ((2 keyboard-address))
mem: ((2 keyboard-address)): 1003 <= 1067
run: main 3: (((3 channel-address)) <- ((init-channel)) ((1 literal)))
run: init-channel/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: init-channel/main 0: 1069 => ((default-space space-address))
run: init-channel/main 1: (((1 channel-address)) <- ((new)) ((channel literal)))
run: init-channel/main 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 1071 <= 1100
run: init-channel/main 2: (((2 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: init-channel/main 2: 1100 => ((2 integer-address))
mem: ((2 integer-address)): 1072 <= 1100
run: init-channel/main 3: (((2 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-channel/main 3: 0 => ((2 integer-address) (deref))
mem: ((2 integer-address) (deref)): 1100 <= 0
run: init-channel/main 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: init-channel/main 4: 1101 => ((3 integer-address))
mem: ((3 integer-address)): 1073 <= 1101
run: init-channel/main 5: (((3 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-channel/main 5: 0 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1101 <= 0
run: init-channel/main 6: (((4 integer)) <- ((next-input)))
arg: nil 0 (1)
run: init-channel/main 6: 1 => ((4 integer))
mem: ((4 integer)): 1074 <= 1
run: init-channel/main 7: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: init-channel/main 7: 2 => ((4 integer))
mem: ((4 integer)): 1074 <= 2
run: init-channel/main 8: (((5 tagged-value-array-address-address)) <- ((get-address)) ((1 channel-address) (deref)) ((2 offset)))
run: init-channel/main 8: 1102 => ((5 tagged-value-array-address-address))
mem: ((5 tagged-value-array-address-address)): 1075 <= 1102
run: init-channel/main 9: (((5 tagged-value-array-address-address) (deref)) <- ((new)) ((tagged-value-array literal)) ((4 integer)))
mem: ((4 integer)) => 2
run: init-channel/main 9: 1103 => ((5 tagged-value-array-address-address) (deref))
mem: ((5 tagged-value-array-address-address) (deref)): 1102 <= 1103
run: init-channel/main 10: (((reply)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: main 3: 1100 => ((3 channel-address))
mem: ((3 channel-address)): 1004 <= 1100
run: main 4: (((fork)) ((send-keys-to-stdin fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((2 keyboard-address)) ((3 channel-address)))
mem: ((2 keyboard-address)) => 1067
mem: ((3 channel-address)) => 1100
run: main 5: (((4 channel-address)) <- ((init-channel)) ((1 literal)))
run: init-channel/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: init-channel/main 0: 1108 => ((default-space space-address))
run: init-channel/main 1: (((1 channel-address)) <- ((new)) ((channel literal)))
run: init-channel/main 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 1110 <= 1139
run: init-channel/main 2: (((2 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: init-channel/main 2: 1139 => ((2 integer-address))
mem: ((2 integer-address)): 1111 <= 1139
run: init-channel/main 3: (((2 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-channel/main 3: 0 => ((2 integer-address) (deref))
mem: ((2 integer-address) (deref)): 1139 <= 0
run: init-channel/main 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: init-channel/main 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 1112 <= 1140
run: init-channel/main 5: (((3 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-channel/main 5: 0 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1140 <= 0
run: init-channel/main 6: (((4 integer)) <- ((next-input)))
arg: nil 0 (1)
run: init-channel/main 6: 1 => ((4 integer))
mem: ((4 integer)): 1113 <= 1
run: init-channel/main 7: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: init-channel/main 7: 2 => ((4 integer))
mem: ((4 integer)): 1113 <= 2
run: init-channel/main 8: (((5 tagged-value-array-address-address)) <- ((get-address)) ((1 channel-address) (deref)) ((2 offset)))
run: init-channel/main 8: 1141 => ((5 tagged-value-array-address-address))
mem: ((5 tagged-value-array-address-address)): 1114 <= 1141
run: init-channel/main 9: (((5 tagged-value-array-address-address) (deref)) <- ((new)) ((tagged-value-array literal)) ((4 integer)))
mem: ((4 integer)) => 2
run: init-channel/main 9: 1142 => ((5 tagged-value-array-address-address) (deref))
mem: ((5 tagged-value-array-address-address) (deref)): 1141 <= 1142
run: init-channel/main 10: (((reply)) ((1 channel-address)))
mem: ((1 channel-address)) => 1139
run: main 5: 1139 => ((4 channel-address))
mem: ((4 channel-address)): 1005 <= 1139
run: main 6: (((5 integer) (routine)) <- ((fork)) ((buffer-lines fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((3 channel-address)) ((4 channel-address)))
mem: ((3 channel-address)) => 1100
mem: ((4 channel-address)) => 1139
run: main 6: 2 => ((5 integer) (routine))
mem: ((5 integer) (routine)): 1006 <= 2
run: main 7: (((6 terminal-address)) <- ((init-fake-terminal)) ((20 literal)) ((10 literal)))
run: init-fake-terminal/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal) (capacity)))
run: init-fake-terminal/main 0: 1147 => ((default-space space-address))
run: init-fake-terminal/main 1: (((1 terminal-address)) <- ((new)) ((terminal literal)))
run: init-fake-terminal/main 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 1149 <= 1178
run: init-fake-terminal/main 2: (((2 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((1 offset)))
run: init-fake-terminal/main 2: 1179 => ((2 integer-address))
mem: ((2 integer-address)): 1150 <= 1179
run: init-fake-terminal/main 3: (((2 integer-address) (deref)) <- ((next-input)))
arg: nil 0 (20 10)
run: init-fake-terminal/main 3: 20 => ((2 integer-address) (deref))
mem: ((2 integer-address) (deref)): 1179 <= 20
run: init-fake-terminal/main 4: (((3 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((0 offset)))
run: init-fake-terminal/main 4: 1178 => ((3 integer-address))
mem: ((3 integer-address)): 1151 <= 1178
run: init-fake-terminal/main 5: (((3 integer-address) (deref)) <- ((next-input)))
arg: nil 1 (20 10)
run: init-fake-terminal/main 5: 10 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1178 <= 10
run: init-fake-terminal/main 6: (((4 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
run: init-fake-terminal/main 6: 1180 => ((4 integer-address))
mem: ((4 integer-address)): 1152 <= 1180
run: init-fake-terminal/main 7: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-fake-terminal/main 7: 0 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1180 <= 0
run: init-fake-terminal/main 8: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
run: init-fake-terminal/main 8: 1181 => ((5 integer-address))
mem: ((5 integer-address)): 1153 <= 1181
run: init-fake-terminal/main 9: (((5 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-fake-terminal/main 9: 0 => ((5 integer-address) (deref))
mem: ((5 integer-address) (deref)): 1181 <= 0
run: init-fake-terminal/main 10: (((6 integer)) <- ((multiply)) ((2 integer-address) (deref)) ((3 integer-address) (deref)))
mem: ((2 integer-address) (deref)) => 20
mem: ((3 integer-address) (deref)) => 10
run: init-fake-terminal/main 10: 200 => ((6 integer))
mem: ((6 integer)): 1154 <= 200
run: init-fake-terminal/main 11: (((7 string-address-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((4 offset)))
run: init-fake-terminal/main 11: 1182 => ((7 string-address-address))
mem: ((7 string-address-address)): 1155 <= 1182
run: init-fake-terminal/main 12: (((7 string-address-address) (deref)) <- ((new)) ((string literal)) ((6 integer)))
mem: ((6 integer)) => 200
run: init-fake-terminal/main 12: 1183 => ((7 string-address-address) (deref))
mem: ((7 string-address-address) (deref)): 1182 <= 1183
run: init-fake-terminal/main 13: (((clear-screen)) ((1 terminal-address)))
mem: ((1 terminal-address)) => 1178
run: clear-screen/init-fake-terminal/main 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: clear-screen/init-fake-terminal/main 0: 1384 => ((default-space space-address))
run: clear-screen/init-fake-terminal/main 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178)
run: clear-screen/init-fake-terminal/main 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 1386 <= 1178
run: clear-screen/init-fake-terminal/main 2: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
mem: ((1 terminal-address)) => 1178
run: clear-screen/init-fake-terminal/main 3: (((2 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: clear-screen/init-fake-terminal/main 3: 1183 => ((2 string-address))
mem: ((2 string-address)): 1387 <= 1183
run: clear-screen/init-fake-terminal/main 4: (((3 integer)) <- ((length)) ((2 string-address) (deref)))
array-len: ((2 string-address) (deref))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 4: 200 => ((3 integer))
mem: ((3 integer)): 1388 <= 200
run: clear-screen/init-fake-terminal/main 5: (((4 integer)) <- ((copy)) ((0 literal)))
run: clear-screen/init-fake-terminal/main 5: 0 => ((4 integer))
mem: ((4 integer)): 1389 <= 0
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 0
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 0
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1184 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1184
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1184 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: clear-screen/init-fake-terminal/main 10: 1 => ((4 integer))
mem: ((4 integer)): 1389 <= 1
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 1
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 1
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1185 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1185
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1185 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: clear-screen/init-fake-terminal/main 10: 2 => ((4 integer))
mem: ((4 integer)): 1389 <= 2
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 2
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 2
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1186 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1186
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1186 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 2
run: clear-screen/init-fake-terminal/main 10: 3 => ((4 integer))
mem: ((4 integer)): 1389 <= 3
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 3
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 3
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1187 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1187
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1187 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 3
run: clear-screen/init-fake-terminal/main 10: 4 => ((4 integer))
mem: ((4 integer)): 1389 <= 4
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 4
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 4
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1188 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1188
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1188 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 4
run: clear-screen/init-fake-terminal/main 10: 5 => ((4 integer))
mem: ((4 integer)): 1389 <= 5
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 5
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 5
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1189 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1189
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1189 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 5
run: clear-screen/init-fake-terminal/main 10: 6 => ((4 integer))
mem: ((4 integer)): 1389 <= 6
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 6
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 6
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1190 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1190
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1190 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 6
run: clear-screen/init-fake-terminal/main 10: 7 => ((4 integer))
mem: ((4 integer)): 1389 <= 7
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 7
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 7
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1191 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1191
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1191 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 7
run: clear-screen/init-fake-terminal/main 10: 8 => ((4 integer))
mem: ((4 integer)): 1389 <= 8
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 8
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 8
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1192 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1192
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1192 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 8
run: clear-screen/init-fake-terminal/main 10: 9 => ((4 integer))
mem: ((4 integer)): 1389 <= 9
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 9
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 9
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1193 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1193
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1193 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 9
run: clear-screen/init-fake-terminal/main 10: 10 => ((4 integer))
mem: ((4 integer)): 1389 <= 10
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 10
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 10
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1194 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1194
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1194 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 10
run: clear-screen/init-fake-terminal/main 10: 11 => ((4 integer))
mem: ((4 integer)): 1389 <= 11
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 11
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 11
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1195 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1195
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1195 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 11
run: clear-screen/init-fake-terminal/main 10: 12 => ((4 integer))
mem: ((4 integer)): 1389 <= 12
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 12
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 12
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1196 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1196
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1196 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 12
run: clear-screen/init-fake-terminal/main 10: 13 => ((4 integer))
mem: ((4 integer)): 1389 <= 13
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 13
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 13
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1197 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1197
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1197 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 13
run: clear-screen/init-fake-terminal/main 10: 14 => ((4 integer))
mem: ((4 integer)): 1389 <= 14
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 14
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 14
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1198 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1198
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1198 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 14
run: clear-screen/init-fake-terminal/main 10: 15 => ((4 integer))
mem: ((4 integer)): 1389 <= 15
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 15
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 15
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1199 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1199
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1199 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 15
run: clear-screen/init-fake-terminal/main 10: 16 => ((4 integer))
mem: ((4 integer)): 1389 <= 16
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 16
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 16
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1200 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1200
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1200 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 16
run: clear-screen/init-fake-terminal/main 10: 17 => ((4 integer))
mem: ((4 integer)): 1389 <= 17
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 17
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 17
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1201 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1201
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1201 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 17
run: clear-screen/init-fake-terminal/main 10: 18 => ((4 integer))
mem: ((4 integer)): 1389 <= 18
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 18
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 18
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1202 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1202
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1202 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 18
run: clear-screen/init-fake-terminal/main 10: 19 => ((4 integer))
mem: ((4 integer)): 1389 <= 19
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 19
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 19
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1203 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1203
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1203 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 19
run: clear-screen/init-fake-terminal/main 10: 20 => ((4 integer))
mem: ((4 integer)): 1389 <= 20
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 20
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 20
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1204 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1204
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1204 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 20
run: clear-screen/init-fake-terminal/main 10: 21 => ((4 integer))
mem: ((4 integer)): 1389 <= 21
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 21
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 21
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1205 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1205
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1205 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 21
run: clear-screen/init-fake-terminal/main 10: 22 => ((4 integer))
mem: ((4 integer)): 1389 <= 22
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 22
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 22
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1206 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1206
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1206 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 22
run: clear-screen/init-fake-terminal/main 10: 23 => ((4 integer))
mem: ((4 integer)): 1389 <= 23
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 23
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 23
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1207 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1207
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1207 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 23
run: clear-screen/init-fake-terminal/main 10: 24 => ((4 integer))
mem: ((4 integer)): 1389 <= 24
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 24
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 24
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1208 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1208
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1208 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 24
run: clear-screen/init-fake-terminal/main 10: 25 => ((4 integer))
mem: ((4 integer)): 1389 <= 25
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 25
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 25
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1209 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1209
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1209 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 25
run: clear-screen/init-fake-terminal/main 10: 26 => ((4 integer))
mem: ((4 integer)): 1389 <= 26
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 26
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 26
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1210 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1210
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1210 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 26
run: clear-screen/init-fake-terminal/main 10: 27 => ((4 integer))
mem: ((4 integer)): 1389 <= 27
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 27
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 27
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1211 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1211
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1211 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 27
run: clear-screen/init-fake-terminal/main 10: 28 => ((4 integer))
mem: ((4 integer)): 1389 <= 28
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 28
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 28
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1212 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1212
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1212 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 28
run: clear-screen/init-fake-terminal/main 10: 29 => ((4 integer))
mem: ((4 integer)): 1389 <= 29
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 29
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 29
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1213 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1213
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1213 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 29
run: clear-screen/init-fake-terminal/main 10: 30 => ((4 integer))
mem: ((4 integer)): 1389 <= 30
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 30
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 30
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1214 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1214
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1214 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 30
run: clear-screen/init-fake-terminal/main 10: 31 => ((4 integer))
mem: ((4 integer)): 1389 <= 31
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 31
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 31
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1215 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1215
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1215 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 31
run: clear-screen/init-fake-terminal/main 10: 32 => ((4 integer))
mem: ((4 integer)): 1389 <= 32
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 32
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 32
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1216 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1216
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1216 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 32
run: clear-screen/init-fake-terminal/main 10: 33 => ((4 integer))
mem: ((4 integer)): 1389 <= 33
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 33
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 33
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1217 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1217
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1217 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 33
run: clear-screen/init-fake-terminal/main 10: 34 => ((4 integer))
mem: ((4 integer)): 1389 <= 34
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 34
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 34
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1218 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1218
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1218 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 34
run: clear-screen/init-fake-terminal/main 10: 35 => ((4 integer))
mem: ((4 integer)): 1389 <= 35
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 35
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 35
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1219 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1219
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1219 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 35
run: clear-screen/init-fake-terminal/main 10: 36 => ((4 integer))
mem: ((4 integer)): 1389 <= 36
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 36
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 36
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1220 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1220
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1220 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 36
run: clear-screen/init-fake-terminal/main 10: 37 => ((4 integer))
mem: ((4 integer)): 1389 <= 37
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 37
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 37
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1221 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1221
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1221 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 37
run: clear-screen/init-fake-terminal/main 10: 38 => ((4 integer))
mem: ((4 integer)): 1389 <= 38
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 38
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 38
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1222 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1222
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1222 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 38
run: clear-screen/init-fake-terminal/main 10: 39 => ((4 integer))
mem: ((4 integer)): 1389 <= 39
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 39
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 39
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1223 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1223
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1223 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 39
run: clear-screen/init-fake-terminal/main 10: 40 => ((4 integer))
mem: ((4 integer)): 1389 <= 40
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 40
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 40
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1224 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1224
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1224 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 40
run: clear-screen/init-fake-terminal/main 10: 41 => ((4 integer))
mem: ((4 integer)): 1389 <= 41
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 41
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 41
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1225 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1225
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1225 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 41
run: clear-screen/init-fake-terminal/main 10: 42 => ((4 integer))
mem: ((4 integer)): 1389 <= 42
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 42
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 42
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1226 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1226
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1226 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 42
run: clear-screen/init-fake-terminal/main 10: 43 => ((4 integer))
mem: ((4 integer)): 1389 <= 43
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 43
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 43
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1227 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1227
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1227 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 43
run: clear-screen/init-fake-terminal/main 10: 44 => ((4 integer))
mem: ((4 integer)): 1389 <= 44
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 44
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 44
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1228 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1228
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1228 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 44
run: clear-screen/init-fake-terminal/main 10: 45 => ((4 integer))
mem: ((4 integer)): 1389 <= 45
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 45
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 45
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1229 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1229
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1229 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 45
run: clear-screen/init-fake-terminal/main 10: 46 => ((4 integer))
mem: ((4 integer)): 1389 <= 46
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 46
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 46
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1230 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1230
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1230 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 46
run: clear-screen/init-fake-terminal/main 10: 47 => ((4 integer))
mem: ((4 integer)): 1389 <= 47
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 47
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 47
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1231 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1231
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1231 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 47
run: clear-screen/init-fake-terminal/main 10: 48 => ((4 integer))
mem: ((4 integer)): 1389 <= 48
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 48
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 48
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1232 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1232
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1232 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 48
run: clear-screen/init-fake-terminal/main 10: 49 => ((4 integer))
mem: ((4 integer)): 1389 <= 49
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 49
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 49
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1233 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1233
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1233 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 49
run: clear-screen/init-fake-terminal/main 10: 50 => ((4 integer))
mem: ((4 integer)): 1389 <= 50
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 50
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 50
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1234 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1234
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1234 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 50
run: clear-screen/init-fake-terminal/main 10: 51 => ((4 integer))
mem: ((4 integer)): 1389 <= 51
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 51
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 51
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1235 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1235
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1235 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 51
run: clear-screen/init-fake-terminal/main 10: 52 => ((4 integer))
mem: ((4 integer)): 1389 <= 52
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 52
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 52
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1236 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1236
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1236 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 52
run: clear-screen/init-fake-terminal/main 10: 53 => ((4 integer))
mem: ((4 integer)): 1389 <= 53
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 53
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 53
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1237 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1237
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1237 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 53
run: clear-screen/init-fake-terminal/main 10: 54 => ((4 integer))
mem: ((4 integer)): 1389 <= 54
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 54
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 54
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1238 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1238
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1238 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 54
run: clear-screen/init-fake-terminal/main 10: 55 => ((4 integer))
mem: ((4 integer)): 1389 <= 55
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 55
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 55
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1239 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1239
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1239 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 55
run: clear-screen/init-fake-terminal/main 10: 56 => ((4 integer))
mem: ((4 integer)): 1389 <= 56
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 56
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 56
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1240 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1240
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1240 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 56
run: clear-screen/init-fake-terminal/main 10: 57 => ((4 integer))
mem: ((4 integer)): 1389 <= 57
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 57
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 57
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1241 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1241
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1241 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 57
run: clear-screen/init-fake-terminal/main 10: 58 => ((4 integer))
mem: ((4 integer)): 1389 <= 58
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 58
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 58
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1242 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1242
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1242 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 58
run: clear-screen/init-fake-terminal/main 10: 59 => ((4 integer))
mem: ((4 integer)): 1389 <= 59
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 59
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 59
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1243 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1243
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1243 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 59
run: clear-screen/init-fake-terminal/main 10: 60 => ((4 integer))
mem: ((4 integer)): 1389 <= 60
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 60
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 60
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1244 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1244
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1244 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 60
run: clear-screen/init-fake-terminal/main 10: 61 => ((4 integer))
mem: ((4 integer)): 1389 <= 61
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 61
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 61
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1245 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1245
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1245 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 61
run: clear-screen/init-fake-terminal/main 10: 62 => ((4 integer))
mem: ((4 integer)): 1389 <= 62
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 62
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 62
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1246 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1246
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1246 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 62
run: clear-screen/init-fake-terminal/main 10: 63 => ((4 integer))
mem: ((4 integer)): 1389 <= 63
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 63
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 63
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1247 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1247
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1247 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 63
run: clear-screen/init-fake-terminal/main 10: 64 => ((4 integer))
mem: ((4 integer)): 1389 <= 64
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 64
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 64
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1248 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1248
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1248 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 64
run: clear-screen/init-fake-terminal/main 10: 65 => ((4 integer))
mem: ((4 integer)): 1389 <= 65
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 65
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 65
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1249 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1249
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1249 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 65
run: clear-screen/init-fake-terminal/main 10: 66 => ((4 integer))
mem: ((4 integer)): 1389 <= 66
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 66
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 66
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1250 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1250
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1250 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 66
run: clear-screen/init-fake-terminal/main 10: 67 => ((4 integer))
mem: ((4 integer)): 1389 <= 67
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 67
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 67
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1251 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1251
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1251 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 67
run: clear-screen/init-fake-terminal/main 10: 68 => ((4 integer))
mem: ((4 integer)): 1389 <= 68
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 68
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 68
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1252 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1252
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1252 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 68
run: clear-screen/init-fake-terminal/main 10: 69 => ((4 integer))
mem: ((4 integer)): 1389 <= 69
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 69
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 69
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1253 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1253
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1253 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 69
run: clear-screen/init-fake-terminal/main 10: 70 => ((4 integer))
mem: ((4 integer)): 1389 <= 70
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 70
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 70
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1254 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1254
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1254 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 70
run: clear-screen/init-fake-terminal/main 10: 71 => ((4 integer))
mem: ((4 integer)): 1389 <= 71
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 71
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 71
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1255 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1255
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1255 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 71
run: clear-screen/init-fake-terminal/main 10: 72 => ((4 integer))
mem: ((4 integer)): 1389 <= 72
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 72
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 72
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1256 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1256
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1256 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 72
run: clear-screen/init-fake-terminal/main 10: 73 => ((4 integer))
mem: ((4 integer)): 1389 <= 73
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 73
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 73
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1257 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1257
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1257 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 73
run: clear-screen/init-fake-terminal/main 10: 74 => ((4 integer))
mem: ((4 integer)): 1389 <= 74
schedule: scheduling clear-screen/init-fake-terminal/main for further processing
schedule: send-keys-to-stdin
run: send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: send-keys-to-stdin 0: 101000 => ((default-space space-address))
run: send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067 1100)
run: send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101002 <= 1067
run: send-keys-to-stdin 2: (((2 channel-address)) <- ((next-input)))
arg: nil 1 (1067 1100)
run: send-keys-to-stdin 2: 1100 => ((2 channel-address))
mem: ((2 channel-address)): 101003 <= 1100
run: send-keys-to-stdin 3: (((3 character)) <- ((read-key)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read-key/send-keys-to-stdin 0: 101031 => ((default-space space-address))
run: read-key/send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067)
run: read-key/send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101033 <= 1067
run: read-key/send-keys-to-stdin 2: (((2 terminal-address)) <- ((next-input)))
arg: nil 1 (1067)
run: read-key/send-keys-to-stdin 2: nil => ((2 terminal-address))
mem: ((2 terminal-address)): 101034 <= nil
run: read-key/send-keys-to-stdin 3: (((jump-unless)) ((1 keyboard-address)) ((9 offset)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: read-key/send-keys-to-stdin 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 101035 <= 1067
run: read-key/send-keys-to-stdin 5: (((4 string-address)) <- ((get)) ((1 keyboard-address) (deref)) ((1 offset)))
mem: ((1068 string-address) (raw)) => 1031
run: read-key/send-keys-to-stdin 5: 1031 => ((4 string-address))
mem: ((4 string-address)): 101036 <= 1031
run: read-key/send-keys-to-stdin 6: (((5 integer)) <- ((length)) ((4 string-address) (deref)))
array-len: ((4 string-address) (deref))
mem: ((1031 integer) (raw)) => 4
run: read-key/send-keys-to-stdin 6: 4 => ((5 integer))
mem: ((5 integer)): 101037 <= 4
run: read-key/send-keys-to-stdin 7: (((6 boolean)) <- ((greater-or-equal)) ((3 integer-address) (deref)) ((5 integer)))
mem: ((3 integer-address) (deref)) => 0
mem: ((5 integer)) => 4
run: read-key/send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101038 <= nil
run: read-key/send-keys-to-stdin 8: (((jump-unless)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: read-key/send-keys-to-stdin 10: (((7 character)) <- ((index)) ((4 string-address) (deref)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 0
array-len: ((1031 string) (raw))
mem: ((1031 integer) (raw)) => 4
mem: ((1032 byte) (raw)) => f
run: read-key/send-keys-to-stdin 10: #\f => ((7 character))
mem: ((7 character)): 101039 <= #\f
run: read-key/send-keys-to-stdin 11: (((3 integer-address) (deref)) <- ((add)) ((3 integer-address) (deref)) ((1 literal)))
mem: ((3 integer-address) (deref)) => 0
run: read-key/send-keys-to-stdin 11: 1 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1067 <= 1
run: read-key/send-keys-to-stdin 12: (((reply)) ((7 character)))
mem: ((7 character)) => f
run: send-keys-to-stdin 3: #\f => ((3 character))
mem: ((3 character)): 101004 <= #\f
run: send-keys-to-stdin 4: (((jump-unless)) ((3 character)) ((-2 offset)))
mem: ((3 character)) => f
run: send-keys-to-stdin 5: (((4 tagged-value)) <- ((save-type)) ((3 character)))
mem: ((3 character)) => f
run: send-keys-to-stdin 5: #(tagged record (character #\f)) => ((4 tagged-value))
mem: ((4 tagged-value)): 101005 <= character
mem: ((4 tagged-value)): 101006 <= #\f
run: send-keys-to-stdin 6: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((4 tagged-value)))
mem: ((2 channel-address)) => 1100
mem: ((4 tagged-value)) => #(tagged record (character f . nil))
run: write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/send-keys-to-stdin 0: 101062 => ((default-space space-address))
run: write/send-keys-to-stdin 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 #(tagged record (character #\f . nil)))
run: write/send-keys-to-stdin 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 101064 <= 1100
run: write/send-keys-to-stdin 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1100 #(tagged record (character #\f . nil)))
run: write/send-keys-to-stdin 2: #(tagged record (character #\f . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 101065 <= character
mem: ((2 tagged-value)): 101066 <= #\f
run: write/send-keys-to-stdin 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1103 . nil))
run: full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/send-keys-to-stdin 0: 101093 => ((default-space space-address))
run: full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1103 . nil)))
run: full?/write/send-keys-to-stdin 1: #(tagged record (0 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101095 <= 0
mem: ((1 channel)): 101096 <= 0
mem: ((1 channel)): 101097 <= 1103
run: full?/write/send-keys-to-stdin 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((101096 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 2: 0 => ((4 integer))
mem: ((4 integer)): 101098 <= 0
run: full?/write/send-keys-to-stdin 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: full?/write/send-keys-to-stdin 3: 1 => ((4 integer))
mem: ((4 integer)): 101098 <= 1
run: full?/write/send-keys-to-stdin 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 0 1103 . nil))
run: capacity/full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/send-keys-to-stdin 0: 101124 => ((default-space space-address))
run: capacity/full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1103 . nil)))
run: capacity/full?/write/send-keys-to-stdin 1: #(tagged record (0 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101126 <= 0
mem: ((1 channel)): 101127 <= 0
mem: ((1 channel)): 101128 <= 1103
run: capacity/full?/write/send-keys-to-stdin 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((101128 tagged-value-array-address) (raw)) => 1103
run: capacity/full?/write/send-keys-to-stdin 2: 1103 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 101129 <= 1103
run: capacity/full?/write/send-keys-to-stdin 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: capacity/full?/write/send-keys-to-stdin 3: 2 => ((5 integer))
mem: ((5 integer)): 101130 <= 2
run: capacity/full?/write/send-keys-to-stdin 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 4: 2 => ((5 integer))
mem: ((5 integer)): 101099 <= 2
run: full?/write/send-keys-to-stdin 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 5: t => ((6 boolean))
mem: ((6 boolean)): 101100 <= t
run: full?/write/send-keys-to-stdin 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: full?/write/send-keys-to-stdin 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((101095 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 8: 0 => ((7 integer))
mem: ((7 integer)): 101101 <= 0
run: full?/write/send-keys-to-stdin 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 1
run: full?/write/send-keys-to-stdin 9: nil => ((8 boolean))
mem: ((8 boolean)): 101102 <= nil
run: full?/write/send-keys-to-stdin 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => nil
run: write/send-keys-to-stdin 3: nil => ((4 boolean))
mem: ((4 boolean)): 101067 <= nil
run: write/send-keys-to-stdin 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => nil
run: write/send-keys-to-stdin 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: write/send-keys-to-stdin 7: 1103 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 101069 <= 1103
run: write/send-keys-to-stdin 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/send-keys-to-stdin 8: 1101 => ((7 integer-address))
mem: ((7 integer-address)): 101070 <= 1101
run: write/send-keys-to-stdin 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 9: 1104 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 101071 <= 1104
run: write/send-keys-to-stdin 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character f . nil))
run: write/send-keys-to-stdin 10: #(tagged record (character #\f . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1104 <= character
mem: ((8 tagged-value-address) (deref)): 1105 <= #\f
run: write/send-keys-to-stdin 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 0
run: write/send-keys-to-stdin 11: 1 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 1
run: write/send-keys-to-stdin 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 12: 2 => ((9 integer))
mem: ((9 integer)): 101072 <= 2
run: write/send-keys-to-stdin 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 1
mem: ((9 integer)) => 2
run: write/send-keys-to-stdin 13: t => ((10 boolean))
mem: ((10 boolean)): 101073 <= t
run: write/send-keys-to-stdin 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => t
run: write/send-keys-to-stdin 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1103 . nil))
run: send-keys-to-stdin 6: #(tagged record (0 1 1103 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1100 <= 0
mem: ((2 channel-address) (deref)): 1101 <= 1
mem: ((2 channel-address) (deref)): 1102 <= 1103
run: send-keys-to-stdin 7: (((6 boolean)) <- ((equal)) ((3 character)) (( literal)))
mem: ((3 character)) => f
run: send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101007 <= nil
run: send-keys-to-stdin 8: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: send-keys-to-stdin 9: (((jump)) ((-7 offset)))
run: send-keys-to-stdin 3: (((3 character)) <- ((read-key)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read-key/send-keys-to-stdin 0: 101155 => ((default-space space-address))
run: read-key/send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067)
run: read-key/send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101157 <= 1067
run: read-key/send-keys-to-stdin 2: (((2 terminal-address)) <- ((next-input)))
arg: nil 1 (1067)
run: read-key/send-keys-to-stdin 2: nil => ((2 terminal-address))
mem: ((2 terminal-address)): 101158 <= nil
run: read-key/send-keys-to-stdin 3: (((jump-unless)) ((1 keyboard-address)) ((9 offset)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: read-key/send-keys-to-stdin 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 101159 <= 1067
run: read-key/send-keys-to-stdin 5: (((4 string-address)) <- ((get)) ((1 keyboard-address) (deref)) ((1 offset)))
mem: ((1068 string-address) (raw)) => 1031
run: read-key/send-keys-to-stdin 5: 1031 => ((4 string-address))
mem: ((4 string-address)): 101160 <= 1031
run: read-key/send-keys-to-stdin 6: (((5 integer)) <- ((length)) ((4 string-address) (deref)))
array-len: ((4 string-address) (deref))
mem: ((1031 integer) (raw)) => 4
run: read-key/send-keys-to-stdin 6: 4 => ((5 integer))
mem: ((5 integer)): 101161 <= 4
run: read-key/send-keys-to-stdin 7: (((6 boolean)) <- ((greater-or-equal)) ((3 integer-address) (deref)) ((5 integer)))
mem: ((3 integer-address) (deref)) => 1
mem: ((5 integer)) => 4
run: read-key/send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101162 <= nil
run: read-key/send-keys-to-stdin 8: (((jump-unless)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: read-key/send-keys-to-stdin 10: (((7 character)) <- ((index)) ((4 string-address) (deref)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 1
array-len: ((1031 string) (raw))
mem: ((1031 integer) (raw)) => 4
mem: ((1033 byte) (raw)) => o
run: read-key/send-keys-to-stdin 10: #\o => ((7 character))
mem: ((7 character)): 101163 <= #\o
run: read-key/send-keys-to-stdin 11: (((3 integer-address) (deref)) <- ((add)) ((3 integer-address) (deref)) ((1 literal)))
mem: ((3 integer-address) (deref)) => 1
run: read-key/send-keys-to-stdin 11: 2 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1067 <= 2
run: read-key/send-keys-to-stdin 12: (((reply)) ((7 character)))
mem: ((7 character)) => o
run: send-keys-to-stdin 3: #\o => ((3 character))
mem: ((3 character)): 101004 <= #\o
run: send-keys-to-stdin 4: (((jump-unless)) ((3 character)) ((-2 offset)))
mem: ((3 character)) => o
run: send-keys-to-stdin 5: (((4 tagged-value)) <- ((save-type)) ((3 character)))
mem: ((3 character)) => o
run: send-keys-to-stdin 5: #(tagged record (character #\o)) => ((4 tagged-value))
mem: ((4 tagged-value)): 101005 <= character
mem: ((4 tagged-value)): 101006 <= #\o
run: send-keys-to-stdin 6: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((4 tagged-value)))
mem: ((2 channel-address)) => 1100
mem: ((4 tagged-value)) => #(tagged record (character o . nil))
run: write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/send-keys-to-stdin 0: 101186 => ((default-space space-address))
run: write/send-keys-to-stdin 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 #(tagged record (character #\o . nil)))
run: write/send-keys-to-stdin 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 101188 <= 1100
run: write/send-keys-to-stdin 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1100 #(tagged record (character #\o . nil)))
run: write/send-keys-to-stdin 2: #(tagged record (character #\o . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 101189 <= character
mem: ((2 tagged-value)): 101190 <= #\o
run: write/send-keys-to-stdin 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1103 . nil))
run: full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/send-keys-to-stdin 0: 101217 => ((default-space space-address))
run: full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: full?/write/send-keys-to-stdin 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101219 <= 0
mem: ((1 channel)): 101220 <= 1
mem: ((1 channel)): 101221 <= 1103
run: full?/write/send-keys-to-stdin 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((101220 integer) (raw)) => 1
run: full?/write/send-keys-to-stdin 2: 1 => ((4 integer))
mem: ((4 integer)): 101222 <= 1
run: full?/write/send-keys-to-stdin 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: full?/write/send-keys-to-stdin 3: 2 => ((4 integer))
mem: ((4 integer)): 101222 <= 2
run: full?/write/send-keys-to-stdin 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 1 1103 . nil))
run: capacity/full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/send-keys-to-stdin 0: 101248 => ((default-space space-address))
run: capacity/full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: capacity/full?/write/send-keys-to-stdin 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101250 <= 0
mem: ((1 channel)): 101251 <= 1
mem: ((1 channel)): 101252 <= 1103
run: capacity/full?/write/send-keys-to-stdin 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((101252 tagged-value-array-address) (raw)) => 1103
run: capacity/full?/write/send-keys-to-stdin 2: 1103 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 101253 <= 1103
run: capacity/full?/write/send-keys-to-stdin 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: capacity/full?/write/send-keys-to-stdin 3: 2 => ((5 integer))
mem: ((5 integer)): 101254 <= 2
run: capacity/full?/write/send-keys-to-stdin 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 4: 2 => ((5 integer))
mem: ((5 integer)): 101223 <= 2
run: full?/write/send-keys-to-stdin 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 2
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 5: nil => ((6 boolean))
mem: ((6 boolean)): 101224 <= nil
run: full?/write/send-keys-to-stdin 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: full?/write/send-keys-to-stdin 7: (((4 integer)) <- ((copy)) ((0 literal)))
run: full?/write/send-keys-to-stdin 7: 0 => ((4 integer))
mem: ((4 integer)): 101222 <= 0
run: full?/write/send-keys-to-stdin 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((101219 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 8: 0 => ((7 integer))
mem: ((7 integer)): 101225 <= 0
run: full?/write/send-keys-to-stdin 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 0
run: full?/write/send-keys-to-stdin 9: t => ((8 boolean))
mem: ((8 boolean)): 101226 <= t
run: full?/write/send-keys-to-stdin 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/send-keys-to-stdin 3: t => ((4 boolean))
mem: ((4 boolean)): 101191 <= t
run: write/send-keys-to-stdin 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/send-keys-to-stdin 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/send-keys-to-stdin 5: 1100 => ((5 integer-address))
mem: ((5 integer-address)): 101192 <= 1100
run: write/send-keys-to-stdin 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 0
schedule: pushing write/send-keys-to-stdin to sleep queue
schedule: buffer-lines
run: buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-lines 0: 201000 => ((default-space space-address))
run: buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 1139)
run: buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 201002 <= 1100
run: buffer-lines 2: (((2 channel-address)) <- ((next-input)))
arg: nil 1 (1100 1139)
run: buffer-lines 2: 1139 => ((2 channel-address))
mem: ((2 channel-address)): 201003 <= 1139
run: buffer-lines 3: (((3 buffer-address)) <- ((init-buffer)) ((30 literal)))
run: init-buffer/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: init-buffer/buffer-lines 0: 201031 => ((default-space space-address))
run: init-buffer/buffer-lines 1: (((1 buffer-address)) <- ((new)) ((buffer literal)))
run: init-buffer/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201033 <= 201062
run: init-buffer/buffer-lines 2: (((2 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: init-buffer/buffer-lines 2: 201062 => ((2 integer-address))
mem: ((2 integer-address)): 201034 <= 201062
run: init-buffer/buffer-lines 3: (((2 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-buffer/buffer-lines 3: 0 => ((2 integer-address) (deref))
mem: ((2 integer-address) (deref)): 201062 <= 0
run: init-buffer/buffer-lines 4: (((3 string-address-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((1 offset)))
run: init-buffer/buffer-lines 4: 201063 => ((3 string-address-address))
mem: ((3 string-address-address)): 201035 <= 201063
run: init-buffer/buffer-lines 5: (((4 integer)) <- ((next-input)))
arg: nil 0 (30)
run: init-buffer/buffer-lines 5: 30 => ((4 integer))
mem: ((4 integer)): 201036 <= 30
run: init-buffer/buffer-lines 6: (((3 string-address-address) (deref)) <- ((new)) ((string literal)) ((4 integer)))
mem: ((4 integer)) => 30
run: init-buffer/buffer-lines 6: 201064 => ((3 string-address-address) (deref))
mem: ((3 string-address-address) (deref)): 201063 <= 201064
run: init-buffer/buffer-lines 7: (((reply)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 201062
run: buffer-lines 3: 201062 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 201062
run: buffer-lines 4: (((4 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/buffer-lines 0: 201095 => ((default-space space-address))
run: read/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100)
run: read/buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 201097 <= 1100
run: read/buffer-lines 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1103 . nil))
run: empty?/read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/buffer-lines 0: 201126 => ((default-space space-address))
run: empty?/read/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: empty?/read/buffer-lines 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 201128 <= 0
mem: ((1 channel)): 201129 <= 1
mem: ((1 channel)): 201130 <= 1103
run: empty?/read/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201128 integer) (raw)) => 0
run: empty?/read/buffer-lines 2: 0 => ((4 integer))
mem: ((4 integer)): 201131 <= 0
run: empty?/read/buffer-lines 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201129 integer) (raw)) => 1
run: empty?/read/buffer-lines 3: 1 => ((5 integer))
mem: ((5 integer)): 201132 <= 1
run: empty?/read/buffer-lines 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 1
run: empty?/read/buffer-lines 4: nil => ((6 boolean))
mem: ((6 boolean)): 201133 <= nil
run: empty?/read/buffer-lines 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => nil
run: read/buffer-lines 2: nil => ((2 boolean))
mem: ((2 boolean)): 201098 <= nil
run: read/buffer-lines 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => nil
run: read/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/buffer-lines 6: 1100 => ((4 integer-address))
mem: ((4 integer-address)): 201100 <= 1100
run: read/buffer-lines 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: read/buffer-lines 7: 1103 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 201101 <= 1103
run: read/buffer-lines 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
mem: ((1104 tagged-value) (raw)) => #(tagged record (character f . nil))
run: read/buffer-lines 8: #(tagged record (character #\f . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 201102 <= character
mem: ((6 tagged-value)): 201103 <= #\f
run: read/buffer-lines 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: read/buffer-lines 9: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 1
run: read/buffer-lines 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: read/buffer-lines 10: 2 => ((8 integer))
mem: ((8 integer)): 201104 <= 2
run: read/buffer-lines 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 1
mem: ((8 integer)) => 2
run: read/buffer-lines 11: t => ((9 boolean))
mem: ((9 boolean)): 201105 <= t
run: read/buffer-lines 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => t
run: read/buffer-lines 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character f . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1103 . nil))
run: buffer-lines 4: #(tagged record (character #\f . nil)) => ((4 tagged-value))
mem: ((4 tagged-value)): 201005 <= character
mem: ((4 tagged-value)): 201006 <= #\f
run: buffer-lines 4: #(tagged record (1 1 1103 . nil)) => ((1 channel-address) (deref))
mem: ((1 channel-address) (deref)): 1100 <= 1
mem: ((1 channel-address) (deref)): 1101 <= 1
mem: ((1 channel-address) (deref)): 1102 <= 1103
run: buffer-lines 5: (((6 character)) <- ((maybe-coerce)) ((4 tagged-value)) ((character literal)))
mem: ((4 tagged-value)) => #(tagged record (character f . nil))
run: maybe-coerce/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/buffer-lines 0: 201157 => ((default-space space-address))
run: maybe-coerce/buffer-lines 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/buffer-lines 1: 201188 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 201159 <= 201188
run: maybe-coerce/buffer-lines 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\f . nil)) character)
run: maybe-coerce/buffer-lines 2: #(tagged record (character #\f . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 201188 <= character
mem: ((1 tagged-value-address) (deref)): 201189 <= #\f
run: maybe-coerce/buffer-lines 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\f . nil)) character)
run: maybe-coerce/buffer-lines 3: character => ((2 type))
mem: ((2 type)): 201160 <= character
run: maybe-coerce/buffer-lines 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((201188 type) (raw)) => character
run: maybe-coerce/buffer-lines 4: character => ((3 type))
mem: ((3 type)): 201161 <= character
run: maybe-coerce/buffer-lines 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/buffer-lines 5: t => ((4 boolean))
mem: ((4 boolean)): 201162 <= t
run: maybe-coerce/buffer-lines 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/buffer-lines 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((201189 location) (raw)) => f
run: maybe-coerce/buffer-lines 8: #\f => ((5 location))
mem: ((5 location)): 201163 <= #\f
run: maybe-coerce/buffer-lines 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => f
mem: ((4 boolean)) => t
run: buffer-lines 5: #\f => ((6 character))
mem: ((6 character)): 201007 <= #\f
run: buffer-lines 6: (((assert)) ((6 character)))
mem: ((6 character)) => f
run: buffer-lines 7: (((7 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => f
run: buffer-lines 7: nil => ((7 boolean))
mem: ((7 boolean)): 201008 <= nil
run: buffer-lines 8: (((jump-unless)) ((7 boolean)) ((5 offset)))
mem: ((7 boolean)) => nil
run: buffer-lines 14: (((3 buffer-address)) <- ((append)) ((3 buffer-address)) ((6 character)))
mem: ((3 buffer-address)) => 201062
mem: ((6 character)) => f
run: append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: append/buffer-lines 0: 201190 => ((default-space space-address))
run: append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062 #\f)
run: append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201192 <= 201062
run: append/buffer-lines 2: (((2 character)) <- ((next-input)))
arg: nil 1 (201062 #\f)
run: append/buffer-lines 2: #\f => ((2 character))
mem: ((2 character)): 201193 <= #\f
run: append/buffer-lines 3: (((3 boolean)) <- ((buffer-full?)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 201062
run: buffer-full?/append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-full?/append/buffer-lines 0: 201221 => ((default-space space-address))
run: buffer-full?/append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062)
run: buffer-full?/append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201223 <= 201062
run: buffer-full?/append/buffer-lines 2: (((2 integer)) <- ((get)) ((1 buffer-address) (deref)) ((0 offset)))
mem: ((201062 integer) (raw)) => 0
run: buffer-full?/append/buffer-lines 2: 0 => ((2 integer))
mem: ((2 integer)): 201224 <= 0
run: buffer-full?/append/buffer-lines 3: (((3 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: buffer-full?/append/buffer-lines 3: 201064 => ((3 string-address))
mem: ((3 string-address)): 201225 <= 201064
run: buffer-full?/append/buffer-lines 4: (((4 integer)) <- ((length)) ((3 string-address) (deref)))
array-len: ((3 string-address) (deref))
mem: ((201064 integer) (raw)) => 30
run: buffer-full?/append/buffer-lines 4: 30 => ((4 integer))
mem: ((4 integer)): 201226 <= 30
run: buffer-full?/append/buffer-lines 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer)))
mem: ((2 integer)) => 0
mem: ((4 integer)) => 30
run: buffer-full?/append/buffer-lines 5: nil => ((5 boolean))
mem: ((5 boolean)): 201227 <= nil
run: buffer-full?/append/buffer-lines 6: (((reply)) ((5 boolean)))
mem: ((5 boolean)) => nil
run: append/buffer-lines 3: nil => ((3 boolean))
mem: ((3 boolean)): 201194 <= nil
run: append/buffer-lines 4: (((jump-unless)) ((3 boolean)) ((1 offset)))
mem: ((3 boolean)) => nil
run: append/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: append/buffer-lines 6: 201062 => ((4 integer-address))
mem: ((4 integer-address)): 201195 <= 201062
run: append/buffer-lines 7: (((5 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: append/buffer-lines 7: 201064 => ((5 string-address))
mem: ((5 string-address)): 201196 <= 201064
run: append/buffer-lines 8: (((6 byte-address)) <- ((index-address)) ((5 string-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
run: append/buffer-lines 8: 201065 => ((6 byte-address))
mem: ((6 byte-address)): 201197 <= 201065
run: append/buffer-lines 9: (((6 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => f
run: append/buffer-lines 9: #\f => ((6 byte-address) (deref))
mem: ((6 byte-address) (deref)): 201065 <= #\f
run: append/buffer-lines 10: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: append/buffer-lines 10: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 201062 <= 1
run: append/buffer-lines 11: (((reply)) ((1 buffer-address) (same-as-arg 0)))
mem: ((1 buffer-address) (same-as-arg 0)) => 201062
run: buffer-lines 14: 201062 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 201062
run: buffer-lines 15: (((10 boolean)) <- ((equal)) ((6 character)) ((
 literal)))
mem: ((6 character)) => f
run: buffer-lines 15: nil => ((10 boolean))
mem: ((10 boolean)): 201011 <= nil
run: buffer-lines 16: (((jump-if)) ((10 boolean)) ((3 offset)))
mem: ((10 boolean)) => nil
run: buffer-lines 17: (((11 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => f
run: buffer-lines 17: nil => ((11 boolean))
mem: ((11 boolean)): 201012 <= nil
run: buffer-lines 18: (((jump-if)) ((11 boolean)) ((12 offset)))
mem: ((11 boolean)) => nil
run: buffer-lines 19: (((jump)) ((-16 offset)))
run: buffer-lines 4: (((4 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/buffer-lines 0: 201252 => ((default-space space-address))
run: read/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100)
run: read/buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 201254 <= 1100
run: read/buffer-lines 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 1 1103 . nil))
run: empty?/read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/buffer-lines 0: 201283 => ((default-space space-address))
run: empty?/read/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 1 1103 . nil)))
run: empty?/read/buffer-lines 1: #(tagged record (1 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 201285 <= 1
mem: ((1 channel)): 201286 <= 1
mem: ((1 channel)): 201287 <= 1103
run: empty?/read/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201285 integer) (raw)) => 1
run: empty?/read/buffer-lines 2: 1 => ((4 integer))
mem: ((4 integer)): 201288 <= 1
run: empty?/read/buffer-lines 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201286 integer) (raw)) => 1
run: empty?/read/buffer-lines 3: 1 => ((5 integer))
mem: ((5 integer)): 201289 <= 1
run: empty?/read/buffer-lines 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 1
run: empty?/read/buffer-lines 4: t => ((6 boolean))
mem: ((6 boolean)): 201290 <= t
run: empty?/read/buffer-lines 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/buffer-lines 2: t => ((2 boolean))
mem: ((2 boolean)): 201255 <= t
run: read/buffer-lines 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/buffer-lines 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/buffer-lines 4: 1101 => ((3 integer-address))
mem: ((3 integer-address)): 201256 <= 1101
run: read/buffer-lines 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 1
schedule: pushing read/buffer-lines to sleep queue
schedule: waking up write/send-keys-to-stdin
schedule: clear-screen/init-fake-terminal/main
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 74
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 74
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1258 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1258
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1258 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 74
run: clear-screen/init-fake-terminal/main 10: 75 => ((4 integer))
mem: ((4 integer)): 1389 <= 75
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 75
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 75
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1259 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1259
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1259 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 75
run: clear-screen/init-fake-terminal/main 10: 76 => ((4 integer))
mem: ((4 integer)): 1389 <= 76
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 76
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 76
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1260 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1260
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1260 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 76
run: clear-screen/init-fake-terminal/main 10: 77 => ((4 integer))
mem: ((4 integer)): 1389 <= 77
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 77
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 77
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1261 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1261
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1261 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 77
run: clear-screen/init-fake-terminal/main 10: 78 => ((4 integer))
mem: ((4 integer)): 1389 <= 78
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 78
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 78
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1262 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1262
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1262 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 78
run: clear-screen/init-fake-terminal/main 10: 79 => ((4 integer))
mem: ((4 integer)): 1389 <= 79
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 79
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 79
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1263 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1263
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1263 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 79
run: clear-screen/init-fake-terminal/main 10: 80 => ((4 integer))
mem: ((4 integer)): 1389 <= 80
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 80
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 80
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1264 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1264
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1264 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 80
run: clear-screen/init-fake-terminal/main 10: 81 => ((4 integer))
mem: ((4 integer)): 1389 <= 81
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 81
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 81
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1265 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1265
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1265 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 81
run: clear-screen/init-fake-terminal/main 10: 82 => ((4 integer))
mem: ((4 integer)): 1389 <= 82
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 82
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 82
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1266 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1266
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1266 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 82
run: clear-screen/init-fake-terminal/main 10: 83 => ((4 integer))
mem: ((4 integer)): 1389 <= 83
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 83
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 83
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1267 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1267
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1267 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 83
run: clear-screen/init-fake-terminal/main 10: 84 => ((4 integer))
mem: ((4 integer)): 1389 <= 84
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 84
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 84
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1268 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1268
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1268 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 84
run: clear-screen/init-fake-terminal/main 10: 85 => ((4 integer))
mem: ((4 integer)): 1389 <= 85
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 85
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 85
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1269 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1269
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1269 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 85
run: clear-screen/init-fake-terminal/main 10: 86 => ((4 integer))
mem: ((4 integer)): 1389 <= 86
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 86
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 86
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1270 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1270
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1270 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 86
run: clear-screen/init-fake-terminal/main 10: 87 => ((4 integer))
mem: ((4 integer)): 1389 <= 87
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 87
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 87
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1271 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1271
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1271 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 87
run: clear-screen/init-fake-terminal/main 10: 88 => ((4 integer))
mem: ((4 integer)): 1389 <= 88
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 88
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 88
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1272 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1272
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1272 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 88
run: clear-screen/init-fake-terminal/main 10: 89 => ((4 integer))
mem: ((4 integer)): 1389 <= 89
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 89
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 89
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1273 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1273
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1273 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 89
run: clear-screen/init-fake-terminal/main 10: 90 => ((4 integer))
mem: ((4 integer)): 1389 <= 90
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 90
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 90
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1274 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1274
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1274 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 90
run: clear-screen/init-fake-terminal/main 10: 91 => ((4 integer))
mem: ((4 integer)): 1389 <= 91
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 91
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 91
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1275 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1275
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1275 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 91
run: clear-screen/init-fake-terminal/main 10: 92 => ((4 integer))
mem: ((4 integer)): 1389 <= 92
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 92
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 92
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1276 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1276
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1276 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 92
run: clear-screen/init-fake-terminal/main 10: 93 => ((4 integer))
mem: ((4 integer)): 1389 <= 93
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 93
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 93
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1277 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1277
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1277 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 93
run: clear-screen/init-fake-terminal/main 10: 94 => ((4 integer))
mem: ((4 integer)): 1389 <= 94
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 94
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 94
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1278 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1278
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1278 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 94
run: clear-screen/init-fake-terminal/main 10: 95 => ((4 integer))
mem: ((4 integer)): 1389 <= 95
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 95
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 95
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1279 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1279
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1279 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 95
run: clear-screen/init-fake-terminal/main 10: 96 => ((4 integer))
mem: ((4 integer)): 1389 <= 96
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 96
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 96
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1280 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1280
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1280 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 96
run: clear-screen/init-fake-terminal/main 10: 97 => ((4 integer))
mem: ((4 integer)): 1389 <= 97
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 97
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 97
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1281 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1281
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1281 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 97
run: clear-screen/init-fake-terminal/main 10: 98 => ((4 integer))
mem: ((4 integer)): 1389 <= 98
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 98
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 98
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1282 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1282
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1282 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 98
run: clear-screen/init-fake-terminal/main 10: 99 => ((4 integer))
mem: ((4 integer)): 1389 <= 99
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 99
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 99
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1283 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1283
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1283 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 99
run: clear-screen/init-fake-terminal/main 10: 100 => ((4 integer))
mem: ((4 integer)): 1389 <= 100
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 100
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 100
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1284 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1284
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1284 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 100
run: clear-screen/init-fake-terminal/main 10: 101 => ((4 integer))
mem: ((4 integer)): 1389 <= 101
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 101
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 101
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1285 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1285
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1285 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 101
run: clear-screen/init-fake-terminal/main 10: 102 => ((4 integer))
mem: ((4 integer)): 1389 <= 102
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 102
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 102
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1286 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1286
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1286 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 102
run: clear-screen/init-fake-terminal/main 10: 103 => ((4 integer))
mem: ((4 integer)): 1389 <= 103
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 103
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 103
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1287 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1287
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1287 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 103
run: clear-screen/init-fake-terminal/main 10: 104 => ((4 integer))
mem: ((4 integer)): 1389 <= 104
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 104
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 104
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1288 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1288
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1288 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 104
run: clear-screen/init-fake-terminal/main 10: 105 => ((4 integer))
mem: ((4 integer)): 1389 <= 105
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 105
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 105
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1289 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1289
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1289 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 105
run: clear-screen/init-fake-terminal/main 10: 106 => ((4 integer))
mem: ((4 integer)): 1389 <= 106
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 106
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 106
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1290 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1290
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1290 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 106
run: clear-screen/init-fake-terminal/main 10: 107 => ((4 integer))
mem: ((4 integer)): 1389 <= 107
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 107
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 107
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1291 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1291
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1291 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 107
run: clear-screen/init-fake-terminal/main 10: 108 => ((4 integer))
mem: ((4 integer)): 1389 <= 108
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 108
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 108
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1292 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1292
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1292 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 108
run: clear-screen/init-fake-terminal/main 10: 109 => ((4 integer))
mem: ((4 integer)): 1389 <= 109
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 109
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 109
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1293 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1293
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1293 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 109
run: clear-screen/init-fake-terminal/main 10: 110 => ((4 integer))
mem: ((4 integer)): 1389 <= 110
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 110
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 110
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1294 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1294
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1294 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 110
run: clear-screen/init-fake-terminal/main 10: 111 => ((4 integer))
mem: ((4 integer)): 1389 <= 111
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 111
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 111
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1295 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1295
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1295 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 111
run: clear-screen/init-fake-terminal/main 10: 112 => ((4 integer))
mem: ((4 integer)): 1389 <= 112
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 112
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 112
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1296 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1296
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1296 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 112
run: clear-screen/init-fake-terminal/main 10: 113 => ((4 integer))
mem: ((4 integer)): 1389 <= 113
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 113
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 113
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1297 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1297
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1297 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 113
run: clear-screen/init-fake-terminal/main 10: 114 => ((4 integer))
mem: ((4 integer)): 1389 <= 114
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 114
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 114
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1298 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1298
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1298 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 114
run: clear-screen/init-fake-terminal/main 10: 115 => ((4 integer))
mem: ((4 integer)): 1389 <= 115
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 115
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 115
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1299 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1299
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1299 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 115
run: clear-screen/init-fake-terminal/main 10: 116 => ((4 integer))
mem: ((4 integer)): 1389 <= 116
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 116
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 116
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1300 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1300
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1300 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 116
run: clear-screen/init-fake-terminal/main 10: 117 => ((4 integer))
mem: ((4 integer)): 1389 <= 117
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 117
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 117
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1301 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1301
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1301 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 117
run: clear-screen/init-fake-terminal/main 10: 118 => ((4 integer))
mem: ((4 integer)): 1389 <= 118
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 118
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 118
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1302 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1302
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1302 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 118
run: clear-screen/init-fake-terminal/main 10: 119 => ((4 integer))
mem: ((4 integer)): 1389 <= 119
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 119
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 119
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1303 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1303
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1303 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 119
run: clear-screen/init-fake-terminal/main 10: 120 => ((4 integer))
mem: ((4 integer)): 1389 <= 120
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 120
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 120
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1304 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1304
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1304 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 120
run: clear-screen/init-fake-terminal/main 10: 121 => ((4 integer))
mem: ((4 integer)): 1389 <= 121
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 121
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 121
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1305 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1305
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1305 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 121
run: clear-screen/init-fake-terminal/main 10: 122 => ((4 integer))
mem: ((4 integer)): 1389 <= 122
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 122
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 122
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1306 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1306
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1306 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 122
run: clear-screen/init-fake-terminal/main 10: 123 => ((4 integer))
mem: ((4 integer)): 1389 <= 123
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 123
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 123
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1307 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1307
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1307 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 123
run: clear-screen/init-fake-terminal/main 10: 124 => ((4 integer))
mem: ((4 integer)): 1389 <= 124
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 124
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 124
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1308 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1308
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1308 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 124
run: clear-screen/init-fake-terminal/main 10: 125 => ((4 integer))
mem: ((4 integer)): 1389 <= 125
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 125
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 125
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1309 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1309
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1309 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 125
run: clear-screen/init-fake-terminal/main 10: 126 => ((4 integer))
mem: ((4 integer)): 1389 <= 126
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 126
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 126
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1310 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1310
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1310 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 126
run: clear-screen/init-fake-terminal/main 10: 127 => ((4 integer))
mem: ((4 integer)): 1389 <= 127
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 127
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 127
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1311 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1311
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1311 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 127
run: clear-screen/init-fake-terminal/main 10: 128 => ((4 integer))
mem: ((4 integer)): 1389 <= 128
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 128
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 128
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1312 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1312
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1312 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 128
run: clear-screen/init-fake-terminal/main 10: 129 => ((4 integer))
mem: ((4 integer)): 1389 <= 129
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 129
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 129
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1313 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1313
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1313 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 129
run: clear-screen/init-fake-terminal/main 10: 130 => ((4 integer))
mem: ((4 integer)): 1389 <= 130
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 130
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 130
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1314 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1314
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1314 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 130
run: clear-screen/init-fake-terminal/main 10: 131 => ((4 integer))
mem: ((4 integer)): 1389 <= 131
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 131
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 131
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1315 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1315
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1315 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 131
run: clear-screen/init-fake-terminal/main 10: 132 => ((4 integer))
mem: ((4 integer)): 1389 <= 132
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 132
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 132
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1316 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1316
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1316 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 132
run: clear-screen/init-fake-terminal/main 10: 133 => ((4 integer))
mem: ((4 integer)): 1389 <= 133
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 133
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 133
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1317 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1317
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1317 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 133
run: clear-screen/init-fake-terminal/main 10: 134 => ((4 integer))
mem: ((4 integer)): 1389 <= 134
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 134
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 134
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1318 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1318
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1318 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 134
run: clear-screen/init-fake-terminal/main 10: 135 => ((4 integer))
mem: ((4 integer)): 1389 <= 135
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 135
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 135
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1319 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1319
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1319 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 135
run: clear-screen/init-fake-terminal/main 10: 136 => ((4 integer))
mem: ((4 integer)): 1389 <= 136
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 136
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 136
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1320 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1320
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1320 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 136
run: clear-screen/init-fake-terminal/main 10: 137 => ((4 integer))
mem: ((4 integer)): 1389 <= 137
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 137
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 137
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1321 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1321
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1321 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 137
run: clear-screen/init-fake-terminal/main 10: 138 => ((4 integer))
mem: ((4 integer)): 1389 <= 138
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 138
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 138
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1322 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1322
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1322 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 138
run: clear-screen/init-fake-terminal/main 10: 139 => ((4 integer))
mem: ((4 integer)): 1389 <= 139
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 139
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 139
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1323 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1323
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1323 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 139
run: clear-screen/init-fake-terminal/main 10: 140 => ((4 integer))
mem: ((4 integer)): 1389 <= 140
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 140
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 140
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1324 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1324
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1324 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 140
run: clear-screen/init-fake-terminal/main 10: 141 => ((4 integer))
mem: ((4 integer)): 1389 <= 141
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 141
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 141
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1325 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1325
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1325 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 141
run: clear-screen/init-fake-terminal/main 10: 142 => ((4 integer))
mem: ((4 integer)): 1389 <= 142
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 142
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 142
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1326 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1326
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1326 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 142
run: clear-screen/init-fake-terminal/main 10: 143 => ((4 integer))
mem: ((4 integer)): 1389 <= 143
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 143
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 143
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1327 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1327
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1327 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 143
run: clear-screen/init-fake-terminal/main 10: 144 => ((4 integer))
mem: ((4 integer)): 1389 <= 144
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 144
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 144
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1328 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1328
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1328 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 144
run: clear-screen/init-fake-terminal/main 10: 145 => ((4 integer))
mem: ((4 integer)): 1389 <= 145
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 145
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 145
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1329 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1329
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1329 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 145
run: clear-screen/init-fake-terminal/main 10: 146 => ((4 integer))
mem: ((4 integer)): 1389 <= 146
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 146
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 146
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1330 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1330
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1330 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 146
run: clear-screen/init-fake-terminal/main 10: 147 => ((4 integer))
mem: ((4 integer)): 1389 <= 147
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 147
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 147
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1331 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1331
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1331 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 147
run: clear-screen/init-fake-terminal/main 10: 148 => ((4 integer))
mem: ((4 integer)): 1389 <= 148
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 148
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 148
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1332 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1332
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1332 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 148
run: clear-screen/init-fake-terminal/main 10: 149 => ((4 integer))
mem: ((4 integer)): 1389 <= 149
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 149
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 149
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1333 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1333
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1333 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 149
run: clear-screen/init-fake-terminal/main 10: 150 => ((4 integer))
mem: ((4 integer)): 1389 <= 150
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 150
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 150
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1334 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1334
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1334 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 150
run: clear-screen/init-fake-terminal/main 10: 151 => ((4 integer))
mem: ((4 integer)): 1389 <= 151
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 151
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 151
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1335 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1335
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1335 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 151
run: clear-screen/init-fake-terminal/main 10: 152 => ((4 integer))
mem: ((4 integer)): 1389 <= 152
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 152
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 152
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1336 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1336
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1336 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 152
run: clear-screen/init-fake-terminal/main 10: 153 => ((4 integer))
mem: ((4 integer)): 1389 <= 153
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 153
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 153
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1337 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1337
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1337 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 153
run: clear-screen/init-fake-terminal/main 10: 154 => ((4 integer))
mem: ((4 integer)): 1389 <= 154
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 154
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 154
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1338 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1338
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1338 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 154
run: clear-screen/init-fake-terminal/main 10: 155 => ((4 integer))
mem: ((4 integer)): 1389 <= 155
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 155
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 155
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1339 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1339
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1339 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 155
run: clear-screen/init-fake-terminal/main 10: 156 => ((4 integer))
mem: ((4 integer)): 1389 <= 156
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 156
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 156
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1340 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1340
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1340 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 156
run: clear-screen/init-fake-terminal/main 10: 157 => ((4 integer))
mem: ((4 integer)): 1389 <= 157
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 157
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
schedule: scheduling clear-screen/init-fake-terminal/main for further processing
schedule: write/send-keys-to-stdin
run: write/send-keys-to-stdin 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: write/send-keys-to-stdin 7: 1103 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 101193 <= 1103
run: write/send-keys-to-stdin 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/send-keys-to-stdin 8: 1101 => ((7 integer-address))
mem: ((7 integer-address)): 101194 <= 1101
run: write/send-keys-to-stdin 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 1
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 9: 1106 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 101195 <= 1106
run: write/send-keys-to-stdin 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character o . nil))
run: write/send-keys-to-stdin 10: #(tagged record (character #\o . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1106 <= character
mem: ((8 tagged-value-address) (deref)): 1107 <= #\o
run: write/send-keys-to-stdin 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 1
run: write/send-keys-to-stdin 11: 2 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 2
run: write/send-keys-to-stdin 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 12: 2 => ((9 integer))
mem: ((9 integer)): 101196 <= 2
run: write/send-keys-to-stdin 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 2
mem: ((9 integer)) => 2
run: write/send-keys-to-stdin 13: nil => ((10 boolean))
mem: ((10 boolean)): 101197 <= nil
run: write/send-keys-to-stdin 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => nil
run: write/send-keys-to-stdin 15: (((7 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: write/send-keys-to-stdin 15: 0 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 0
run: write/send-keys-to-stdin 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 0 1103 . nil))
run: send-keys-to-stdin 6: #(tagged record (1 0 1103 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1100 <= 1
mem: ((2 channel-address) (deref)): 1101 <= 0
mem: ((2 channel-address) (deref)): 1102 <= 1103
run: send-keys-to-stdin 7: (((6 boolean)) <- ((equal)) ((3 character)) (( literal)))
mem: ((3 character)) => o
run: send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101007 <= nil
run: send-keys-to-stdin 8: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: send-keys-to-stdin 9: (((jump)) ((-7 offset)))
run: send-keys-to-stdin 3: (((3 character)) <- ((read-key)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read-key/send-keys-to-stdin 0: 101279 => ((default-space space-address))
run: read-key/send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067)
run: read-key/send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101281 <= 1067
run: read-key/send-keys-to-stdin 2: (((2 terminal-address)) <- ((next-input)))
arg: nil 1 (1067)
run: read-key/send-keys-to-stdin 2: nil => ((2 terminal-address))
mem: ((2 terminal-address)): 101282 <= nil
run: read-key/send-keys-to-stdin 3: (((jump-unless)) ((1 keyboard-address)) ((9 offset)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: read-key/send-keys-to-stdin 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 101283 <= 1067
run: read-key/send-keys-to-stdin 5: (((4 string-address)) <- ((get)) ((1 keyboard-address) (deref)) ((1 offset)))
mem: ((1068 string-address) (raw)) => 1031
run: read-key/send-keys-to-stdin 5: 1031 => ((4 string-address))
mem: ((4 string-address)): 101284 <= 1031
run: read-key/send-keys-to-stdin 6: (((5 integer)) <- ((length)) ((4 string-address) (deref)))
array-len: ((4 string-address) (deref))
mem: ((1031 integer) (raw)) => 4
run: read-key/send-keys-to-stdin 6: 4 => ((5 integer))
mem: ((5 integer)): 101285 <= 4
run: read-key/send-keys-to-stdin 7: (((6 boolean)) <- ((greater-or-equal)) ((3 integer-address) (deref)) ((5 integer)))
mem: ((3 integer-address) (deref)) => 2
mem: ((5 integer)) => 4
run: read-key/send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101286 <= nil
run: read-key/send-keys-to-stdin 8: (((jump-unless)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: read-key/send-keys-to-stdin 10: (((7 character)) <- ((index)) ((4 string-address) (deref)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 2
array-len: ((1031 string) (raw))
mem: ((1031 integer) (raw)) => 4
mem: ((1034 byte) (raw)) => o
run: read-key/send-keys-to-stdin 10: #\o => ((7 character))
mem: ((7 character)): 101287 <= #\o
run: read-key/send-keys-to-stdin 11: (((3 integer-address) (deref)) <- ((add)) ((3 integer-address) (deref)) ((1 literal)))
mem: ((3 integer-address) (deref)) => 2
run: read-key/send-keys-to-stdin 11: 3 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1067 <= 3
run: read-key/send-keys-to-stdin 12: (((reply)) ((7 character)))
mem: ((7 character)) => o
run: send-keys-to-stdin 3: #\o => ((3 character))
mem: ((3 character)): 101004 <= #\o
run: send-keys-to-stdin 4: (((jump-unless)) ((3 character)) ((-2 offset)))
mem: ((3 character)) => o
run: send-keys-to-stdin 5: (((4 tagged-value)) <- ((save-type)) ((3 character)))
mem: ((3 character)) => o
run: send-keys-to-stdin 5: #(tagged record (character #\o)) => ((4 tagged-value))
mem: ((4 tagged-value)): 101005 <= character
mem: ((4 tagged-value)): 101006 <= #\o
run: send-keys-to-stdin 6: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((4 tagged-value)))
mem: ((2 channel-address)) => 1100
mem: ((4 tagged-value)) => #(tagged record (character o . nil))
run: write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/send-keys-to-stdin 0: 101310 => ((default-space space-address))
run: write/send-keys-to-stdin 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 #(tagged record (character #\o . nil)))
run: write/send-keys-to-stdin 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 101312 <= 1100
run: write/send-keys-to-stdin 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1100 #(tagged record (character #\o . nil)))
run: write/send-keys-to-stdin 2: #(tagged record (character #\o . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 101313 <= character
mem: ((2 tagged-value)): 101314 <= #\o
run: write/send-keys-to-stdin 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 0 1103 . nil))
run: full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/send-keys-to-stdin 0: 101341 => ((default-space space-address))
run: full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1103 . nil)))
run: full?/write/send-keys-to-stdin 1: #(tagged record (1 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101343 <= 1
mem: ((1 channel)): 101344 <= 0
mem: ((1 channel)): 101345 <= 1103
run: full?/write/send-keys-to-stdin 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((101344 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 2: 0 => ((4 integer))
mem: ((4 integer)): 101346 <= 0
run: full?/write/send-keys-to-stdin 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: full?/write/send-keys-to-stdin 3: 1 => ((4 integer))
mem: ((4 integer)): 101346 <= 1
run: full?/write/send-keys-to-stdin 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (1 0 1103 . nil))
run: capacity/full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/send-keys-to-stdin 0: 101372 => ((default-space space-address))
run: capacity/full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1103 . nil)))
run: capacity/full?/write/send-keys-to-stdin 1: #(tagged record (1 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101374 <= 1
mem: ((1 channel)): 101375 <= 0
mem: ((1 channel)): 101376 <= 1103
run: capacity/full?/write/send-keys-to-stdin 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((101376 tagged-value-array-address) (raw)) => 1103
run: capacity/full?/write/send-keys-to-stdin 2: 1103 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 101377 <= 1103
run: capacity/full?/write/send-keys-to-stdin 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: capacity/full?/write/send-keys-to-stdin 3: 2 => ((5 integer))
mem: ((5 integer)): 101378 <= 2
run: capacity/full?/write/send-keys-to-stdin 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 4: 2 => ((5 integer))
mem: ((5 integer)): 101347 <= 2
run: full?/write/send-keys-to-stdin 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 5: t => ((6 boolean))
mem: ((6 boolean)): 101348 <= t
run: full?/write/send-keys-to-stdin 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: full?/write/send-keys-to-stdin 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((101343 integer) (raw)) => 1
run: full?/write/send-keys-to-stdin 8: 1 => ((7 integer))
mem: ((7 integer)): 101349 <= 1
run: full?/write/send-keys-to-stdin 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 1
mem: ((4 integer)) => 1
run: full?/write/send-keys-to-stdin 9: t => ((8 boolean))
mem: ((8 boolean)): 101350 <= t
run: full?/write/send-keys-to-stdin 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/send-keys-to-stdin 3: t => ((4 boolean))
mem: ((4 boolean)): 101315 <= t
run: write/send-keys-to-stdin 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/send-keys-to-stdin 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/send-keys-to-stdin 5: 1100 => ((5 integer-address))
mem: ((5 integer-address)): 101316 <= 1100
run: write/send-keys-to-stdin 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 1
schedule: pushing write/send-keys-to-stdin to sleep queue
schedule: waking up read/buffer-lines
schedule: clear-screen/init-fake-terminal/main
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 157
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1341 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1341
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1341 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 157
run: clear-screen/init-fake-terminal/main 10: 158 => ((4 integer))
mem: ((4 integer)): 1389 <= 158
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 158
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 158
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1342 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1342
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1342 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 158
run: clear-screen/init-fake-terminal/main 10: 159 => ((4 integer))
mem: ((4 integer)): 1389 <= 159
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 159
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 159
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1343 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1343
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1343 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 159
run: clear-screen/init-fake-terminal/main 10: 160 => ((4 integer))
mem: ((4 integer)): 1389 <= 160
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 160
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 160
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1344 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1344
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1344 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 160
run: clear-screen/init-fake-terminal/main 10: 161 => ((4 integer))
mem: ((4 integer)): 1389 <= 161
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 161
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 161
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1345 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1345
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1345 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 161
run: clear-screen/init-fake-terminal/main 10: 162 => ((4 integer))
mem: ((4 integer)): 1389 <= 162
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 162
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 162
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1346 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1346
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1346 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 162
run: clear-screen/init-fake-terminal/main 10: 163 => ((4 integer))
mem: ((4 integer)): 1389 <= 163
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 163
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 163
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1347 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1347
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1347 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 163
run: clear-screen/init-fake-terminal/main 10: 164 => ((4 integer))
mem: ((4 integer)): 1389 <= 164
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 164
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 164
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1348 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1348
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1348 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 164
run: clear-screen/init-fake-terminal/main 10: 165 => ((4 integer))
mem: ((4 integer)): 1389 <= 165
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 165
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 165
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1349 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1349
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1349 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 165
run: clear-screen/init-fake-terminal/main 10: 166 => ((4 integer))
mem: ((4 integer)): 1389 <= 166
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 166
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 166
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1350 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1350
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1350 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 166
run: clear-screen/init-fake-terminal/main 10: 167 => ((4 integer))
mem: ((4 integer)): 1389 <= 167
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 167
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 167
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1351 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1351
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1351 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 167
run: clear-screen/init-fake-terminal/main 10: 168 => ((4 integer))
mem: ((4 integer)): 1389 <= 168
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 168
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 168
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1352 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1352
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1352 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 168
run: clear-screen/init-fake-terminal/main 10: 169 => ((4 integer))
mem: ((4 integer)): 1389 <= 169
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 169
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 169
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1353 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1353
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1353 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 169
run: clear-screen/init-fake-terminal/main 10: 170 => ((4 integer))
mem: ((4 integer)): 1389 <= 170
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 170
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 170
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1354 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1354
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1354 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 170
run: clear-screen/init-fake-terminal/main 10: 171 => ((4 integer))
mem: ((4 integer)): 1389 <= 171
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 171
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 171
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1355 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1355
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1355 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 171
run: clear-screen/init-fake-terminal/main 10: 172 => ((4 integer))
mem: ((4 integer)): 1389 <= 172
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 172
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 172
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1356 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1356
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1356 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 172
run: clear-screen/init-fake-terminal/main 10: 173 => ((4 integer))
mem: ((4 integer)): 1389 <= 173
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 173
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 173
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1357 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1357
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1357 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 173
run: clear-screen/init-fake-terminal/main 10: 174 => ((4 integer))
mem: ((4 integer)): 1389 <= 174
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 174
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 174
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1358 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1358
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1358 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 174
run: clear-screen/init-fake-terminal/main 10: 175 => ((4 integer))
mem: ((4 integer)): 1389 <= 175
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 175
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 175
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1359 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1359
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1359 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 175
run: clear-screen/init-fake-terminal/main 10: 176 => ((4 integer))
mem: ((4 integer)): 1389 <= 176
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 176
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 176
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1360 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1360
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1360 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 176
run: clear-screen/init-fake-terminal/main 10: 177 => ((4 integer))
mem: ((4 integer)): 1389 <= 177
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 177
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 177
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1361 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1361
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1361 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 177
run: clear-screen/init-fake-terminal/main 10: 178 => ((4 integer))
mem: ((4 integer)): 1389 <= 178
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 178
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 178
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1362 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1362
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1362 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 178
run: clear-screen/init-fake-terminal/main 10: 179 => ((4 integer))
mem: ((4 integer)): 1389 <= 179
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 179
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 179
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1363 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1363
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1363 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 179
run: clear-screen/init-fake-terminal/main 10: 180 => ((4 integer))
mem: ((4 integer)): 1389 <= 180
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 180
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 180
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1364 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1364
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1364 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 180
run: clear-screen/init-fake-terminal/main 10: 181 => ((4 integer))
mem: ((4 integer)): 1389 <= 181
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 181
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 181
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1365 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1365
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1365 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 181
run: clear-screen/init-fake-terminal/main 10: 182 => ((4 integer))
mem: ((4 integer)): 1389 <= 182
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 182
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 182
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1366 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1366
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1366 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 182
run: clear-screen/init-fake-terminal/main 10: 183 => ((4 integer))
mem: ((4 integer)): 1389 <= 183
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 183
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 183
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1367 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1367
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1367 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 183
run: clear-screen/init-fake-terminal/main 10: 184 => ((4 integer))
mem: ((4 integer)): 1389 <= 184
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 184
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 184
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1368 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1368
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1368 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 184
run: clear-screen/init-fake-terminal/main 10: 185 => ((4 integer))
mem: ((4 integer)): 1389 <= 185
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 185
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 185
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1369 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1369
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1369 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 185
run: clear-screen/init-fake-terminal/main 10: 186 => ((4 integer))
mem: ((4 integer)): 1389 <= 186
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 186
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 186
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1370 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1370
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1370 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 186
run: clear-screen/init-fake-terminal/main 10: 187 => ((4 integer))
mem: ((4 integer)): 1389 <= 187
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 187
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 187
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1371 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1371
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1371 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 187
run: clear-screen/init-fake-terminal/main 10: 188 => ((4 integer))
mem: ((4 integer)): 1389 <= 188
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 188
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 188
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1372 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1372
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1372 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 188
run: clear-screen/init-fake-terminal/main 10: 189 => ((4 integer))
mem: ((4 integer)): 1389 <= 189
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 189
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 189
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1373 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1373
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1373 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 189
run: clear-screen/init-fake-terminal/main 10: 190 => ((4 integer))
mem: ((4 integer)): 1389 <= 190
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 190
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 190
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1374 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1374
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1374 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 190
run: clear-screen/init-fake-terminal/main 10: 191 => ((4 integer))
mem: ((4 integer)): 1389 <= 191
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 191
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 191
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1375 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1375
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1375 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 191
run: clear-screen/init-fake-terminal/main 10: 192 => ((4 integer))
mem: ((4 integer)): 1389 <= 192
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 192
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 192
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1376 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1376
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1376 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 192
run: clear-screen/init-fake-terminal/main 10: 193 => ((4 integer))
mem: ((4 integer)): 1389 <= 193
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 193
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 193
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1377 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1377
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1377 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 193
run: clear-screen/init-fake-terminal/main 10: 194 => ((4 integer))
mem: ((4 integer)): 1389 <= 194
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 194
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 194
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1378 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1378
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1378 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 194
run: clear-screen/init-fake-terminal/main 10: 195 => ((4 integer))
mem: ((4 integer)): 1389 <= 195
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 195
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 195
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1379 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1379
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1379 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 195
run: clear-screen/init-fake-terminal/main 10: 196 => ((4 integer))
mem: ((4 integer)): 1389 <= 196
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 196
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 196
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1380 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1380
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1380 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 196
run: clear-screen/init-fake-terminal/main 10: 197 => ((4 integer))
mem: ((4 integer)): 1389 <= 197
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 197
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 197
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1381 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1381
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1381 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 197
run: clear-screen/init-fake-terminal/main 10: 198 => ((4 integer))
mem: ((4 integer)): 1389 <= 198
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 198
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 198
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1382 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1382
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1382 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 198
run: clear-screen/init-fake-terminal/main 10: 199 => ((4 integer))
mem: ((4 integer)): 1389 <= 199
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 199
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: nil => ((5 boolean))
mem: ((5 boolean)): 1390 <= nil
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => nil
run: clear-screen/init-fake-terminal/main 8: (((1 byte-address)) <- ((index-address)) ((2 string-address) (deref)) ((4 integer)))
mem: ((4 integer)) => 199
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: clear-screen/init-fake-terminal/main 8: 1383 => ((1 byte-address))
mem: ((1 byte-address)): 1386 <= 1383
run: clear-screen/init-fake-terminal/main 9: (((1 byte-address) (deref)) <- ((copy)) ((  literal)))
run: clear-screen/init-fake-terminal/main 9: #\space => ((1 byte-address) (deref))
mem: ((1 byte-address) (deref)): 1383 <= #\space
run: clear-screen/init-fake-terminal/main 10: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 199
run: clear-screen/init-fake-terminal/main 10: 200 => ((4 integer))
mem: ((4 integer)): 1389 <= 200
run: clear-screen/init-fake-terminal/main 11: (((jump)) ((-6 offset)))
run: clear-screen/init-fake-terminal/main 6: (((5 boolean)) <- ((greater-or-equal)) ((4 integer)) ((3 integer)))
mem: ((4 integer)) => 200
mem: ((3 integer)) => 200
run: clear-screen/init-fake-terminal/main 6: t => ((5 boolean))
mem: ((5 boolean)): 1390 <= t
run: clear-screen/init-fake-terminal/main 7: (((jump-if)) ((5 boolean)) ((4 offset)))
mem: ((5 boolean)) => t
run: clear-screen/init-fake-terminal/main 12: (((reply)))
run: init-fake-terminal/main 14: (((reply)) ((1 terminal-address)))
mem: ((1 terminal-address)) => 1178
run: main 7: 1178 => ((6 terminal-address))
mem: ((6 terminal-address)): 1007 <= 1178
run: main 8: (((5 string-address) (raw)) <- ((get)) ((6 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: main 8: 1183 => ((5 string-address) (raw))
mem: ((5 string-address) (raw)): 5 <= 1183
run: main 9: (((fork-helper)) ((send-prints-to-stdout fn)) ((nil literal) (globals)) ((nil literal) (limit)) ((6 terminal-address)) ((4 channel-address)))
mem: ((6 terminal-address)) => 1178
mem: ((4 channel-address)) => 1139
run: main 10: (((sleep)) ((until-routine-done literal)) ((5 integer) (routine)))
mem: ((5 integer) (routine)) => 2
schedule: pushing main to sleep queue
schedule: read/buffer-lines
run: read/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/buffer-lines 6: 1100 => ((4 integer-address))
mem: ((4 integer-address)): 201257 <= 1100
run: read/buffer-lines 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: read/buffer-lines 7: 1103 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 201258 <= 1103
run: read/buffer-lines 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 1
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
mem: ((1106 tagged-value) (raw)) => #(tagged record (character o . nil))
run: read/buffer-lines 8: #(tagged record (character #\o . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 201259 <= character
mem: ((6 tagged-value)): 201260 <= #\o
run: read/buffer-lines 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 1
run: read/buffer-lines 9: 2 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 2
run: read/buffer-lines 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: read/buffer-lines 10: 2 => ((8 integer))
mem: ((8 integer)): 201261 <= 2
run: read/buffer-lines 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 2
mem: ((8 integer)) => 2
run: read/buffer-lines 11: nil => ((9 boolean))
mem: ((9 boolean)): 201262 <= nil
run: read/buffer-lines 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => nil
run: read/buffer-lines 13: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: read/buffer-lines 13: 0 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 0
run: read/buffer-lines 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character o . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 0 1103 . nil))
run: buffer-lines 4: #(tagged record (character #\o . nil)) => ((4 tagged-value))
mem: ((4 tagged-value)): 201005 <= character
mem: ((4 tagged-value)): 201006 <= #\o
run: buffer-lines 4: #(tagged record (0 0 1103 . nil)) => ((1 channel-address) (deref))
mem: ((1 channel-address) (deref)): 1100 <= 0
mem: ((1 channel-address) (deref)): 1101 <= 0
mem: ((1 channel-address) (deref)): 1102 <= 1103
run: buffer-lines 5: (((6 character)) <- ((maybe-coerce)) ((4 tagged-value)) ((character literal)))
mem: ((4 tagged-value)) => #(tagged record (character o . nil))
run: maybe-coerce/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/buffer-lines 0: 201314 => ((default-space space-address))
run: maybe-coerce/buffer-lines 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/buffer-lines 1: 201345 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 201316 <= 201345
run: maybe-coerce/buffer-lines 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/buffer-lines 2: #(tagged record (character #\o . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 201345 <= character
mem: ((1 tagged-value-address) (deref)): 201346 <= #\o
run: maybe-coerce/buffer-lines 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/buffer-lines 3: character => ((2 type))
mem: ((2 type)): 201317 <= character
run: maybe-coerce/buffer-lines 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((201345 type) (raw)) => character
run: maybe-coerce/buffer-lines 4: character => ((3 type))
mem: ((3 type)): 201318 <= character
run: maybe-coerce/buffer-lines 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/buffer-lines 5: t => ((4 boolean))
mem: ((4 boolean)): 201319 <= t
run: maybe-coerce/buffer-lines 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/buffer-lines 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((201346 location) (raw)) => o
run: maybe-coerce/buffer-lines 8: #\o => ((5 location))
mem: ((5 location)): 201320 <= #\o
run: maybe-coerce/buffer-lines 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => o
mem: ((4 boolean)) => t
run: buffer-lines 5: #\o => ((6 character))
mem: ((6 character)): 201007 <= #\o
run: buffer-lines 6: (((assert)) ((6 character)))
mem: ((6 character)) => o
run: buffer-lines 7: (((7 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => o
run: buffer-lines 7: nil => ((7 boolean))
mem: ((7 boolean)): 201008 <= nil
run: buffer-lines 8: (((jump-unless)) ((7 boolean)) ((5 offset)))
mem: ((7 boolean)) => nil
run: buffer-lines 14: (((3 buffer-address)) <- ((append)) ((3 buffer-address)) ((6 character)))
mem: ((3 buffer-address)) => 201062
mem: ((6 character)) => o
run: append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: append/buffer-lines 0: 201347 => ((default-space space-address))
run: append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062 #\o)
run: append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201349 <= 201062
run: append/buffer-lines 2: (((2 character)) <- ((next-input)))
arg: nil 1 (201062 #\o)
run: append/buffer-lines 2: #\o => ((2 character))
mem: ((2 character)): 201350 <= #\o
run: append/buffer-lines 3: (((3 boolean)) <- ((buffer-full?)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 201062
run: buffer-full?/append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-full?/append/buffer-lines 0: 201378 => ((default-space space-address))
run: buffer-full?/append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062)
run: buffer-full?/append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201380 <= 201062
run: buffer-full?/append/buffer-lines 2: (((2 integer)) <- ((get)) ((1 buffer-address) (deref)) ((0 offset)))
mem: ((201062 integer) (raw)) => 1
run: buffer-full?/append/buffer-lines 2: 1 => ((2 integer))
mem: ((2 integer)): 201381 <= 1
run: buffer-full?/append/buffer-lines 3: (((3 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: buffer-full?/append/buffer-lines 3: 201064 => ((3 string-address))
mem: ((3 string-address)): 201382 <= 201064
run: buffer-full?/append/buffer-lines 4: (((4 integer)) <- ((length)) ((3 string-address) (deref)))
array-len: ((3 string-address) (deref))
mem: ((201064 integer) (raw)) => 30
run: buffer-full?/append/buffer-lines 4: 30 => ((4 integer))
mem: ((4 integer)): 201383 <= 30
run: buffer-full?/append/buffer-lines 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer)))
mem: ((2 integer)) => 1
mem: ((4 integer)) => 30
run: buffer-full?/append/buffer-lines 5: nil => ((5 boolean))
mem: ((5 boolean)): 201384 <= nil
run: buffer-full?/append/buffer-lines 6: (((reply)) ((5 boolean)))
mem: ((5 boolean)) => nil
run: append/buffer-lines 3: nil => ((3 boolean))
mem: ((3 boolean)): 201351 <= nil
run: append/buffer-lines 4: (((jump-unless)) ((3 boolean)) ((1 offset)))
mem: ((3 boolean)) => nil
run: append/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: append/buffer-lines 6: 201062 => ((4 integer-address))
mem: ((4 integer-address)): 201352 <= 201062
run: append/buffer-lines 7: (((5 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: append/buffer-lines 7: 201064 => ((5 string-address))
mem: ((5 string-address)): 201353 <= 201064
run: append/buffer-lines 8: (((6 byte-address)) <- ((index-address)) ((5 string-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 1
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
run: append/buffer-lines 8: 201066 => ((6 byte-address))
mem: ((6 byte-address)): 201354 <= 201066
run: append/buffer-lines 9: (((6 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => o
run: append/buffer-lines 9: #\o => ((6 byte-address) (deref))
mem: ((6 byte-address) (deref)): 201066 <= #\o
run: append/buffer-lines 10: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 1
run: append/buffer-lines 10: 2 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 201062 <= 2
run: append/buffer-lines 11: (((reply)) ((1 buffer-address) (same-as-arg 0)))
mem: ((1 buffer-address) (same-as-arg 0)) => 201062
run: buffer-lines 14: 201062 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 201062
run: buffer-lines 15: (((10 boolean)) <- ((equal)) ((6 character)) ((
 literal)))
mem: ((6 character)) => o
run: buffer-lines 15: nil => ((10 boolean))
mem: ((10 boolean)): 201011 <= nil
run: buffer-lines 16: (((jump-if)) ((10 boolean)) ((3 offset)))
mem: ((10 boolean)) => nil
run: buffer-lines 17: (((11 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => o
run: buffer-lines 17: nil => ((11 boolean))
mem: ((11 boolean)): 201012 <= nil
run: buffer-lines 18: (((jump-if)) ((11 boolean)) ((12 offset)))
mem: ((11 boolean)) => nil
run: buffer-lines 19: (((jump)) ((-16 offset)))
run: buffer-lines 4: (((4 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/buffer-lines 0: 201409 => ((default-space space-address))
run: read/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100)
run: read/buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 201411 <= 1100
run: read/buffer-lines 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1103 . nil))
run: empty?/read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/buffer-lines 0: 201440 => ((default-space space-address))
run: empty?/read/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1103 . nil)))
run: empty?/read/buffer-lines 1: #(tagged record (0 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 201442 <= 0
mem: ((1 channel)): 201443 <= 0
mem: ((1 channel)): 201444 <= 1103
run: empty?/read/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201442 integer) (raw)) => 0
run: empty?/read/buffer-lines 2: 0 => ((4 integer))
mem: ((4 integer)): 201445 <= 0
run: empty?/read/buffer-lines 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201443 integer) (raw)) => 0
run: empty?/read/buffer-lines 3: 0 => ((5 integer))
mem: ((5 integer)): 201446 <= 0
run: empty?/read/buffer-lines 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 0
run: empty?/read/buffer-lines 4: t => ((6 boolean))
mem: ((6 boolean)): 201447 <= t
run: empty?/read/buffer-lines 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/buffer-lines 2: t => ((2 boolean))
mem: ((2 boolean)): 201412 <= t
run: read/buffer-lines 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/buffer-lines 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/buffer-lines 4: 1101 => ((3 integer-address))
mem: ((3 integer-address)): 201413 <= 1101
run: read/buffer-lines 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 0
schedule: pushing read/buffer-lines to sleep queue
schedule: waking up write/send-keys-to-stdin
schedule: send-prints-to-stdout
run: send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: send-prints-to-stdout 0: 301000 => ((default-space space-address))
run: send-prints-to-stdout 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178 1139)
run: send-prints-to-stdout 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 301002 <= 1178
run: send-prints-to-stdout 2: (((2 channel-address)) <- ((next-input)))
arg: nil 1 (1178 1139)
run: send-prints-to-stdout 2: 1139 => ((2 channel-address))
mem: ((2 channel-address)): 301003 <= 1139
run: send-prints-to-stdout 3: (((3 tagged-value)) ((2 channel-address) (deref)) <- ((read)) ((2 channel-address)))
mem: ((2 channel-address)) => 1139
run: read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/send-prints-to-stdout 0: 301031 => ((default-space space-address))
run: read/send-prints-to-stdout 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139)
run: read/send-prints-to-stdout 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 301033 <= 1139
run: read/send-prints-to-stdout 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1142 . nil))
run: empty?/read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/send-prints-to-stdout 0: 301062 => ((default-space space-address))
run: empty?/read/send-prints-to-stdout 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1142 . nil)))
run: empty?/read/send-prints-to-stdout 1: #(tagged record (0 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 301064 <= 0
mem: ((1 channel)): 301065 <= 0
mem: ((1 channel)): 301066 <= 1142
run: empty?/read/send-prints-to-stdout 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((301064 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 2: 0 => ((4 integer))
mem: ((4 integer)): 301067 <= 0
run: empty?/read/send-prints-to-stdout 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((301065 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 3: 0 => ((5 integer))
mem: ((5 integer)): 301068 <= 0
run: empty?/read/send-prints-to-stdout 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 0
run: empty?/read/send-prints-to-stdout 4: t => ((6 boolean))
mem: ((6 boolean)): 301069 <= t
run: empty?/read/send-prints-to-stdout 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/send-prints-to-stdout 2: t => ((2 boolean))
mem: ((2 boolean)): 301034 <= t
run: read/send-prints-to-stdout 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/send-prints-to-stdout 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/send-prints-to-stdout 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 301035 <= 1140
run: read/send-prints-to-stdout 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 0
schedule: pushing read/send-prints-to-stdout to sleep queue
schedule: write/send-keys-to-stdin
run: write/send-keys-to-stdin 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: write/send-keys-to-stdin 7: 1103 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 101317 <= 1103
run: write/send-keys-to-stdin 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/send-keys-to-stdin 8: 1101 => ((7 integer-address))
mem: ((7 integer-address)): 101318 <= 1101
run: write/send-keys-to-stdin 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 9: 1104 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 101319 <= 1104
run: write/send-keys-to-stdin 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character o . nil))
run: write/send-keys-to-stdin 10: #(tagged record (character #\o . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1104 <= character
mem: ((8 tagged-value-address) (deref)): 1105 <= #\o
run: write/send-keys-to-stdin 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 0
run: write/send-keys-to-stdin 11: 1 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 1
run: write/send-keys-to-stdin 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 12: 2 => ((9 integer))
mem: ((9 integer)): 101320 <= 2
run: write/send-keys-to-stdin 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 1
mem: ((9 integer)) => 2
run: write/send-keys-to-stdin 13: t => ((10 boolean))
mem: ((10 boolean)): 101321 <= t
run: write/send-keys-to-stdin 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => t
run: write/send-keys-to-stdin 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1103 . nil))
run: send-keys-to-stdin 6: #(tagged record (0 1 1103 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1100 <= 0
mem: ((2 channel-address) (deref)): 1101 <= 1
mem: ((2 channel-address) (deref)): 1102 <= 1103
run: send-keys-to-stdin 7: (((6 boolean)) <- ((equal)) ((3 character)) (( literal)))
mem: ((3 character)) => o
run: send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101007 <= nil
run: send-keys-to-stdin 8: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: send-keys-to-stdin 9: (((jump)) ((-7 offset)))
run: send-keys-to-stdin 3: (((3 character)) <- ((read-key)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read-key/send-keys-to-stdin 0: 101403 => ((default-space space-address))
run: read-key/send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067)
run: read-key/send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101405 <= 1067
run: read-key/send-keys-to-stdin 2: (((2 terminal-address)) <- ((next-input)))
arg: nil 1 (1067)
run: read-key/send-keys-to-stdin 2: nil => ((2 terminal-address))
mem: ((2 terminal-address)): 101406 <= nil
run: read-key/send-keys-to-stdin 3: (((jump-unless)) ((1 keyboard-address)) ((9 offset)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: read-key/send-keys-to-stdin 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 101407 <= 1067
run: read-key/send-keys-to-stdin 5: (((4 string-address)) <- ((get)) ((1 keyboard-address) (deref)) ((1 offset)))
mem: ((1068 string-address) (raw)) => 1031
run: read-key/send-keys-to-stdin 5: 1031 => ((4 string-address))
mem: ((4 string-address)): 101408 <= 1031
run: read-key/send-keys-to-stdin 6: (((5 integer)) <- ((length)) ((4 string-address) (deref)))
array-len: ((4 string-address) (deref))
mem: ((1031 integer) (raw)) => 4
run: read-key/send-keys-to-stdin 6: 4 => ((5 integer))
mem: ((5 integer)): 101409 <= 4
run: read-key/send-keys-to-stdin 7: (((6 boolean)) <- ((greater-or-equal)) ((3 integer-address) (deref)) ((5 integer)))
mem: ((3 integer-address) (deref)) => 3
mem: ((5 integer)) => 4
run: read-key/send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101410 <= nil
run: read-key/send-keys-to-stdin 8: (((jump-unless)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: read-key/send-keys-to-stdin 10: (((7 character)) <- ((index)) ((4 string-address) (deref)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 3
array-len: ((1031 string) (raw))
mem: ((1031 integer) (raw)) => 4
mem: ((1035 byte) (raw)) => 

run: read-key/send-keys-to-stdin 10: #\newline => ((7 character))
mem: ((7 character)): 101411 <= #\newline
run: read-key/send-keys-to-stdin 11: (((3 integer-address) (deref)) <- ((add)) ((3 integer-address) (deref)) ((1 literal)))
mem: ((3 integer-address) (deref)) => 3
run: read-key/send-keys-to-stdin 11: 4 => ((3 integer-address) (deref))
mem: ((3 integer-address) (deref)): 1067 <= 4
run: read-key/send-keys-to-stdin 12: (((reply)) ((7 character)))
mem: ((7 character)) => 

run: send-keys-to-stdin 3: #\newline => ((3 character))
mem: ((3 character)): 101004 <= #\newline
run: send-keys-to-stdin 4: (((jump-unless)) ((3 character)) ((-2 offset)))
mem: ((3 character)) => 

run: send-keys-to-stdin 5: (((4 tagged-value)) <- ((save-type)) ((3 character)))
mem: ((3 character)) => 

run: send-keys-to-stdin 5: #(tagged record (character #\newline)) => ((4 tagged-value))
mem: ((4 tagged-value)): 101005 <= character
mem: ((4 tagged-value)): 101006 <= #\newline
run: send-keys-to-stdin 6: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((4 tagged-value)))
mem: ((2 channel-address)) => 1100
mem: ((4 tagged-value)) => #(tagged record (character 
 . nil))
run: write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/send-keys-to-stdin 0: 101434 => ((default-space space-address))
run: write/send-keys-to-stdin 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 #(tagged record (character #\newline . nil)))
run: write/send-keys-to-stdin 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 101436 <= 1100
run: write/send-keys-to-stdin 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1100 #(tagged record (character #\newline . nil)))
run: write/send-keys-to-stdin 2: #(tagged record (character #\newline . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 101437 <= character
mem: ((2 tagged-value)): 101438 <= #\newline
run: write/send-keys-to-stdin 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1103 . nil))
run: full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/send-keys-to-stdin 0: 101465 => ((default-space space-address))
run: full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: full?/write/send-keys-to-stdin 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101467 <= 0
mem: ((1 channel)): 101468 <= 1
mem: ((1 channel)): 101469 <= 1103
run: full?/write/send-keys-to-stdin 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((101468 integer) (raw)) => 1
run: full?/write/send-keys-to-stdin 2: 1 => ((4 integer))
mem: ((4 integer)): 101470 <= 1
run: full?/write/send-keys-to-stdin 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: full?/write/send-keys-to-stdin 3: 2 => ((4 integer))
mem: ((4 integer)): 101470 <= 2
run: full?/write/send-keys-to-stdin 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 1 1103 . nil))
run: capacity/full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/send-keys-to-stdin 0: 101496 => ((default-space space-address))
run: capacity/full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: capacity/full?/write/send-keys-to-stdin 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101498 <= 0
mem: ((1 channel)): 101499 <= 1
mem: ((1 channel)): 101500 <= 1103
run: capacity/full?/write/send-keys-to-stdin 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((101500 tagged-value-array-address) (raw)) => 1103
run: capacity/full?/write/send-keys-to-stdin 2: 1103 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 101501 <= 1103
run: capacity/full?/write/send-keys-to-stdin 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: capacity/full?/write/send-keys-to-stdin 3: 2 => ((5 integer))
mem: ((5 integer)): 101502 <= 2
run: capacity/full?/write/send-keys-to-stdin 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 4: 2 => ((5 integer))
mem: ((5 integer)): 101471 <= 2
run: full?/write/send-keys-to-stdin 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 2
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 5: nil => ((6 boolean))
mem: ((6 boolean)): 101472 <= nil
run: full?/write/send-keys-to-stdin 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: full?/write/send-keys-to-stdin 7: (((4 integer)) <- ((copy)) ((0 literal)))
run: full?/write/send-keys-to-stdin 7: 0 => ((4 integer))
mem: ((4 integer)): 101470 <= 0
run: full?/write/send-keys-to-stdin 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((101467 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 8: 0 => ((7 integer))
mem: ((7 integer)): 101473 <= 0
run: full?/write/send-keys-to-stdin 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 0
run: full?/write/send-keys-to-stdin 9: t => ((8 boolean))
mem: ((8 boolean)): 101474 <= t
run: full?/write/send-keys-to-stdin 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/send-keys-to-stdin 3: t => ((4 boolean))
mem: ((4 boolean)): 101439 <= t
run: write/send-keys-to-stdin 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/send-keys-to-stdin 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/send-keys-to-stdin 5: 1100 => ((5 integer-address))
mem: ((5 integer-address)): 101440 <= 1100
run: write/send-keys-to-stdin 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 0
schedule: pushing write/send-keys-to-stdin to sleep queue
schedule: waking up read/buffer-lines
schedule: read/buffer-lines
run: read/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/buffer-lines 6: 1100 => ((4 integer-address))
mem: ((4 integer-address)): 201414 <= 1100
run: read/buffer-lines 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: read/buffer-lines 7: 1103 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 201415 <= 1103
run: read/buffer-lines 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
mem: ((1104 tagged-value) (raw)) => #(tagged record (character o . nil))
run: read/buffer-lines 8: #(tagged record (character #\o . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 201416 <= character
mem: ((6 tagged-value)): 201417 <= #\o
run: read/buffer-lines 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: read/buffer-lines 9: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 1
run: read/buffer-lines 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: read/buffer-lines 10: 2 => ((8 integer))
mem: ((8 integer)): 201418 <= 2
run: read/buffer-lines 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 1
mem: ((8 integer)) => 2
run: read/buffer-lines 11: t => ((9 boolean))
mem: ((9 boolean)): 201419 <= t
run: read/buffer-lines 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => t
run: read/buffer-lines 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character o . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1103 . nil))
run: buffer-lines 4: #(tagged record (character #\o . nil)) => ((4 tagged-value))
mem: ((4 tagged-value)): 201005 <= character
mem: ((4 tagged-value)): 201006 <= #\o
run: buffer-lines 4: #(tagged record (1 1 1103 . nil)) => ((1 channel-address) (deref))
mem: ((1 channel-address) (deref)): 1100 <= 1
mem: ((1 channel-address) (deref)): 1101 <= 1
mem: ((1 channel-address) (deref)): 1102 <= 1103
run: buffer-lines 5: (((6 character)) <- ((maybe-coerce)) ((4 tagged-value)) ((character literal)))
mem: ((4 tagged-value)) => #(tagged record (character o . nil))
run: maybe-coerce/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/buffer-lines 0: 201471 => ((default-space space-address))
run: maybe-coerce/buffer-lines 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/buffer-lines 1: 201502 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 201473 <= 201502
run: maybe-coerce/buffer-lines 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/buffer-lines 2: #(tagged record (character #\o . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 201502 <= character
mem: ((1 tagged-value-address) (deref)): 201503 <= #\o
run: maybe-coerce/buffer-lines 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/buffer-lines 3: character => ((2 type))
mem: ((2 type)): 201474 <= character
run: maybe-coerce/buffer-lines 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((201502 type) (raw)) => character
run: maybe-coerce/buffer-lines 4: character => ((3 type))
mem: ((3 type)): 201475 <= character
run: maybe-coerce/buffer-lines 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/buffer-lines 5: t => ((4 boolean))
mem: ((4 boolean)): 201476 <= t
run: maybe-coerce/buffer-lines 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/buffer-lines 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((201503 location) (raw)) => o
run: maybe-coerce/buffer-lines 8: #\o => ((5 location))
mem: ((5 location)): 201477 <= #\o
run: maybe-coerce/buffer-lines 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => o
mem: ((4 boolean)) => t
run: buffer-lines 5: #\o => ((6 character))
mem: ((6 character)): 201007 <= #\o
run: buffer-lines 6: (((assert)) ((6 character)))
mem: ((6 character)) => o
run: buffer-lines 7: (((7 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => o
run: buffer-lines 7: nil => ((7 boolean))
mem: ((7 boolean)): 201008 <= nil
run: buffer-lines 8: (((jump-unless)) ((7 boolean)) ((5 offset)))
mem: ((7 boolean)) => nil
run: buffer-lines 14: (((3 buffer-address)) <- ((append)) ((3 buffer-address)) ((6 character)))
mem: ((3 buffer-address)) => 201062
mem: ((6 character)) => o
run: append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: append/buffer-lines 0: 201504 => ((default-space space-address))
run: append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062 #\o)
run: append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201506 <= 201062
run: append/buffer-lines 2: (((2 character)) <- ((next-input)))
arg: nil 1 (201062 #\o)
run: append/buffer-lines 2: #\o => ((2 character))
mem: ((2 character)): 201507 <= #\o
run: append/buffer-lines 3: (((3 boolean)) <- ((buffer-full?)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 201062
run: buffer-full?/append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-full?/append/buffer-lines 0: 201535 => ((default-space space-address))
run: buffer-full?/append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062)
run: buffer-full?/append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201537 <= 201062
run: buffer-full?/append/buffer-lines 2: (((2 integer)) <- ((get)) ((1 buffer-address) (deref)) ((0 offset)))
mem: ((201062 integer) (raw)) => 2
run: buffer-full?/append/buffer-lines 2: 2 => ((2 integer))
mem: ((2 integer)): 201538 <= 2
run: buffer-full?/append/buffer-lines 3: (((3 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: buffer-full?/append/buffer-lines 3: 201064 => ((3 string-address))
mem: ((3 string-address)): 201539 <= 201064
run: buffer-full?/append/buffer-lines 4: (((4 integer)) <- ((length)) ((3 string-address) (deref)))
array-len: ((3 string-address) (deref))
mem: ((201064 integer) (raw)) => 30
run: buffer-full?/append/buffer-lines 4: 30 => ((4 integer))
mem: ((4 integer)): 201540 <= 30
run: buffer-full?/append/buffer-lines 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer)))
mem: ((2 integer)) => 2
mem: ((4 integer)) => 30
run: buffer-full?/append/buffer-lines 5: nil => ((5 boolean))
mem: ((5 boolean)): 201541 <= nil
run: buffer-full?/append/buffer-lines 6: (((reply)) ((5 boolean)))
mem: ((5 boolean)) => nil
run: append/buffer-lines 3: nil => ((3 boolean))
mem: ((3 boolean)): 201508 <= nil
run: append/buffer-lines 4: (((jump-unless)) ((3 boolean)) ((1 offset)))
mem: ((3 boolean)) => nil
run: append/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: append/buffer-lines 6: 201062 => ((4 integer-address))
mem: ((4 integer-address)): 201509 <= 201062
run: append/buffer-lines 7: (((5 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: append/buffer-lines 7: 201064 => ((5 string-address))
mem: ((5 string-address)): 201510 <= 201064
run: append/buffer-lines 8: (((6 byte-address)) <- ((index-address)) ((5 string-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 2
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
run: append/buffer-lines 8: 201067 => ((6 byte-address))
mem: ((6 byte-address)): 201511 <= 201067
run: append/buffer-lines 9: (((6 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => o
run: append/buffer-lines 9: #\o => ((6 byte-address) (deref))
mem: ((6 byte-address) (deref)): 201067 <= #\o
run: append/buffer-lines 10: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 2
run: append/buffer-lines 10: 3 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 201062 <= 3
run: append/buffer-lines 11: (((reply)) ((1 buffer-address) (same-as-arg 0)))
mem: ((1 buffer-address) (same-as-arg 0)) => 201062
run: buffer-lines 14: 201062 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 201062
run: buffer-lines 15: (((10 boolean)) <- ((equal)) ((6 character)) ((
 literal)))
mem: ((6 character)) => o
run: buffer-lines 15: nil => ((10 boolean))
mem: ((10 boolean)): 201011 <= nil
run: buffer-lines 16: (((jump-if)) ((10 boolean)) ((3 offset)))
mem: ((10 boolean)) => nil
run: buffer-lines 17: (((11 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => o
run: buffer-lines 17: nil => ((11 boolean))
mem: ((11 boolean)): 201012 <= nil
run: buffer-lines 18: (((jump-if)) ((11 boolean)) ((12 offset)))
mem: ((11 boolean)) => nil
run: buffer-lines 19: (((jump)) ((-16 offset)))
run: buffer-lines 4: (((4 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/buffer-lines 0: 201566 => ((default-space space-address))
run: read/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100)
run: read/buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 201568 <= 1100
run: read/buffer-lines 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 1 1103 . nil))
run: empty?/read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/buffer-lines 0: 201597 => ((default-space space-address))
run: empty?/read/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 1 1103 . nil)))
run: empty?/read/buffer-lines 1: #(tagged record (1 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 201599 <= 1
mem: ((1 channel)): 201600 <= 1
mem: ((1 channel)): 201601 <= 1103
run: empty?/read/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201599 integer) (raw)) => 1
run: empty?/read/buffer-lines 2: 1 => ((4 integer))
mem: ((4 integer)): 201602 <= 1
run: empty?/read/buffer-lines 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201600 integer) (raw)) => 1
run: empty?/read/buffer-lines 3: 1 => ((5 integer))
mem: ((5 integer)): 201603 <= 1
run: empty?/read/buffer-lines 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 1
run: empty?/read/buffer-lines 4: t => ((6 boolean))
mem: ((6 boolean)): 201604 <= t
run: empty?/read/buffer-lines 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/buffer-lines 2: t => ((2 boolean))
mem: ((2 boolean)): 201569 <= t
run: read/buffer-lines 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/buffer-lines 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/buffer-lines 4: 1101 => ((3 integer-address))
mem: ((3 integer-address)): 201570 <= 1101
run: read/buffer-lines 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 1
schedule: pushing read/buffer-lines to sleep queue
schedule: waking up write/send-keys-to-stdin
schedule: write/send-keys-to-stdin
run: write/send-keys-to-stdin 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: write/send-keys-to-stdin 7: 1103 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 101441 <= 1103
run: write/send-keys-to-stdin 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/send-keys-to-stdin 8: 1101 => ((7 integer-address))
mem: ((7 integer-address)): 101442 <= 1101
run: write/send-keys-to-stdin 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 1
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 9: 1106 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 101443 <= 1106
run: write/send-keys-to-stdin 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character 
 . nil))
run: write/send-keys-to-stdin 10: #(tagged record (character #\newline . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1106 <= character
mem: ((8 tagged-value-address) (deref)): 1107 <= #\newline
run: write/send-keys-to-stdin 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 1
run: write/send-keys-to-stdin 11: 2 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 2
run: write/send-keys-to-stdin 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 12: 2 => ((9 integer))
mem: ((9 integer)): 101444 <= 2
run: write/send-keys-to-stdin 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 2
mem: ((9 integer)) => 2
run: write/send-keys-to-stdin 13: nil => ((10 boolean))
mem: ((10 boolean)): 101445 <= nil
run: write/send-keys-to-stdin 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => nil
run: write/send-keys-to-stdin 15: (((7 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: write/send-keys-to-stdin 15: 0 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 0
run: write/send-keys-to-stdin 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 0 1103 . nil))
run: send-keys-to-stdin 6: #(tagged record (1 0 1103 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1100 <= 1
mem: ((2 channel-address) (deref)): 1101 <= 0
mem: ((2 channel-address) (deref)): 1102 <= 1103
run: send-keys-to-stdin 7: (((6 boolean)) <- ((equal)) ((3 character)) (( literal)))
mem: ((3 character)) => 

run: send-keys-to-stdin 7: nil => ((6 boolean))
mem: ((6 boolean)): 101007 <= nil
run: send-keys-to-stdin 8: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: send-keys-to-stdin 9: (((jump)) ((-7 offset)))
run: send-keys-to-stdin 3: (((3 character)) <- ((read-key)) ((1 keyboard-address)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read-key/send-keys-to-stdin 0: 101527 => ((default-space space-address))
run: read-key/send-keys-to-stdin 1: (((1 keyboard-address)) <- ((next-input)))
arg: nil 0 (1067)
run: read-key/send-keys-to-stdin 1: 1067 => ((1 keyboard-address))
mem: ((1 keyboard-address)): 101529 <= 1067
run: read-key/send-keys-to-stdin 2: (((2 terminal-address)) <- ((next-input)))
arg: nil 1 (1067)
run: read-key/send-keys-to-stdin 2: nil => ((2 terminal-address))
mem: ((2 terminal-address)): 101530 <= nil
run: read-key/send-keys-to-stdin 3: (((jump-unless)) ((1 keyboard-address)) ((9 offset)))
mem: ((1 keyboard-address)) => 1067
run: read-key/send-keys-to-stdin 4: (((3 integer-address)) <- ((get-address)) ((1 keyboard-address) (deref)) ((0 offset)))
run: read-key/send-keys-to-stdin 4: 1067 => ((3 integer-address))
mem: ((3 integer-address)): 101531 <= 1067
run: read-key/send-keys-to-stdin 5: (((4 string-address)) <- ((get)) ((1 keyboard-address) (deref)) ((1 offset)))
mem: ((1068 string-address) (raw)) => 1031
run: read-key/send-keys-to-stdin 5: 1031 => ((4 string-address))
mem: ((4 string-address)): 101532 <= 1031
run: read-key/send-keys-to-stdin 6: (((5 integer)) <- ((length)) ((4 string-address) (deref)))
array-len: ((4 string-address) (deref))
mem: ((1031 integer) (raw)) => 4
run: read-key/send-keys-to-stdin 6: 4 => ((5 integer))
mem: ((5 integer)): 101533 <= 4
run: read-key/send-keys-to-stdin 7: (((6 boolean)) <- ((greater-or-equal)) ((3 integer-address) (deref)) ((5 integer)))
mem: ((3 integer-address) (deref)) => 4
mem: ((5 integer)) => 4
run: read-key/send-keys-to-stdin 7: t => ((6 boolean))
mem: ((6 boolean)): 101534 <= t
run: read-key/send-keys-to-stdin 8: (((jump-unless)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: read-key/send-keys-to-stdin 9: (((reply)) (( literal)))
run: send-keys-to-stdin 3: #\nul => ((3 character))
mem: ((3 character)): 101004 <= #\nul
run: send-keys-to-stdin 4: (((jump-unless)) ((3 character)) ((-2 offset)))
mem: ((3 character)) => 
run: send-keys-to-stdin 5: (((4 tagged-value)) <- ((save-type)) ((3 character)))
mem: ((3 character)) => 
run: send-keys-to-stdin 5: #(tagged record (character #\nul)) => ((4 tagged-value))
mem: ((4 tagged-value)): 101005 <= character
mem: ((4 tagged-value)): 101006 <= #\nul
run: send-keys-to-stdin 6: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((4 tagged-value)))
mem: ((2 channel-address)) => 1100
mem: ((4 tagged-value)) => #(tagged record (character  . nil))
run: write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/send-keys-to-stdin 0: 101558 => ((default-space space-address))
run: write/send-keys-to-stdin 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100 #(tagged record (character #\nul . nil)))
run: write/send-keys-to-stdin 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 101560 <= 1100
run: write/send-keys-to-stdin 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1100 #(tagged record (character #\nul . nil)))
run: write/send-keys-to-stdin 2: #(tagged record (character #\nul . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 101561 <= character
mem: ((2 tagged-value)): 101562 <= #\nul
run: write/send-keys-to-stdin 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 0 1103 . nil))
run: full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/send-keys-to-stdin 0: 101589 => ((default-space space-address))
run: full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1103 . nil)))
run: full?/write/send-keys-to-stdin 1: #(tagged record (1 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101591 <= 1
mem: ((1 channel)): 101592 <= 0
mem: ((1 channel)): 101593 <= 1103
run: full?/write/send-keys-to-stdin 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((101592 integer) (raw)) => 0
run: full?/write/send-keys-to-stdin 2: 0 => ((4 integer))
mem: ((4 integer)): 101594 <= 0
run: full?/write/send-keys-to-stdin 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: full?/write/send-keys-to-stdin 3: 1 => ((4 integer))
mem: ((4 integer)): 101594 <= 1
run: full?/write/send-keys-to-stdin 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (1 0 1103 . nil))
run: capacity/full?/write/send-keys-to-stdin 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/send-keys-to-stdin 0: 101620 => ((default-space space-address))
run: capacity/full?/write/send-keys-to-stdin 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1103 . nil)))
run: capacity/full?/write/send-keys-to-stdin 1: #(tagged record (1 0 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 101622 <= 1
mem: ((1 channel)): 101623 <= 0
mem: ((1 channel)): 101624 <= 1103
run: capacity/full?/write/send-keys-to-stdin 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((101624 tagged-value-array-address) (raw)) => 1103
run: capacity/full?/write/send-keys-to-stdin 2: 1103 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 101625 <= 1103
run: capacity/full?/write/send-keys-to-stdin 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: capacity/full?/write/send-keys-to-stdin 3: 2 => ((5 integer))
mem: ((5 integer)): 101626 <= 2
run: capacity/full?/write/send-keys-to-stdin 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 4: 2 => ((5 integer))
mem: ((5 integer)): 101595 <= 2
run: full?/write/send-keys-to-stdin 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 2
run: full?/write/send-keys-to-stdin 5: t => ((6 boolean))
mem: ((6 boolean)): 101596 <= t
run: full?/write/send-keys-to-stdin 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: full?/write/send-keys-to-stdin 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((101591 integer) (raw)) => 1
run: full?/write/send-keys-to-stdin 8: 1 => ((7 integer))
mem: ((7 integer)): 101597 <= 1
run: full?/write/send-keys-to-stdin 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 1
mem: ((4 integer)) => 1
run: full?/write/send-keys-to-stdin 9: t => ((8 boolean))
mem: ((8 boolean)): 101598 <= t
run: full?/write/send-keys-to-stdin 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/send-keys-to-stdin 3: t => ((4 boolean))
mem: ((4 boolean)): 101563 <= t
run: write/send-keys-to-stdin 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/send-keys-to-stdin 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/send-keys-to-stdin 5: 1100 => ((5 integer-address))
mem: ((5 integer-address)): 101564 <= 1100
run: write/send-keys-to-stdin 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 1
schedule: pushing write/send-keys-to-stdin to sleep queue
schedule: waking up read/buffer-lines
schedule: read/buffer-lines
run: read/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/buffer-lines 6: 1100 => ((4 integer-address))
mem: ((4 integer-address)): 201571 <= 1100
run: read/buffer-lines 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: read/buffer-lines 7: 1103 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 201572 <= 1103
run: read/buffer-lines 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 1
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
mem: ((1106 tagged-value) (raw)) => #(tagged record (character 
 . nil))
run: read/buffer-lines 8: #(tagged record (character #\newline . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 201573 <= character
mem: ((6 tagged-value)): 201574 <= #\newline
run: read/buffer-lines 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 1
run: read/buffer-lines 9: 2 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 2
run: read/buffer-lines 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: read/buffer-lines 10: 2 => ((8 integer))
mem: ((8 integer)): 201575 <= 2
run: read/buffer-lines 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 2
mem: ((8 integer)) => 2
run: read/buffer-lines 11: nil => ((9 boolean))
mem: ((9 boolean)): 201576 <= nil
run: read/buffer-lines 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => nil
run: read/buffer-lines 13: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: read/buffer-lines 13: 0 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 0
run: read/buffer-lines 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character 
 . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 0 1103 . nil))
run: buffer-lines 4: #(tagged record (character #\newline . nil)) => ((4 tagged-value))
mem: ((4 tagged-value)): 201005 <= character
mem: ((4 tagged-value)): 201006 <= #\newline
run: buffer-lines 4: #(tagged record (0 0 1103 . nil)) => ((1 channel-address) (deref))
mem: ((1 channel-address) (deref)): 1100 <= 0
mem: ((1 channel-address) (deref)): 1101 <= 0
mem: ((1 channel-address) (deref)): 1102 <= 1103
run: buffer-lines 5: (((6 character)) <- ((maybe-coerce)) ((4 tagged-value)) ((character literal)))
mem: ((4 tagged-value)) => #(tagged record (character 
 . nil))
run: maybe-coerce/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/buffer-lines 0: 201628 => ((default-space space-address))
run: maybe-coerce/buffer-lines 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/buffer-lines 1: 201659 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 201630 <= 201659
run: maybe-coerce/buffer-lines 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\newline . nil)) character)
run: maybe-coerce/buffer-lines 2: #(tagged record (character #\newline . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 201659 <= character
mem: ((1 tagged-value-address) (deref)): 201660 <= #\newline
run: maybe-coerce/buffer-lines 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\newline . nil)) character)
run: maybe-coerce/buffer-lines 3: character => ((2 type))
mem: ((2 type)): 201631 <= character
run: maybe-coerce/buffer-lines 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((201659 type) (raw)) => character
run: maybe-coerce/buffer-lines 4: character => ((3 type))
mem: ((3 type)): 201632 <= character
run: maybe-coerce/buffer-lines 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/buffer-lines 5: t => ((4 boolean))
mem: ((4 boolean)): 201633 <= t
run: maybe-coerce/buffer-lines 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/buffer-lines 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((201660 location) (raw)) => 

run: maybe-coerce/buffer-lines 8: #\newline => ((5 location))
mem: ((5 location)): 201634 <= #\newline
run: maybe-coerce/buffer-lines 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => 

mem: ((4 boolean)) => t
run: buffer-lines 5: #\newline => ((6 character))
mem: ((6 character)): 201007 <= #\newline
run: buffer-lines 6: (((assert)) ((6 character)))
mem: ((6 character)) => 

run: buffer-lines 7: (((7 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => 

run: buffer-lines 7: nil => ((7 boolean))
mem: ((7 boolean)): 201008 <= nil
run: buffer-lines 8: (((jump-unless)) ((7 boolean)) ((5 offset)))
mem: ((7 boolean)) => nil
run: buffer-lines 14: (((3 buffer-address)) <- ((append)) ((3 buffer-address)) ((6 character)))
mem: ((3 buffer-address)) => 201062
mem: ((6 character)) => 

run: append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: append/buffer-lines 0: 201661 => ((default-space space-address))
run: append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062 #\newline)
run: append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201663 <= 201062
run: append/buffer-lines 2: (((2 character)) <- ((next-input)))
arg: nil 1 (201062 #\newline)
run: append/buffer-lines 2: #\newline => ((2 character))
mem: ((2 character)): 201664 <= #\newline
run: append/buffer-lines 3: (((3 boolean)) <- ((buffer-full?)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 201062
run: buffer-full?/append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-full?/append/buffer-lines 0: 201692 => ((default-space space-address))
run: buffer-full?/append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (201062)
run: buffer-full?/append/buffer-lines 1: 201062 => ((1 buffer-address))
mem: ((1 buffer-address)): 201694 <= 201062
run: buffer-full?/append/buffer-lines 2: (((2 integer)) <- ((get)) ((1 buffer-address) (deref)) ((0 offset)))
mem: ((201062 integer) (raw)) => 3
run: buffer-full?/append/buffer-lines 2: 3 => ((2 integer))
mem: ((2 integer)): 201695 <= 3
run: buffer-full?/append/buffer-lines 3: (((3 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: buffer-full?/append/buffer-lines 3: 201064 => ((3 string-address))
mem: ((3 string-address)): 201696 <= 201064
run: buffer-full?/append/buffer-lines 4: (((4 integer)) <- ((length)) ((3 string-address) (deref)))
array-len: ((3 string-address) (deref))
mem: ((201064 integer) (raw)) => 30
run: buffer-full?/append/buffer-lines 4: 30 => ((4 integer))
mem: ((4 integer)): 201697 <= 30
run: buffer-full?/append/buffer-lines 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer)))
mem: ((2 integer)) => 3
mem: ((4 integer)) => 30
run: buffer-full?/append/buffer-lines 5: nil => ((5 boolean))
mem: ((5 boolean)): 201698 <= nil
run: buffer-full?/append/buffer-lines 6: (((reply)) ((5 boolean)))
mem: ((5 boolean)) => nil
run: append/buffer-lines 3: nil => ((3 boolean))
mem: ((3 boolean)): 201665 <= nil
run: append/buffer-lines 4: (((jump-unless)) ((3 boolean)) ((1 offset)))
mem: ((3 boolean)) => nil
run: append/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: append/buffer-lines 6: 201062 => ((4 integer-address))
mem: ((4 integer-address)): 201666 <= 201062
run: append/buffer-lines 7: (((5 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: append/buffer-lines 7: 201064 => ((5 string-address))
mem: ((5 string-address)): 201667 <= 201064
run: append/buffer-lines 8: (((6 byte-address)) <- ((index-address)) ((5 string-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 3
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
run: append/buffer-lines 8: 201068 => ((6 byte-address))
mem: ((6 byte-address)): 201668 <= 201068
run: append/buffer-lines 9: (((6 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => 

run: append/buffer-lines 9: #\newline => ((6 byte-address) (deref))
mem: ((6 byte-address) (deref)): 201068 <= #\newline
run: append/buffer-lines 10: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 3
run: append/buffer-lines 10: 4 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 201062 <= 4
run: append/buffer-lines 11: (((reply)) ((1 buffer-address) (same-as-arg 0)))
mem: ((1 buffer-address) (same-as-arg 0)) => 201062
run: buffer-lines 14: 201062 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 201062
run: buffer-lines 15: (((10 boolean)) <- ((equal)) ((6 character)) ((
 literal)))
mem: ((6 character)) => 

run: buffer-lines 15: t => ((10 boolean))
mem: ((10 boolean)): 201011 <= t
run: buffer-lines 16: (((jump-if)) ((10 boolean)) ((3 offset)))
mem: ((10 boolean)) => t
run: buffer-lines 20: (((12 integer)) <- ((copy)) ((0 literal)))
run: buffer-lines 20: 0 => ((12 integer))
mem: ((12 integer)): 201013 <= 0
run: buffer-lines 21: (((13 string-address)) <- ((get)) ((3 buffer-address) (deref)) ((1 offset)))
mem: ((201063 string-address) (raw)) => 201064
run: buffer-lines 21: 201064 => ((13 string-address))
mem: ((13 string-address)): 201014 <= 201064
run: buffer-lines 22: (((14 integer)) <- ((get)) ((3 buffer-address) (deref)) ((0 offset)))
mem: ((201062 integer) (raw)) => 4
run: buffer-lines 22: 4 => ((14 integer))
mem: ((14 integer)): 201015 <= 4
run: buffer-lines 23: (((15 boolean)) <- ((greater-or-equal)) ((12 integer)) ((14 integer)))
mem: ((12 integer)) => 0
mem: ((14 integer)) => 4
run: buffer-lines 23: nil => ((15 boolean))
mem: ((15 boolean)): 201016 <= nil
run: buffer-lines 24: (((jump-if)) ((15 boolean)) ((5 offset)))
mem: ((15 boolean)) => nil
run: buffer-lines 25: (((6 character)) <- ((index)) ((13 string-address) (deref)) ((12 integer)))
mem: ((12 integer)) => 0
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
mem: ((201065 byte) (raw)) => f
run: buffer-lines 25: #\f => ((6 character))
mem: ((6 character)): 201007 <= #\f
run: buffer-lines 26: (((16 tagged-value)) <- ((save-type)) ((6 character)))
mem: ((6 character)) => f
run: buffer-lines 26: #(tagged record (character #\f)) => ((16 tagged-value))
mem: ((16 tagged-value)): 201017 <= character
mem: ((16 tagged-value)): 201018 <= #\f
run: buffer-lines 27: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((16 tagged-value)))
mem: ((2 channel-address)) => 1139
mem: ((16 tagged-value)) => #(tagged record (character f . nil))
run: write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/buffer-lines 0: 201723 => ((default-space space-address))
run: write/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139 #(tagged record (character #\f . nil)))
run: write/buffer-lines 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 201725 <= 1139
run: write/buffer-lines 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1139 #(tagged record (character #\f . nil)))
run: write/buffer-lines 2: #(tagged record (character #\f . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 201726 <= character
mem: ((2 tagged-value)): 201727 <= #\f
run: write/buffer-lines 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1142 . nil))
run: full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/buffer-lines 0: 201754 => ((default-space space-address))
run: full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1142 . nil)))
run: full?/write/buffer-lines 1: #(tagged record (0 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201756 <= 0
mem: ((1 channel)): 201757 <= 0
mem: ((1 channel)): 201758 <= 1142
run: full?/write/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201757 integer) (raw)) => 0
run: full?/write/buffer-lines 2: 0 => ((4 integer))
mem: ((4 integer)): 201759 <= 0
run: full?/write/buffer-lines 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: full?/write/buffer-lines 3: 1 => ((4 integer))
mem: ((4 integer)): 201759 <= 1
run: full?/write/buffer-lines 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 0 1142 . nil))
run: capacity/full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/buffer-lines 0: 201785 => ((default-space space-address))
run: capacity/full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1142 . nil)))
run: capacity/full?/write/buffer-lines 1: #(tagged record (0 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201787 <= 0
mem: ((1 channel)): 201788 <= 0
mem: ((1 channel)): 201789 <= 1142
run: capacity/full?/write/buffer-lines 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((201789 tagged-value-array-address) (raw)) => 1142
run: capacity/full?/write/buffer-lines 2: 1142 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 201790 <= 1142
run: capacity/full?/write/buffer-lines 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: capacity/full?/write/buffer-lines 3: 2 => ((5 integer))
mem: ((5 integer)): 201791 <= 2
run: capacity/full?/write/buffer-lines 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 4: 2 => ((5 integer))
mem: ((5 integer)): 201760 <= 2
run: full?/write/buffer-lines 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 5: t => ((6 boolean))
mem: ((6 boolean)): 201761 <= t
run: full?/write/buffer-lines 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: full?/write/buffer-lines 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201756 integer) (raw)) => 0
run: full?/write/buffer-lines 8: 0 => ((7 integer))
mem: ((7 integer)): 201762 <= 0
run: full?/write/buffer-lines 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 1
run: full?/write/buffer-lines 9: nil => ((8 boolean))
mem: ((8 boolean)): 201763 <= nil
run: full?/write/buffer-lines 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => nil
run: write/buffer-lines 3: nil => ((4 boolean))
mem: ((4 boolean)): 201728 <= nil
run: write/buffer-lines 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => nil
run: write/buffer-lines 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: write/buffer-lines 7: 1142 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 201730 <= 1142
run: write/buffer-lines 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/buffer-lines 8: 1140 => ((7 integer-address))
mem: ((7 integer-address)): 201731 <= 1140
run: write/buffer-lines 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 0
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 9: 1143 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 201732 <= 1143
run: write/buffer-lines 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character f . nil))
run: write/buffer-lines 10: #(tagged record (character #\f . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1143 <= character
mem: ((8 tagged-value-address) (deref)): 1144 <= #\f
run: write/buffer-lines 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 0
run: write/buffer-lines 11: 1 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 1
run: write/buffer-lines 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 12: 2 => ((9 integer))
mem: ((9 integer)): 201733 <= 2
run: write/buffer-lines 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 1
mem: ((9 integer)) => 2
run: write/buffer-lines 13: t => ((10 boolean))
mem: ((10 boolean)): 201734 <= t
run: write/buffer-lines 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => t
run: write/buffer-lines 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1142 . nil))
run: buffer-lines 27: #(tagged record (0 1 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 0
mem: ((2 channel-address) (deref)): 1140 <= 1
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: buffer-lines 28: (((12 integer)) <- ((add)) ((12 integer)) ((1 literal)))
mem: ((12 integer)) => 0
run: buffer-lines 28: 1 => ((12 integer))
mem: ((12 integer)): 201013 <= 1
run: buffer-lines 29: (((jump)) ((-7 offset)))
run: buffer-lines 23: (((15 boolean)) <- ((greater-or-equal)) ((12 integer)) ((14 integer)))
mem: ((12 integer)) => 1
mem: ((14 integer)) => 4
run: buffer-lines 23: nil => ((15 boolean))
mem: ((15 boolean)): 201016 <= nil
run: buffer-lines 24: (((jump-if)) ((15 boolean)) ((5 offset)))
mem: ((15 boolean)) => nil
run: buffer-lines 25: (((6 character)) <- ((index)) ((13 string-address) (deref)) ((12 integer)))
mem: ((12 integer)) => 1
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
mem: ((201066 byte) (raw)) => o
run: buffer-lines 25: #\o => ((6 character))
mem: ((6 character)): 201007 <= #\o
run: buffer-lines 26: (((16 tagged-value)) <- ((save-type)) ((6 character)))
mem: ((6 character)) => o
run: buffer-lines 26: #(tagged record (character #\o)) => ((16 tagged-value))
mem: ((16 tagged-value)): 201017 <= character
mem: ((16 tagged-value)): 201018 <= #\o
run: buffer-lines 27: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((16 tagged-value)))
mem: ((2 channel-address)) => 1139
mem: ((16 tagged-value)) => #(tagged record (character o . nil))
run: write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/buffer-lines 0: 201816 => ((default-space space-address))
run: write/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139 #(tagged record (character #\o . nil)))
run: write/buffer-lines 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 201818 <= 1139
run: write/buffer-lines 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1139 #(tagged record (character #\o . nil)))
run: write/buffer-lines 2: #(tagged record (character #\o . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 201819 <= character
mem: ((2 tagged-value)): 201820 <= #\o
run: write/buffer-lines 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1142 . nil))
run: full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/buffer-lines 0: 201847 => ((default-space space-address))
run: full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1142 . nil)))
run: full?/write/buffer-lines 1: #(tagged record (0 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201849 <= 0
mem: ((1 channel)): 201850 <= 1
mem: ((1 channel)): 201851 <= 1142
run: full?/write/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201850 integer) (raw)) => 1
run: full?/write/buffer-lines 2: 1 => ((4 integer))
mem: ((4 integer)): 201852 <= 1
run: full?/write/buffer-lines 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: full?/write/buffer-lines 3: 2 => ((4 integer))
mem: ((4 integer)): 201852 <= 2
run: full?/write/buffer-lines 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 1 1142 . nil))
run: capacity/full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/buffer-lines 0: 201878 => ((default-space space-address))
run: capacity/full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1142 . nil)))
run: capacity/full?/write/buffer-lines 1: #(tagged record (0 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201880 <= 0
mem: ((1 channel)): 201881 <= 1
mem: ((1 channel)): 201882 <= 1142
run: capacity/full?/write/buffer-lines 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((201882 tagged-value-array-address) (raw)) => 1142
run: capacity/full?/write/buffer-lines 2: 1142 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 201883 <= 1142
run: capacity/full?/write/buffer-lines 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: capacity/full?/write/buffer-lines 3: 2 => ((5 integer))
mem: ((5 integer)): 201884 <= 2
run: capacity/full?/write/buffer-lines 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 4: 2 => ((5 integer))
mem: ((5 integer)): 201853 <= 2
run: full?/write/buffer-lines 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 2
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 5: nil => ((6 boolean))
mem: ((6 boolean)): 201854 <= nil
run: full?/write/buffer-lines 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: full?/write/buffer-lines 7: (((4 integer)) <- ((copy)) ((0 literal)))
run: full?/write/buffer-lines 7: 0 => ((4 integer))
mem: ((4 integer)): 201852 <= 0
run: full?/write/buffer-lines 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201849 integer) (raw)) => 0
run: full?/write/buffer-lines 8: 0 => ((7 integer))
mem: ((7 integer)): 201855 <= 0
run: full?/write/buffer-lines 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 0
run: full?/write/buffer-lines 9: t => ((8 boolean))
mem: ((8 boolean)): 201856 <= t
run: full?/write/buffer-lines 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/buffer-lines 3: t => ((4 boolean))
mem: ((4 boolean)): 201821 <= t
run: write/buffer-lines 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/buffer-lines 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/buffer-lines 5: 1139 => ((5 integer-address))
mem: ((5 integer-address)): 201822 <= 1139
run: write/buffer-lines 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 0
schedule: pushing write/buffer-lines to sleep queue
schedule: waking up read/send-prints-to-stdout
schedule: waking up write/send-keys-to-stdin
schedule: read/send-prints-to-stdout
run: read/send-prints-to-stdout 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/send-prints-to-stdout 6: 1139 => ((4 integer-address))
mem: ((4 integer-address)): 301036 <= 1139
run: read/send-prints-to-stdout 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: read/send-prints-to-stdout 7: 1142 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 301037 <= 1142
run: read/send-prints-to-stdout 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
mem: ((1143 tagged-value) (raw)) => #(tagged record (character f . nil))
run: read/send-prints-to-stdout 8: #(tagged record (character #\f . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 301038 <= character
mem: ((6 tagged-value)): 301039 <= #\f
run: read/send-prints-to-stdout 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: read/send-prints-to-stdout 9: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 1
run: read/send-prints-to-stdout 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: read/send-prints-to-stdout 10: 2 => ((8 integer))
mem: ((8 integer)): 301040 <= 2
run: read/send-prints-to-stdout 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 1
mem: ((8 integer)) => 2
run: read/send-prints-to-stdout 11: t => ((9 boolean))
mem: ((9 boolean)): 301041 <= t
run: read/send-prints-to-stdout 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => t
run: read/send-prints-to-stdout 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character f . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1142 . nil))
run: send-prints-to-stdout 3: #(tagged record (character #\f . nil)) => ((3 tagged-value))
mem: ((3 tagged-value)): 301004 <= character
mem: ((3 tagged-value)): 301005 <= #\f
run: send-prints-to-stdout 3: #(tagged record (1 1 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 1
mem: ((2 channel-address) (deref)): 1140 <= 1
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: send-prints-to-stdout 4: (((5 character)) <- ((maybe-coerce)) ((3 tagged-value)) ((character literal)))
mem: ((3 tagged-value)) => #(tagged record (character f . nil))
run: maybe-coerce/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/send-prints-to-stdout 0: 301093 => ((default-space space-address))
run: maybe-coerce/send-prints-to-stdout 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/send-prints-to-stdout 1: 301124 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 301095 <= 301124
run: maybe-coerce/send-prints-to-stdout 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\f . nil)) character)
run: maybe-coerce/send-prints-to-stdout 2: #(tagged record (character #\f . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 301124 <= character
mem: ((1 tagged-value-address) (deref)): 301125 <= #\f
run: maybe-coerce/send-prints-to-stdout 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\f . nil)) character)
run: maybe-coerce/send-prints-to-stdout 3: character => ((2 type))
mem: ((2 type)): 301096 <= character
run: maybe-coerce/send-prints-to-stdout 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((301124 type) (raw)) => character
run: maybe-coerce/send-prints-to-stdout 4: character => ((3 type))
mem: ((3 type)): 301097 <= character
run: maybe-coerce/send-prints-to-stdout 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/send-prints-to-stdout 5: t => ((4 boolean))
mem: ((4 boolean)): 301098 <= t
run: maybe-coerce/send-prints-to-stdout 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/send-prints-to-stdout 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((301125 location) (raw)) => f
run: maybe-coerce/send-prints-to-stdout 8: #\f => ((5 location))
mem: ((5 location)): 301099 <= #\f
run: maybe-coerce/send-prints-to-stdout 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => f
mem: ((4 boolean)) => t
run: send-prints-to-stdout 4: #\f => ((5 character))
mem: ((5 character)): 301006 <= #\f
run: send-prints-to-stdout 5: (((6 boolean)) <- ((equal)) ((5 character)) (( literal)))
mem: ((5 character)) => f
run: send-prints-to-stdout 5: nil => ((6 boolean))
mem: ((6 boolean)): 301007 <= nil
run: send-prints-to-stdout 6: (((jump-if)) ((6 boolean)) ((2 offset)))
mem: ((6 boolean)) => nil
run: send-prints-to-stdout 7: (((print-character)) ((1 terminal-address)) ((5 character)))
mem: ((1 terminal-address)) => 1178
mem: ((5 character)) => f
run: print-character/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: print-character/send-prints-to-stdout 0: 301126 => ((default-space space-address))
run: print-character/send-prints-to-stdout 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178 #\f)
run: print-character/send-prints-to-stdout 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 301128 <= 1178
run: print-character/send-prints-to-stdout 2: (((2 character)) <- ((next-input)))
arg: nil 1 (1178 #\f)
run: print-character/send-prints-to-stdout 2: #\f => ((2 character))
mem: ((2 character)): 301129 <= #\f
run: print-character/send-prints-to-stdout 3: (((3 integer) (color)) <- ((next-input)))
arg: nil 2 (1178 #\f)
run: print-character/send-prints-to-stdout 3: nil => ((3 integer) (color))
mem: ((3 integer) (color)): 301130 <= nil
run: print-character/send-prints-to-stdout 4: (((4 integer) (color)) <- ((next-input)))
arg: nil 3 (1178 #\f)
run: print-character/send-prints-to-stdout 4: nil => ((4 integer) (color))
mem: ((4 integer) (color)): 301131 <= nil
run: print-character/send-prints-to-stdout 5: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
mem: ((1 terminal-address)) => 1178
run: print-character/send-prints-to-stdout 6: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
run: print-character/send-prints-to-stdout 6: 1180 => ((5 integer-address))
mem: ((5 integer-address)): 301132 <= 1180
run: print-character/send-prints-to-stdout 7: (((6 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
run: print-character/send-prints-to-stdout 7: 1181 => ((6 integer-address))
mem: ((6 integer-address)): 301133 <= 1181
run: print-character/send-prints-to-stdout 8: (((7 integer)) <- ((get)) ((1 terminal-address) (deref)) ((1 offset)))
mem: ((1179 integer) (raw)) => 20
run: print-character/send-prints-to-stdout 8: 20 => ((7 integer))
mem: ((7 integer)): 301134 <= 20
run: print-character/send-prints-to-stdout 9: (((8 integer)) <- ((multiply)) ((5 integer-address) (deref)) ((7 integer)))
mem: ((5 integer-address) (deref)) => 0
mem: ((7 integer)) => 20
run: print-character/send-prints-to-stdout 9: 0 => ((8 integer))
mem: ((8 integer)): 301135 <= 0
run: print-character/send-prints-to-stdout 10: (((9 integer)) <- ((add)) ((8 integer)) ((6 integer-address) (deref)))
mem: ((8 integer)) => 0
mem: ((6 integer-address) (deref)) => 0
run: print-character/send-prints-to-stdout 10: 0 => ((9 integer))
mem: ((9 integer)): 301136 <= 0
run: print-character/send-prints-to-stdout 11: (((10 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: print-character/send-prints-to-stdout 11: 1183 => ((10 string-address))
mem: ((10 string-address)): 301137 <= 1183
run: print-character/send-prints-to-stdout 12: (((11 byte-address)) <- ((index-address)) ((10 string-address) (deref)) ((9 integer)))
mem: ((9 integer)) => 0
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: print-character/send-prints-to-stdout 12: 1184 => ((11 byte-address))
mem: ((11 byte-address)): 301138 <= 1184
run: print-character/send-prints-to-stdout 13: (((11 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => f
run: print-character/send-prints-to-stdout 13: #\f => ((11 byte-address) (deref))
mem: ((11 byte-address) (deref)): 1184 <= #\f
run: print-character/send-prints-to-stdout 14: (((6 integer-address) (deref)) <- ((add)) ((6 integer-address) (deref)) ((1 literal)))
mem: ((6 integer-address) (deref)) => 0
run: print-character/send-prints-to-stdout 14: 1 => ((6 integer-address) (deref))
mem: ((6 integer-address) (deref)): 1181 <= 1
run: print-character/send-prints-to-stdout 15: (((reply)))
run: send-prints-to-stdout 8: (((jump)) ((-6 offset)))
run: send-prints-to-stdout 3: (((3 tagged-value)) ((2 channel-address) (deref)) <- ((read)) ((2 channel-address)))
mem: ((2 channel-address)) => 1139
run: read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/send-prints-to-stdout 0: 301157 => ((default-space space-address))
run: read/send-prints-to-stdout 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139)
run: read/send-prints-to-stdout 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 301159 <= 1139
run: read/send-prints-to-stdout 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 1 1142 . nil))
run: empty?/read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/send-prints-to-stdout 0: 301188 => ((default-space space-address))
run: empty?/read/send-prints-to-stdout 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 1 1142 . nil)))
run: empty?/read/send-prints-to-stdout 1: #(tagged record (1 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 301190 <= 1
mem: ((1 channel)): 301191 <= 1
mem: ((1 channel)): 301192 <= 1142
run: empty?/read/send-prints-to-stdout 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((301190 integer) (raw)) => 1
run: empty?/read/send-prints-to-stdout 2: 1 => ((4 integer))
mem: ((4 integer)): 301193 <= 1
run: empty?/read/send-prints-to-stdout 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((301191 integer) (raw)) => 1
run: empty?/read/send-prints-to-stdout 3: 1 => ((5 integer))
mem: ((5 integer)): 301194 <= 1
run: empty?/read/send-prints-to-stdout 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 1
run: empty?/read/send-prints-to-stdout 4: t => ((6 boolean))
mem: ((6 boolean)): 301195 <= t
run: empty?/read/send-prints-to-stdout 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/send-prints-to-stdout 2: t => ((2 boolean))
mem: ((2 boolean)): 301160 <= t
run: read/send-prints-to-stdout 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/send-prints-to-stdout 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/send-prints-to-stdout 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 301161 <= 1140
run: read/send-prints-to-stdout 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 1
schedule: pushing read/send-prints-to-stdout to sleep queue
schedule: waking up write/buffer-lines
schedule: write/send-keys-to-stdin
run: write/send-keys-to-stdin 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: write/send-keys-to-stdin 7: 1103 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 101565 <= 1103
run: write/send-keys-to-stdin 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/send-keys-to-stdin 8: 1101 => ((7 integer-address))
mem: ((7 integer-address)): 101566 <= 1101
run: write/send-keys-to-stdin 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 9: 1104 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 101567 <= 1104
run: write/send-keys-to-stdin 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character  . nil))
run: write/send-keys-to-stdin 10: #(tagged record (character #\nul . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1104 <= character
mem: ((8 tagged-value-address) (deref)): 1105 <= #\nul
run: write/send-keys-to-stdin 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 0
run: write/send-keys-to-stdin 11: 1 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1101 <= 1
run: write/send-keys-to-stdin 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: write/send-keys-to-stdin 12: 2 => ((9 integer))
mem: ((9 integer)): 101568 <= 2
run: write/send-keys-to-stdin 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 1
mem: ((9 integer)) => 2
run: write/send-keys-to-stdin 13: t => ((10 boolean))
mem: ((10 boolean)): 101569 <= t
run: write/send-keys-to-stdin 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => t
run: write/send-keys-to-stdin 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1103 . nil))
run: send-keys-to-stdin 6: #(tagged record (0 1 1103 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1100 <= 0
mem: ((2 channel-address) (deref)): 1101 <= 1
mem: ((2 channel-address) (deref)): 1102 <= 1103
run: send-keys-to-stdin 7: (((6 boolean)) <- ((equal)) ((3 character)) (( literal)))
mem: ((3 character)) => 
run: send-keys-to-stdin 7: t => ((6 boolean))
mem: ((6 boolean)): 101007 <= t
run: send-keys-to-stdin 8: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
schedule: done with routine nil
schedule: write/buffer-lines
run: write/buffer-lines 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: write/buffer-lines 7: 1142 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 201823 <= 1142
run: write/buffer-lines 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/buffer-lines 8: 1140 => ((7 integer-address))
mem: ((7 integer-address)): 201824 <= 1140
run: write/buffer-lines 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 1
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 9: 1145 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 201825 <= 1145
run: write/buffer-lines 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character o . nil))
run: write/buffer-lines 10: #(tagged record (character #\o . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1145 <= character
mem: ((8 tagged-value-address) (deref)): 1146 <= #\o
run: write/buffer-lines 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 1
run: write/buffer-lines 11: 2 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 2
run: write/buffer-lines 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 12: 2 => ((9 integer))
mem: ((9 integer)): 201826 <= 2
run: write/buffer-lines 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 2
mem: ((9 integer)) => 2
run: write/buffer-lines 13: nil => ((10 boolean))
mem: ((10 boolean)): 201827 <= nil
run: write/buffer-lines 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => nil
run: write/buffer-lines 15: (((7 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: write/buffer-lines 15: 0 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 0
run: write/buffer-lines 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 0 1142 . nil))
run: buffer-lines 27: #(tagged record (1 0 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 1
mem: ((2 channel-address) (deref)): 1140 <= 0
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: buffer-lines 28: (((12 integer)) <- ((add)) ((12 integer)) ((1 literal)))
mem: ((12 integer)) => 1
run: buffer-lines 28: 2 => ((12 integer))
mem: ((12 integer)): 201013 <= 2
run: buffer-lines 29: (((jump)) ((-7 offset)))
run: buffer-lines 23: (((15 boolean)) <- ((greater-or-equal)) ((12 integer)) ((14 integer)))
mem: ((12 integer)) => 2
mem: ((14 integer)) => 4
run: buffer-lines 23: nil => ((15 boolean))
mem: ((15 boolean)): 201016 <= nil
run: buffer-lines 24: (((jump-if)) ((15 boolean)) ((5 offset)))
mem: ((15 boolean)) => nil
run: buffer-lines 25: (((6 character)) <- ((index)) ((13 string-address) (deref)) ((12 integer)))
mem: ((12 integer)) => 2
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
mem: ((201067 byte) (raw)) => o
run: buffer-lines 25: #\o => ((6 character))
mem: ((6 character)): 201007 <= #\o
run: buffer-lines 26: (((16 tagged-value)) <- ((save-type)) ((6 character)))
mem: ((6 character)) => o
run: buffer-lines 26: #(tagged record (character #\o)) => ((16 tagged-value))
mem: ((16 tagged-value)): 201017 <= character
mem: ((16 tagged-value)): 201018 <= #\o
run: buffer-lines 27: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((16 tagged-value)))
mem: ((2 channel-address)) => 1139
mem: ((16 tagged-value)) => #(tagged record (character o . nil))
run: write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/buffer-lines 0: 201909 => ((default-space space-address))
run: write/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139 #(tagged record (character #\o . nil)))
run: write/buffer-lines 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 201911 <= 1139
run: write/buffer-lines 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1139 #(tagged record (character #\o . nil)))
run: write/buffer-lines 2: #(tagged record (character #\o . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 201912 <= character
mem: ((2 tagged-value)): 201913 <= #\o
run: write/buffer-lines 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 0 1142 . nil))
run: full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/buffer-lines 0: 201940 => ((default-space space-address))
run: full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1142 . nil)))
run: full?/write/buffer-lines 1: #(tagged record (1 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201942 <= 1
mem: ((1 channel)): 201943 <= 0
mem: ((1 channel)): 201944 <= 1142
run: full?/write/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((201943 integer) (raw)) => 0
run: full?/write/buffer-lines 2: 0 => ((4 integer))
mem: ((4 integer)): 201945 <= 0
run: full?/write/buffer-lines 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 0
run: full?/write/buffer-lines 3: 1 => ((4 integer))
mem: ((4 integer)): 201945 <= 1
run: full?/write/buffer-lines 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (1 0 1142 . nil))
run: capacity/full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/buffer-lines 0: 201971 => ((default-space space-address))
run: capacity/full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 0 1142 . nil)))
run: capacity/full?/write/buffer-lines 1: #(tagged record (1 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 201973 <= 1
mem: ((1 channel)): 201974 <= 0
mem: ((1 channel)): 201975 <= 1142
run: capacity/full?/write/buffer-lines 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((201975 tagged-value-array-address) (raw)) => 1142
run: capacity/full?/write/buffer-lines 2: 1142 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 201976 <= 1142
run: capacity/full?/write/buffer-lines 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: capacity/full?/write/buffer-lines 3: 2 => ((5 integer))
mem: ((5 integer)): 201977 <= 2
run: capacity/full?/write/buffer-lines 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 4: 2 => ((5 integer))
mem: ((5 integer)): 201946 <= 2
run: full?/write/buffer-lines 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 5: t => ((6 boolean))
mem: ((6 boolean)): 201947 <= t
run: full?/write/buffer-lines 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => t
run: full?/write/buffer-lines 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((201942 integer) (raw)) => 1
run: full?/write/buffer-lines 8: 1 => ((7 integer))
mem: ((7 integer)): 201948 <= 1
run: full?/write/buffer-lines 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 1
mem: ((4 integer)) => 1
run: full?/write/buffer-lines 9: t => ((8 boolean))
mem: ((8 boolean)): 201949 <= t
run: full?/write/buffer-lines 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/buffer-lines 3: t => ((4 boolean))
mem: ((4 boolean)): 201914 <= t
run: write/buffer-lines 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/buffer-lines 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/buffer-lines 5: 1139 => ((5 integer-address))
mem: ((5 integer-address)): 201915 <= 1139
run: write/buffer-lines 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 1
schedule: pushing write/buffer-lines to sleep queue
schedule: waking up read/send-prints-to-stdout
schedule: read/send-prints-to-stdout
run: read/send-prints-to-stdout 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/send-prints-to-stdout 6: 1139 => ((4 integer-address))
mem: ((4 integer-address)): 301162 <= 1139
run: read/send-prints-to-stdout 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: read/send-prints-to-stdout 7: 1142 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 301163 <= 1142
run: read/send-prints-to-stdout 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 1
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
mem: ((1145 tagged-value) (raw)) => #(tagged record (character o . nil))
run: read/send-prints-to-stdout 8: #(tagged record (character #\o . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 301164 <= character
mem: ((6 tagged-value)): 301165 <= #\o
run: read/send-prints-to-stdout 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 1
run: read/send-prints-to-stdout 9: 2 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 2
run: read/send-prints-to-stdout 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: read/send-prints-to-stdout 10: 2 => ((8 integer))
mem: ((8 integer)): 301166 <= 2
run: read/send-prints-to-stdout 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 2
mem: ((8 integer)) => 2
run: read/send-prints-to-stdout 11: nil => ((9 boolean))
mem: ((9 boolean)): 301167 <= nil
run: read/send-prints-to-stdout 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => nil
run: read/send-prints-to-stdout 13: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: read/send-prints-to-stdout 13: 0 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 0
run: read/send-prints-to-stdout 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character o . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 0 1142 . nil))
run: send-prints-to-stdout 3: #(tagged record (character #\o . nil)) => ((3 tagged-value))
mem: ((3 tagged-value)): 301004 <= character
mem: ((3 tagged-value)): 301005 <= #\o
run: send-prints-to-stdout 3: #(tagged record (0 0 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 0
mem: ((2 channel-address) (deref)): 1140 <= 0
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: send-prints-to-stdout 4: (((5 character)) <- ((maybe-coerce)) ((3 tagged-value)) ((character literal)))
mem: ((3 tagged-value)) => #(tagged record (character o . nil))
run: maybe-coerce/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/send-prints-to-stdout 0: 301219 => ((default-space space-address))
run: maybe-coerce/send-prints-to-stdout 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/send-prints-to-stdout 1: 301250 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 301221 <= 301250
run: maybe-coerce/send-prints-to-stdout 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/send-prints-to-stdout 2: #(tagged record (character #\o . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 301250 <= character
mem: ((1 tagged-value-address) (deref)): 301251 <= #\o
run: maybe-coerce/send-prints-to-stdout 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/send-prints-to-stdout 3: character => ((2 type))
mem: ((2 type)): 301222 <= character
run: maybe-coerce/send-prints-to-stdout 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((301250 type) (raw)) => character
run: maybe-coerce/send-prints-to-stdout 4: character => ((3 type))
mem: ((3 type)): 301223 <= character
run: maybe-coerce/send-prints-to-stdout 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/send-prints-to-stdout 5: t => ((4 boolean))
mem: ((4 boolean)): 301224 <= t
run: maybe-coerce/send-prints-to-stdout 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/send-prints-to-stdout 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((301251 location) (raw)) => o
run: maybe-coerce/send-prints-to-stdout 8: #\o => ((5 location))
mem: ((5 location)): 301225 <= #\o
run: maybe-coerce/send-prints-to-stdout 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => o
mem: ((4 boolean)) => t
run: send-prints-to-stdout 4: #\o => ((5 character))
mem: ((5 character)): 301006 <= #\o
run: send-prints-to-stdout 5: (((6 boolean)) <- ((equal)) ((5 character)) (( literal)))
mem: ((5 character)) => o
run: send-prints-to-stdout 5: nil => ((6 boolean))
mem: ((6 boolean)): 301007 <= nil
run: send-prints-to-stdout 6: (((jump-if)) ((6 boolean)) ((2 offset)))
mem: ((6 boolean)) => nil
run: send-prints-to-stdout 7: (((print-character)) ((1 terminal-address)) ((5 character)))
mem: ((1 terminal-address)) => 1178
mem: ((5 character)) => o
run: print-character/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: print-character/send-prints-to-stdout 0: 301252 => ((default-space space-address))
run: print-character/send-prints-to-stdout 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178 #\o)
run: print-character/send-prints-to-stdout 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 301254 <= 1178
run: print-character/send-prints-to-stdout 2: (((2 character)) <- ((next-input)))
arg: nil 1 (1178 #\o)
run: print-character/send-prints-to-stdout 2: #\o => ((2 character))
mem: ((2 character)): 301255 <= #\o
run: print-character/send-prints-to-stdout 3: (((3 integer) (color)) <- ((next-input)))
arg: nil 2 (1178 #\o)
run: print-character/send-prints-to-stdout 3: nil => ((3 integer) (color))
mem: ((3 integer) (color)): 301256 <= nil
run: print-character/send-prints-to-stdout 4: (((4 integer) (color)) <- ((next-input)))
arg: nil 3 (1178 #\o)
run: print-character/send-prints-to-stdout 4: nil => ((4 integer) (color))
mem: ((4 integer) (color)): 301257 <= nil
run: print-character/send-prints-to-stdout 5: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
mem: ((1 terminal-address)) => 1178
run: print-character/send-prints-to-stdout 6: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
run: print-character/send-prints-to-stdout 6: 1180 => ((5 integer-address))
mem: ((5 integer-address)): 301258 <= 1180
run: print-character/send-prints-to-stdout 7: (((6 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
run: print-character/send-prints-to-stdout 7: 1181 => ((6 integer-address))
mem: ((6 integer-address)): 301259 <= 1181
run: print-character/send-prints-to-stdout 8: (((7 integer)) <- ((get)) ((1 terminal-address) (deref)) ((1 offset)))
mem: ((1179 integer) (raw)) => 20
run: print-character/send-prints-to-stdout 8: 20 => ((7 integer))
mem: ((7 integer)): 301260 <= 20
run: print-character/send-prints-to-stdout 9: (((8 integer)) <- ((multiply)) ((5 integer-address) (deref)) ((7 integer)))
mem: ((5 integer-address) (deref)) => 0
mem: ((7 integer)) => 20
run: print-character/send-prints-to-stdout 9: 0 => ((8 integer))
mem: ((8 integer)): 301261 <= 0
run: print-character/send-prints-to-stdout 10: (((9 integer)) <- ((add)) ((8 integer)) ((6 integer-address) (deref)))
mem: ((8 integer)) => 0
mem: ((6 integer-address) (deref)) => 1
run: print-character/send-prints-to-stdout 10: 1 => ((9 integer))
mem: ((9 integer)): 301262 <= 1
run: print-character/send-prints-to-stdout 11: (((10 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: print-character/send-prints-to-stdout 11: 1183 => ((10 string-address))
mem: ((10 string-address)): 301263 <= 1183
run: print-character/send-prints-to-stdout 12: (((11 byte-address)) <- ((index-address)) ((10 string-address) (deref)) ((9 integer)))
mem: ((9 integer)) => 1
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: print-character/send-prints-to-stdout 12: 1185 => ((11 byte-address))
mem: ((11 byte-address)): 301264 <= 1185
run: print-character/send-prints-to-stdout 13: (((11 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => o
run: print-character/send-prints-to-stdout 13: #\o => ((11 byte-address) (deref))
mem: ((11 byte-address) (deref)): 1185 <= #\o
run: print-character/send-prints-to-stdout 14: (((6 integer-address) (deref)) <- ((add)) ((6 integer-address) (deref)) ((1 literal)))
mem: ((6 integer-address) (deref)) => 1
run: print-character/send-prints-to-stdout 14: 2 => ((6 integer-address) (deref))
mem: ((6 integer-address) (deref)): 1181 <= 2
run: print-character/send-prints-to-stdout 15: (((reply)))
run: send-prints-to-stdout 8: (((jump)) ((-6 offset)))
run: send-prints-to-stdout 3: (((3 tagged-value)) ((2 channel-address) (deref)) <- ((read)) ((2 channel-address)))
mem: ((2 channel-address)) => 1139
run: read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/send-prints-to-stdout 0: 301283 => ((default-space space-address))
run: read/send-prints-to-stdout 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139)
run: read/send-prints-to-stdout 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 301285 <= 1139
run: read/send-prints-to-stdout 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1142 . nil))
run: empty?/read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/send-prints-to-stdout 0: 301314 => ((default-space space-address))
run: empty?/read/send-prints-to-stdout 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1142 . nil)))
run: empty?/read/send-prints-to-stdout 1: #(tagged record (0 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 301316 <= 0
mem: ((1 channel)): 301317 <= 0
mem: ((1 channel)): 301318 <= 1142
run: empty?/read/send-prints-to-stdout 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((301316 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 2: 0 => ((4 integer))
mem: ((4 integer)): 301319 <= 0
run: empty?/read/send-prints-to-stdout 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((301317 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 3: 0 => ((5 integer))
mem: ((5 integer)): 301320 <= 0
run: empty?/read/send-prints-to-stdout 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 0
run: empty?/read/send-prints-to-stdout 4: t => ((6 boolean))
mem: ((6 boolean)): 301321 <= t
run: empty?/read/send-prints-to-stdout 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/send-prints-to-stdout 2: t => ((2 boolean))
mem: ((2 boolean)): 301286 <= t
run: read/send-prints-to-stdout 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/send-prints-to-stdout 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/send-prints-to-stdout 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 301287 <= 1140
run: read/send-prints-to-stdout 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 0
schedule: pushing read/send-prints-to-stdout to sleep queue
schedule: waking up write/buffer-lines
schedule: write/buffer-lines
run: write/buffer-lines 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: write/buffer-lines 7: 1142 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 201916 <= 1142
run: write/buffer-lines 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/buffer-lines 8: 1140 => ((7 integer-address))
mem: ((7 integer-address)): 201917 <= 1140
run: write/buffer-lines 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 0
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 9: 1143 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 201918 <= 1143
run: write/buffer-lines 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character o . nil))
run: write/buffer-lines 10: #(tagged record (character #\o . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1143 <= character
mem: ((8 tagged-value-address) (deref)): 1144 <= #\o
run: write/buffer-lines 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 0
run: write/buffer-lines 11: 1 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 1
run: write/buffer-lines 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 12: 2 => ((9 integer))
mem: ((9 integer)): 201919 <= 2
run: write/buffer-lines 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 1
mem: ((9 integer)) => 2
run: write/buffer-lines 13: t => ((10 boolean))
mem: ((10 boolean)): 201920 <= t
run: write/buffer-lines 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => t
run: write/buffer-lines 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 1 1142 . nil))
run: buffer-lines 27: #(tagged record (0 1 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 0
mem: ((2 channel-address) (deref)): 1140 <= 1
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: buffer-lines 28: (((12 integer)) <- ((add)) ((12 integer)) ((1 literal)))
mem: ((12 integer)) => 2
run: buffer-lines 28: 3 => ((12 integer))
mem: ((12 integer)): 201013 <= 3
run: buffer-lines 29: (((jump)) ((-7 offset)))
run: buffer-lines 23: (((15 boolean)) <- ((greater-or-equal)) ((12 integer)) ((14 integer)))
mem: ((12 integer)) => 3
mem: ((14 integer)) => 4
run: buffer-lines 23: nil => ((15 boolean))
mem: ((15 boolean)): 201016 <= nil
run: buffer-lines 24: (((jump-if)) ((15 boolean)) ((5 offset)))
mem: ((15 boolean)) => nil
run: buffer-lines 25: (((6 character)) <- ((index)) ((13 string-address) (deref)) ((12 integer)))
mem: ((12 integer)) => 3
array-len: ((201064 string) (raw))
mem: ((201064 integer) (raw)) => 30
mem: ((201068 byte) (raw)) => 

run: buffer-lines 25: #\newline => ((6 character))
mem: ((6 character)): 201007 <= #\newline
run: buffer-lines 26: (((16 tagged-value)) <- ((save-type)) ((6 character)))
mem: ((6 character)) => 

run: buffer-lines 26: #(tagged record (character #\newline)) => ((16 tagged-value))
mem: ((16 tagged-value)): 201017 <= character
mem: ((16 tagged-value)): 201018 <= #\newline
run: buffer-lines 27: (((2 channel-address) (deref)) <- ((write)) ((2 channel-address)) ((16 tagged-value)))
mem: ((2 channel-address)) => 1139
mem: ((16 tagged-value)) => #(tagged record (character 
 . nil))
run: write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: write/buffer-lines 0: 202002 => ((default-space space-address))
run: write/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139 #(tagged record (character #\newline . nil)))
run: write/buffer-lines 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 202004 <= 1139
run: write/buffer-lines 2: (((2 tagged-value)) <- ((next-input)))
arg: nil 1 (1139 #(tagged record (character #\newline . nil)))
run: write/buffer-lines 2: #(tagged record (character #\newline . nil)) => ((2 tagged-value))
mem: ((2 tagged-value)): 202005 <= character
mem: ((2 tagged-value)): 202006 <= #\newline
run: write/buffer-lines 3: (((4 boolean)) <- ((full?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1142 . nil))
run: full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: full?/write/buffer-lines 0: 202033 => ((default-space space-address))
run: full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1142 . nil)))
run: full?/write/buffer-lines 1: #(tagged record (0 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 202035 <= 0
mem: ((1 channel)): 202036 <= 1
mem: ((1 channel)): 202037 <= 1142
run: full?/write/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((202036 integer) (raw)) => 1
run: full?/write/buffer-lines 2: 1 => ((4 integer))
mem: ((4 integer)): 202038 <= 1
run: full?/write/buffer-lines 3: (((4 integer)) <- ((add)) ((4 integer)) ((1 literal)))
mem: ((4 integer)) => 1
run: full?/write/buffer-lines 3: 2 => ((4 integer))
mem: ((4 integer)): 202038 <= 2
run: full?/write/buffer-lines 4: (((5 integer)) <- ((capacity)) ((1 channel)))
mem: ((1 channel)) => #(tagged record (0 1 1142 . nil))
run: capacity/full?/write/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: capacity/full?/write/buffer-lines 0: 202064 => ((default-space space-address))
run: capacity/full?/write/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1142 . nil)))
run: capacity/full?/write/buffer-lines 1: #(tagged record (0 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 202066 <= 0
mem: ((1 channel)): 202067 <= 1
mem: ((1 channel)): 202068 <= 1142
run: capacity/full?/write/buffer-lines 2: (((4 tagged-value-array-address)) <- ((get)) ((1 channel)) ((2 offset)))
mem: ((202068 tagged-value-array-address) (raw)) => 1142
run: capacity/full?/write/buffer-lines 2: 1142 => ((4 tagged-value-array-address))
mem: ((4 tagged-value-array-address)): 202069 <= 1142
run: capacity/full?/write/buffer-lines 3: (((5 integer)) <- ((length)) ((4 tagged-value-array-address) (deref)))
array-len: ((4 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: capacity/full?/write/buffer-lines 3: 2 => ((5 integer))
mem: ((5 integer)): 202070 <= 2
run: capacity/full?/write/buffer-lines 4: (((reply)) ((5 integer)))
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 4: 2 => ((5 integer))
mem: ((5 integer)): 202039 <= 2
run: full?/write/buffer-lines 5: (((6 boolean)) <- ((less-than)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 2
mem: ((5 integer)) => 2
run: full?/write/buffer-lines 5: nil => ((6 boolean))
mem: ((6 boolean)): 202040 <= nil
run: full?/write/buffer-lines 6: (((jump-if)) ((6 boolean)) ((1 offset)))
mem: ((6 boolean)) => nil
run: full?/write/buffer-lines 7: (((4 integer)) <- ((copy)) ((0 literal)))
run: full?/write/buffer-lines 7: 0 => ((4 integer))
mem: ((4 integer)): 202038 <= 0
run: full?/write/buffer-lines 8: (((7 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((202035 integer) (raw)) => 0
run: full?/write/buffer-lines 8: 0 => ((7 integer))
mem: ((7 integer)): 202041 <= 0
run: full?/write/buffer-lines 9: (((8 boolean)) <- ((equal)) ((7 integer)) ((4 integer)))
mem: ((7 integer)) => 0
mem: ((4 integer)) => 0
run: full?/write/buffer-lines 9: t => ((8 boolean))
mem: ((8 boolean)): 202042 <= t
run: full?/write/buffer-lines 10: (((reply)) ((8 boolean)))
mem: ((8 boolean)) => t
run: write/buffer-lines 3: t => ((4 boolean))
mem: ((4 boolean)): 202007 <= t
run: write/buffer-lines 4: (((jump-unless)) ((4 boolean)) ((2 offset)))
mem: ((4 boolean)) => t
run: write/buffer-lines 5: (((5 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: write/buffer-lines 5: 1139 => ((5 integer-address))
mem: ((5 integer-address)): 202008 <= 1139
run: write/buffer-lines 6: (((sleep)) ((until-location-changes literal)) ((5 integer-address) (deref)))
mem: ((5 integer-address) (deref)) => 0
schedule: pushing write/buffer-lines to sleep queue
schedule: waking up read/send-prints-to-stdout
schedule: read/send-prints-to-stdout
run: read/send-prints-to-stdout 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/send-prints-to-stdout 6: 1139 => ((4 integer-address))
mem: ((4 integer-address)): 301288 <= 1139
run: read/send-prints-to-stdout 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: read/send-prints-to-stdout 7: 1142 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 301289 <= 1142
run: read/send-prints-to-stdout 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
mem: ((1143 tagged-value) (raw)) => #(tagged record (character o . nil))
run: read/send-prints-to-stdout 8: #(tagged record (character #\o . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 301290 <= character
mem: ((6 tagged-value)): 301291 <= #\o
run: read/send-prints-to-stdout 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: read/send-prints-to-stdout 9: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 1
run: read/send-prints-to-stdout 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: read/send-prints-to-stdout 10: 2 => ((8 integer))
mem: ((8 integer)): 301292 <= 2
run: read/send-prints-to-stdout 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 1
mem: ((8 integer)) => 2
run: read/send-prints-to-stdout 11: t => ((9 boolean))
mem: ((9 boolean)): 301293 <= t
run: read/send-prints-to-stdout 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => t
run: read/send-prints-to-stdout 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character o . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1142 . nil))
run: send-prints-to-stdout 3: #(tagged record (character #\o . nil)) => ((3 tagged-value))
mem: ((3 tagged-value)): 301004 <= character
mem: ((3 tagged-value)): 301005 <= #\o
run: send-prints-to-stdout 3: #(tagged record (1 1 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 1
mem: ((2 channel-address) (deref)): 1140 <= 1
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: send-prints-to-stdout 4: (((5 character)) <- ((maybe-coerce)) ((3 tagged-value)) ((character literal)))
mem: ((3 tagged-value)) => #(tagged record (character o . nil))
run: maybe-coerce/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/send-prints-to-stdout 0: 301345 => ((default-space space-address))
run: maybe-coerce/send-prints-to-stdout 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/send-prints-to-stdout 1: 301376 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 301347 <= 301376
run: maybe-coerce/send-prints-to-stdout 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/send-prints-to-stdout 2: #(tagged record (character #\o . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 301376 <= character
mem: ((1 tagged-value-address) (deref)): 301377 <= #\o
run: maybe-coerce/send-prints-to-stdout 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\o . nil)) character)
run: maybe-coerce/send-prints-to-stdout 3: character => ((2 type))
mem: ((2 type)): 301348 <= character
run: maybe-coerce/send-prints-to-stdout 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((301376 type) (raw)) => character
run: maybe-coerce/send-prints-to-stdout 4: character => ((3 type))
mem: ((3 type)): 301349 <= character
run: maybe-coerce/send-prints-to-stdout 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/send-prints-to-stdout 5: t => ((4 boolean))
mem: ((4 boolean)): 301350 <= t
run: maybe-coerce/send-prints-to-stdout 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/send-prints-to-stdout 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((301377 location) (raw)) => o
run: maybe-coerce/send-prints-to-stdout 8: #\o => ((5 location))
mem: ((5 location)): 301351 <= #\o
run: maybe-coerce/send-prints-to-stdout 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => o
mem: ((4 boolean)) => t
run: send-prints-to-stdout 4: #\o => ((5 character))
mem: ((5 character)): 301006 <= #\o
run: send-prints-to-stdout 5: (((6 boolean)) <- ((equal)) ((5 character)) (( literal)))
mem: ((5 character)) => o
run: send-prints-to-stdout 5: nil => ((6 boolean))
mem: ((6 boolean)): 301007 <= nil
run: send-prints-to-stdout 6: (((jump-if)) ((6 boolean)) ((2 offset)))
mem: ((6 boolean)) => nil
run: send-prints-to-stdout 7: (((print-character)) ((1 terminal-address)) ((5 character)))
mem: ((1 terminal-address)) => 1178
mem: ((5 character)) => o
run: print-character/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: print-character/send-prints-to-stdout 0: 301378 => ((default-space space-address))
run: print-character/send-prints-to-stdout 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178 #\o)
run: print-character/send-prints-to-stdout 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 301380 <= 1178
run: print-character/send-prints-to-stdout 2: (((2 character)) <- ((next-input)))
arg: nil 1 (1178 #\o)
run: print-character/send-prints-to-stdout 2: #\o => ((2 character))
mem: ((2 character)): 301381 <= #\o
run: print-character/send-prints-to-stdout 3: (((3 integer) (color)) <- ((next-input)))
arg: nil 2 (1178 #\o)
run: print-character/send-prints-to-stdout 3: nil => ((3 integer) (color))
mem: ((3 integer) (color)): 301382 <= nil
run: print-character/send-prints-to-stdout 4: (((4 integer) (color)) <- ((next-input)))
arg: nil 3 (1178 #\o)
run: print-character/send-prints-to-stdout 4: nil => ((4 integer) (color))
mem: ((4 integer) (color)): 301383 <= nil
run: print-character/send-prints-to-stdout 5: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
mem: ((1 terminal-address)) => 1178
run: print-character/send-prints-to-stdout 6: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
run: print-character/send-prints-to-stdout 6: 1180 => ((5 integer-address))
mem: ((5 integer-address)): 301384 <= 1180
run: print-character/send-prints-to-stdout 7: (((6 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
run: print-character/send-prints-to-stdout 7: 1181 => ((6 integer-address))
mem: ((6 integer-address)): 301385 <= 1181
run: print-character/send-prints-to-stdout 8: (((7 integer)) <- ((get)) ((1 terminal-address) (deref)) ((1 offset)))
mem: ((1179 integer) (raw)) => 20
run: print-character/send-prints-to-stdout 8: 20 => ((7 integer))
mem: ((7 integer)): 301386 <= 20
run: print-character/send-prints-to-stdout 9: (((8 integer)) <- ((multiply)) ((5 integer-address) (deref)) ((7 integer)))
mem: ((5 integer-address) (deref)) => 0
mem: ((7 integer)) => 20
run: print-character/send-prints-to-stdout 9: 0 => ((8 integer))
mem: ((8 integer)): 301387 <= 0
run: print-character/send-prints-to-stdout 10: (((9 integer)) <- ((add)) ((8 integer)) ((6 integer-address) (deref)))
mem: ((8 integer)) => 0
mem: ((6 integer-address) (deref)) => 2
run: print-character/send-prints-to-stdout 10: 2 => ((9 integer))
mem: ((9 integer)): 301388 <= 2
run: print-character/send-prints-to-stdout 11: (((10 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: print-character/send-prints-to-stdout 11: 1183 => ((10 string-address))
mem: ((10 string-address)): 301389 <= 1183
run: print-character/send-prints-to-stdout 12: (((11 byte-address)) <- ((index-address)) ((10 string-address) (deref)) ((9 integer)))
mem: ((9 integer)) => 2
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: print-character/send-prints-to-stdout 12: 1186 => ((11 byte-address))
mem: ((11 byte-address)): 301390 <= 1186
run: print-character/send-prints-to-stdout 13: (((11 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => o
run: print-character/send-prints-to-stdout 13: #\o => ((11 byte-address) (deref))
mem: ((11 byte-address) (deref)): 1186 <= #\o
run: print-character/send-prints-to-stdout 14: (((6 integer-address) (deref)) <- ((add)) ((6 integer-address) (deref)) ((1 literal)))
mem: ((6 integer-address) (deref)) => 2
run: print-character/send-prints-to-stdout 14: 3 => ((6 integer-address) (deref))
mem: ((6 integer-address) (deref)): 1181 <= 3
run: print-character/send-prints-to-stdout 15: (((reply)))
run: send-prints-to-stdout 8: (((jump)) ((-6 offset)))
run: send-prints-to-stdout 3: (((3 tagged-value)) ((2 channel-address) (deref)) <- ((read)) ((2 channel-address)))
mem: ((2 channel-address)) => 1139
run: read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/send-prints-to-stdout 0: 301409 => ((default-space space-address))
run: read/send-prints-to-stdout 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139)
run: read/send-prints-to-stdout 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 301411 <= 1139
run: read/send-prints-to-stdout 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (1 1 1142 . nil))
run: empty?/read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/send-prints-to-stdout 0: 301440 => ((default-space space-address))
run: empty?/read/send-prints-to-stdout 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (1 1 1142 . nil)))
run: empty?/read/send-prints-to-stdout 1: #(tagged record (1 1 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 301442 <= 1
mem: ((1 channel)): 301443 <= 1
mem: ((1 channel)): 301444 <= 1142
run: empty?/read/send-prints-to-stdout 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((301442 integer) (raw)) => 1
run: empty?/read/send-prints-to-stdout 2: 1 => ((4 integer))
mem: ((4 integer)): 301445 <= 1
run: empty?/read/send-prints-to-stdout 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((301443 integer) (raw)) => 1
run: empty?/read/send-prints-to-stdout 3: 1 => ((5 integer))
mem: ((5 integer)): 301446 <= 1
run: empty?/read/send-prints-to-stdout 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 1
mem: ((5 integer)) => 1
run: empty?/read/send-prints-to-stdout 4: t => ((6 boolean))
mem: ((6 boolean)): 301447 <= t
run: empty?/read/send-prints-to-stdout 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/send-prints-to-stdout 2: t => ((2 boolean))
mem: ((2 boolean)): 301412 <= t
run: read/send-prints-to-stdout 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/send-prints-to-stdout 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/send-prints-to-stdout 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 301413 <= 1140
run: read/send-prints-to-stdout 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 1
schedule: pushing read/send-prints-to-stdout to sleep queue
schedule: waking up write/buffer-lines
schedule: write/buffer-lines
run: write/buffer-lines 7: (((6 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: write/buffer-lines 7: 1142 => ((6 tagged-value-array-address))
mem: ((6 tagged-value-array-address)): 202009 <= 1142
run: write/buffer-lines 8: (((7 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: write/buffer-lines 8: 1140 => ((7 integer-address))
mem: ((7 integer-address)): 202010 <= 1140
run: write/buffer-lines 9: (((8 tagged-value-address)) <- ((index-address)) ((6 tagged-value-array-address) (deref)) ((7 integer-address) (deref)))
mem: ((7 integer-address) (deref)) => 1
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 9: 1145 => ((8 tagged-value-address))
mem: ((8 tagged-value-address)): 202011 <= 1145
run: write/buffer-lines 10: (((8 tagged-value-address) (deref)) <- ((copy)) ((2 tagged-value)))
mem: ((2 tagged-value)) => #(tagged record (character 
 . nil))
run: write/buffer-lines 10: #(tagged record (character #\newline . nil)) => ((8 tagged-value-address) (deref))
mem: ((8 tagged-value-address) (deref)): 1145 <= character
mem: ((8 tagged-value-address) (deref)): 1146 <= #\newline
run: write/buffer-lines 11: (((7 integer-address) (deref)) <- ((add)) ((7 integer-address) (deref)) ((1 literal)))
mem: ((7 integer-address) (deref)) => 1
run: write/buffer-lines 11: 2 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 2
run: write/buffer-lines 12: (((9 integer)) <- ((length)) ((6 tagged-value-array-address) (deref)))
array-len: ((6 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: write/buffer-lines 12: 2 => ((9 integer))
mem: ((9 integer)): 202012 <= 2
run: write/buffer-lines 13: (((10 boolean)) <- ((less-than)) ((7 integer-address) (deref)) ((9 integer)))
mem: ((7 integer-address) (deref)) => 2
mem: ((9 integer)) => 2
run: write/buffer-lines 13: nil => ((10 boolean))
mem: ((10 boolean)): 202013 <= nil
run: write/buffer-lines 14: (((jump-if)) ((10 boolean)) ((1 offset)))
mem: ((10 boolean)) => nil
run: write/buffer-lines 15: (((7 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: write/buffer-lines 15: 0 => ((7 integer-address) (deref))
mem: ((7 integer-address) (deref)): 1140 <= 0
run: write/buffer-lines 16: (((reply)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 0 1142 . nil))
run: buffer-lines 27: #(tagged record (1 0 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 1
mem: ((2 channel-address) (deref)): 1140 <= 0
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: buffer-lines 28: (((12 integer)) <- ((add)) ((12 integer)) ((1 literal)))
mem: ((12 integer)) => 3
run: buffer-lines 28: 4 => ((12 integer))
mem: ((12 integer)): 201013 <= 4
run: buffer-lines 29: (((jump)) ((-7 offset)))
run: buffer-lines 23: (((15 boolean)) <- ((greater-or-equal)) ((12 integer)) ((14 integer)))
mem: ((12 integer)) => 4
mem: ((14 integer)) => 4
run: buffer-lines 23: t => ((15 boolean))
mem: ((15 boolean)): 201016 <= t
run: buffer-lines 24: (((jump-if)) ((15 boolean)) ((5 offset)))
mem: ((15 boolean)) => t
run: buffer-lines 30: (((jump)) ((-28 offset)))
run: buffer-lines 3: (((3 buffer-address)) <- ((init-buffer)) ((30 literal)))
run: init-buffer/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: init-buffer/buffer-lines 0: 202095 => ((default-space space-address))
run: init-buffer/buffer-lines 1: (((1 buffer-address)) <- ((new)) ((buffer literal)))
run: init-buffer/buffer-lines 1: 202126 => ((1 buffer-address))
mem: ((1 buffer-address)): 202097 <= 202126
run: init-buffer/buffer-lines 2: (((2 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: init-buffer/buffer-lines 2: 202126 => ((2 integer-address))
mem: ((2 integer-address)): 202098 <= 202126
run: init-buffer/buffer-lines 3: (((2 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: init-buffer/buffer-lines 3: 0 => ((2 integer-address) (deref))
mem: ((2 integer-address) (deref)): 202126 <= 0
run: init-buffer/buffer-lines 4: (((3 string-address-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((1 offset)))
run: init-buffer/buffer-lines 4: 202127 => ((3 string-address-address))
mem: ((3 string-address-address)): 202099 <= 202127
run: init-buffer/buffer-lines 5: (((4 integer)) <- ((next-input)))
arg: nil 0 (30)
run: init-buffer/buffer-lines 5: 30 => ((4 integer))
mem: ((4 integer)): 202100 <= 30
run: init-buffer/buffer-lines 6: (((3 string-address-address) (deref)) <- ((new)) ((string literal)) ((4 integer)))
mem: ((4 integer)) => 30
run: init-buffer/buffer-lines 6: 202128 => ((3 string-address-address) (deref))
mem: ((3 string-address-address) (deref)): 202127 <= 202128
run: init-buffer/buffer-lines 7: (((reply)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 202126
run: buffer-lines 3: 202126 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 202126
run: buffer-lines 4: (((4 tagged-value)) ((1 channel-address) (deref)) <- ((read)) ((1 channel-address)))
mem: ((1 channel-address)) => 1100
run: read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/buffer-lines 0: 202159 => ((default-space space-address))
run: read/buffer-lines 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1100)
run: read/buffer-lines 1: 1100 => ((1 channel-address))
mem: ((1 channel-address)): 202161 <= 1100
run: read/buffer-lines 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 1 1103 . nil))
run: empty?/read/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/buffer-lines 0: 202190 => ((default-space space-address))
run: empty?/read/buffer-lines 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 1 1103 . nil)))
run: empty?/read/buffer-lines 1: #(tagged record (0 1 1103 . nil)) => ((1 channel))
mem: ((1 channel)): 202192 <= 0
mem: ((1 channel)): 202193 <= 1
mem: ((1 channel)): 202194 <= 1103
run: empty?/read/buffer-lines 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((202192 integer) (raw)) => 0
run: empty?/read/buffer-lines 2: 0 => ((4 integer))
mem: ((4 integer)): 202195 <= 0
run: empty?/read/buffer-lines 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((202193 integer) (raw)) => 1
run: empty?/read/buffer-lines 3: 1 => ((5 integer))
mem: ((5 integer)): 202196 <= 1
run: empty?/read/buffer-lines 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 1
run: empty?/read/buffer-lines 4: nil => ((6 boolean))
mem: ((6 boolean)): 202197 <= nil
run: empty?/read/buffer-lines 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => nil
run: read/buffer-lines 2: nil => ((2 boolean))
mem: ((2 boolean)): 202162 <= nil
run: read/buffer-lines 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => nil
run: read/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/buffer-lines 6: 1100 => ((4 integer-address))
mem: ((4 integer-address)): 202164 <= 1100
run: read/buffer-lines 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1102 tagged-value-array-address) (raw)) => 1103
run: read/buffer-lines 7: 1103 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 202165 <= 1103
run: read/buffer-lines 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((1103 tagged-value-array) (raw))
mem: ((1103 integer) (raw)) => 2
mem: ((1104 tagged-value) (raw)) => #(tagged record (character  . nil))
run: read/buffer-lines 8: #(tagged record (character #\nul . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 202166 <= character
mem: ((6 tagged-value)): 202167 <= #\nul
run: read/buffer-lines 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: read/buffer-lines 9: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1100 <= 1
run: read/buffer-lines 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1103 integer) (raw)) => 2
run: read/buffer-lines 10: 2 => ((8 integer))
mem: ((8 integer)): 202168 <= 2
run: read/buffer-lines 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 1
mem: ((8 integer)) => 2
run: read/buffer-lines 11: t => ((9 boolean))
mem: ((9 boolean)): 202169 <= t
run: read/buffer-lines 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => t
run: read/buffer-lines 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character  . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (1 1 1103 . nil))
run: buffer-lines 4: #(tagged record (character #\nul . nil)) => ((4 tagged-value))
mem: ((4 tagged-value)): 201005 <= character
mem: ((4 tagged-value)): 201006 <= #\nul
run: buffer-lines 4: #(tagged record (1 1 1103 . nil)) => ((1 channel-address) (deref))
mem: ((1 channel-address) (deref)): 1100 <= 1
mem: ((1 channel-address) (deref)): 1101 <= 1
mem: ((1 channel-address) (deref)): 1102 <= 1103
run: buffer-lines 5: (((6 character)) <- ((maybe-coerce)) ((4 tagged-value)) ((character literal)))
mem: ((4 tagged-value)) => #(tagged record (character  . nil))
run: maybe-coerce/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/buffer-lines 0: 202221 => ((default-space space-address))
run: maybe-coerce/buffer-lines 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/buffer-lines 1: 202252 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 202223 <= 202252
run: maybe-coerce/buffer-lines 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\nul . nil)) character)
run: maybe-coerce/buffer-lines 2: #(tagged record (character #\nul . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 202252 <= character
mem: ((1 tagged-value-address) (deref)): 202253 <= #\nul
run: maybe-coerce/buffer-lines 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\nul . nil)) character)
run: maybe-coerce/buffer-lines 3: character => ((2 type))
mem: ((2 type)): 202224 <= character
run: maybe-coerce/buffer-lines 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((202252 type) (raw)) => character
run: maybe-coerce/buffer-lines 4: character => ((3 type))
mem: ((3 type)): 202225 <= character
run: maybe-coerce/buffer-lines 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/buffer-lines 5: t => ((4 boolean))
mem: ((4 boolean)): 202226 <= t
run: maybe-coerce/buffer-lines 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/buffer-lines 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((202253 location) (raw)) => 
run: maybe-coerce/buffer-lines 8: #\nul => ((5 location))
mem: ((5 location)): 202227 <= #\nul
run: maybe-coerce/buffer-lines 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => 
mem: ((4 boolean)) => t
run: buffer-lines 5: #\nul => ((6 character))
mem: ((6 character)): 201007 <= #\nul
run: buffer-lines 6: (((assert)) ((6 character)))
mem: ((6 character)) => 
run: buffer-lines 7: (((7 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => 
run: buffer-lines 7: nil => ((7 boolean))
mem: ((7 boolean)): 201008 <= nil
run: buffer-lines 8: (((jump-unless)) ((7 boolean)) ((5 offset)))
mem: ((7 boolean)) => nil
run: buffer-lines 14: (((3 buffer-address)) <- ((append)) ((3 buffer-address)) ((6 character)))
mem: ((3 buffer-address)) => 202126
mem: ((6 character)) => 
run: append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: append/buffer-lines 0: 202254 => ((default-space space-address))
run: append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (202126 #\nul)
run: append/buffer-lines 1: 202126 => ((1 buffer-address))
mem: ((1 buffer-address)): 202256 <= 202126
run: append/buffer-lines 2: (((2 character)) <- ((next-input)))
arg: nil 1 (202126 #\nul)
run: append/buffer-lines 2: #\nul => ((2 character))
mem: ((2 character)): 202257 <= #\nul
run: append/buffer-lines 3: (((3 boolean)) <- ((buffer-full?)) ((1 buffer-address)))
mem: ((1 buffer-address)) => 202126
run: buffer-full?/append/buffer-lines 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: buffer-full?/append/buffer-lines 0: 202285 => ((default-space space-address))
run: buffer-full?/append/buffer-lines 1: (((1 buffer-address)) <- ((next-input)))
arg: nil 0 (202126)
run: buffer-full?/append/buffer-lines 1: 202126 => ((1 buffer-address))
mem: ((1 buffer-address)): 202287 <= 202126
run: buffer-full?/append/buffer-lines 2: (((2 integer)) <- ((get)) ((1 buffer-address) (deref)) ((0 offset)))
mem: ((202126 integer) (raw)) => 0
run: buffer-full?/append/buffer-lines 2: 0 => ((2 integer))
mem: ((2 integer)): 202288 <= 0
run: buffer-full?/append/buffer-lines 3: (((3 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((202127 string-address) (raw)) => 202128
run: buffer-full?/append/buffer-lines 3: 202128 => ((3 string-address))
mem: ((3 string-address)): 202289 <= 202128
run: buffer-full?/append/buffer-lines 4: (((4 integer)) <- ((length)) ((3 string-address) (deref)))
array-len: ((3 string-address) (deref))
mem: ((202128 integer) (raw)) => 30
run: buffer-full?/append/buffer-lines 4: 30 => ((4 integer))
mem: ((4 integer)): 202290 <= 30
run: buffer-full?/append/buffer-lines 5: (((5 boolean)) <- ((greater-or-equal)) ((2 integer)) ((4 integer)))
mem: ((2 integer)) => 0
mem: ((4 integer)) => 30
run: buffer-full?/append/buffer-lines 5: nil => ((5 boolean))
mem: ((5 boolean)): 202291 <= nil
run: buffer-full?/append/buffer-lines 6: (((reply)) ((5 boolean)))
mem: ((5 boolean)) => nil
run: append/buffer-lines 3: nil => ((3 boolean))
mem: ((3 boolean)): 202258 <= nil
run: append/buffer-lines 4: (((jump-unless)) ((3 boolean)) ((1 offset)))
mem: ((3 boolean)) => nil
run: append/buffer-lines 6: (((4 integer-address)) <- ((get-address)) ((1 buffer-address) (deref)) ((0 offset)))
run: append/buffer-lines 6: 202126 => ((4 integer-address))
mem: ((4 integer-address)): 202259 <= 202126
run: append/buffer-lines 7: (((5 string-address)) <- ((get)) ((1 buffer-address) (deref)) ((1 offset)))
mem: ((202127 string-address) (raw)) => 202128
run: append/buffer-lines 7: 202128 => ((5 string-address))
mem: ((5 string-address)): 202260 <= 202128
run: append/buffer-lines 8: (((6 byte-address)) <- ((index-address)) ((5 string-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 0
array-len: ((202128 string) (raw))
mem: ((202128 integer) (raw)) => 30
run: append/buffer-lines 8: 202129 => ((6 byte-address))
mem: ((6 byte-address)): 202261 <= 202129
run: append/buffer-lines 9: (((6 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => 
run: append/buffer-lines 9: #\nul => ((6 byte-address) (deref))
mem: ((6 byte-address) (deref)): 202129 <= #\nul
run: append/buffer-lines 10: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 0
run: append/buffer-lines 10: 1 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 202126 <= 1
run: append/buffer-lines 11: (((reply)) ((1 buffer-address) (same-as-arg 0)))
mem: ((1 buffer-address) (same-as-arg 0)) => 202126
run: buffer-lines 14: 202126 => ((3 buffer-address))
mem: ((3 buffer-address)): 201004 <= 202126
run: buffer-lines 15: (((10 boolean)) <- ((equal)) ((6 character)) ((
 literal)))
mem: ((6 character)) => 
run: buffer-lines 15: nil => ((10 boolean))
mem: ((10 boolean)): 201011 <= nil
run: buffer-lines 16: (((jump-if)) ((10 boolean)) ((3 offset)))
mem: ((10 boolean)) => nil
run: buffer-lines 17: (((11 boolean)) <- ((equal)) ((6 character)) (( literal)))
mem: ((6 character)) => 
run: buffer-lines 17: t => ((11 boolean))
mem: ((11 boolean)): 201012 <= t
run: buffer-lines 18: (((jump-if)) ((11 boolean)) ((12 offset)))
mem: ((11 boolean)) => t
schedule: done with routine nil
schedule: waking up main
schedule: waking up read/send-prints-to-stdout
schedule: main
run: main 11: (((sleep)) ((for-some-cycles literal)) ((500 literal)))
run: main 11: sleeping until 2652
schedule: pushing main to sleep queue
schedule: read/send-prints-to-stdout
run: read/send-prints-to-stdout 6: (((4 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((0 offset)))
run: read/send-prints-to-stdout 6: 1139 => ((4 integer-address))
mem: ((4 integer-address)): 301414 <= 1139
run: read/send-prints-to-stdout 7: (((5 tagged-value-array-address)) <- ((get)) ((1 channel-address) (deref)) ((2 offset)))
mem: ((1141 tagged-value-array-address) (raw)) => 1142
run: read/send-prints-to-stdout 7: 1142 => ((5 tagged-value-array-address))
mem: ((5 tagged-value-array-address)): 301415 <= 1142
run: read/send-prints-to-stdout 8: (((6 tagged-value)) <- ((index)) ((5 tagged-value-array-address) (deref)) ((4 integer-address) (deref)))
mem: ((4 integer-address) (deref)) => 1
array-len: ((1142 tagged-value-array) (raw))
mem: ((1142 integer) (raw)) => 2
mem: ((1145 tagged-value) (raw)) => #(tagged record (character 
 . nil))
run: read/send-prints-to-stdout 8: #(tagged record (character #\newline . nil)) => ((6 tagged-value))
mem: ((6 tagged-value)): 301416 <= character
mem: ((6 tagged-value)): 301417 <= #\newline
run: read/send-prints-to-stdout 9: (((4 integer-address) (deref)) <- ((add)) ((4 integer-address) (deref)) ((1 literal)))
mem: ((4 integer-address) (deref)) => 1
run: read/send-prints-to-stdout 9: 2 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 2
run: read/send-prints-to-stdout 10: (((8 integer)) <- ((length)) ((5 tagged-value-array-address) (deref)))
array-len: ((5 tagged-value-array-address) (deref))
mem: ((1142 integer) (raw)) => 2
run: read/send-prints-to-stdout 10: 2 => ((8 integer))
mem: ((8 integer)): 301418 <= 2
run: read/send-prints-to-stdout 11: (((9 boolean)) <- ((less-than)) ((4 integer-address) (deref)) ((8 integer)))
mem: ((4 integer-address) (deref)) => 2
mem: ((8 integer)) => 2
run: read/send-prints-to-stdout 11: nil => ((9 boolean))
mem: ((9 boolean)): 301419 <= nil
run: read/send-prints-to-stdout 12: (((jump-if)) ((9 boolean)) ((1 offset)))
mem: ((9 boolean)) => nil
run: read/send-prints-to-stdout 13: (((4 integer-address) (deref)) <- ((copy)) ((0 literal)))
run: read/send-prints-to-stdout 13: 0 => ((4 integer-address) (deref))
mem: ((4 integer-address) (deref)): 1139 <= 0
run: read/send-prints-to-stdout 14: (((reply)) ((6 tagged-value)) ((1 channel-address) (deref) (same-as-arg 0)))
mem: ((6 tagged-value)) => #(tagged record (character 
 . nil))
mem: ((1 channel-address) (deref) (same-as-arg 0)) => #(tagged record (0 0 1142 . nil))
run: send-prints-to-stdout 3: #(tagged record (character #\newline . nil)) => ((3 tagged-value))
mem: ((3 tagged-value)): 301004 <= character
mem: ((3 tagged-value)): 301005 <= #\newline
run: send-prints-to-stdout 3: #(tagged record (0 0 1142 . nil)) => ((2 channel-address) (deref))
mem: ((2 channel-address) (deref)): 1139 <= 0
mem: ((2 channel-address) (deref)): 1140 <= 0
mem: ((2 channel-address) (deref)): 1141 <= 1142
run: send-prints-to-stdout 4: (((5 character)) <- ((maybe-coerce)) ((3 tagged-value)) ((character literal)))
mem: ((3 tagged-value)) => #(tagged record (character 
 . nil))
run: maybe-coerce/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: maybe-coerce/send-prints-to-stdout 0: 301471 => ((default-space space-address))
run: maybe-coerce/send-prints-to-stdout 1: (((1 tagged-value-address)) <- ((new)) ((tagged-value literal)))
run: maybe-coerce/send-prints-to-stdout 1: 301502 => ((1 tagged-value-address))
mem: ((1 tagged-value-address)): 301473 <= 301502
run: maybe-coerce/send-prints-to-stdout 2: (((1 tagged-value-address) (deref)) <- ((next-input)))
arg: nil 0 (#(tagged record (character #\newline . nil)) character)
run: maybe-coerce/send-prints-to-stdout 2: #(tagged record (character #\newline . nil)) => ((1 tagged-value-address) (deref))
mem: ((1 tagged-value-address) (deref)): 301502 <= character
mem: ((1 tagged-value-address) (deref)): 301503 <= #\newline
run: maybe-coerce/send-prints-to-stdout 3: (((2 type)) <- ((next-input)))
arg: nil 1 (#(tagged record (character #\newline . nil)) character)
run: maybe-coerce/send-prints-to-stdout 3: character => ((2 type))
mem: ((2 type)): 301474 <= character
run: maybe-coerce/send-prints-to-stdout 4: (((3 type)) <- ((get)) ((1 tagged-value-address) (deref)) ((0 offset)))
mem: ((301502 type) (raw)) => character
run: maybe-coerce/send-prints-to-stdout 4: character => ((3 type))
mem: ((3 type)): 301475 <= character
run: maybe-coerce/send-prints-to-stdout 5: (((4 boolean)) <- ((equal)) ((3 type)) ((2 type)))
mem: ((3 type)) => character
mem: ((2 type)) => character
run: maybe-coerce/send-prints-to-stdout 5: t => ((4 boolean))
mem: ((4 boolean)): 301476 <= t
run: maybe-coerce/send-prints-to-stdout 6: (((jump-if)) ((4 boolean)) ((1 offset)))
mem: ((4 boolean)) => t
run: maybe-coerce/send-prints-to-stdout 8: (((5 location)) <- ((get)) ((1 tagged-value-address) (deref)) ((1 offset)))
mem: ((301503 location) (raw)) => 

run: maybe-coerce/send-prints-to-stdout 8: #\newline => ((5 location))
mem: ((5 location)): 301477 <= #\newline
run: maybe-coerce/send-prints-to-stdout 9: (((reply)) ((5 location)) ((4 boolean)))
mem: ((5 location)) => 

mem: ((4 boolean)) => t
run: send-prints-to-stdout 4: #\newline => ((5 character))
mem: ((5 character)): 301006 <= #\newline
run: send-prints-to-stdout 5: (((6 boolean)) <- ((equal)) ((5 character)) (( literal)))
mem: ((5 character)) => 

run: send-prints-to-stdout 5: nil => ((6 boolean))
mem: ((6 boolean)): 301007 <= nil
run: send-prints-to-stdout 6: (((jump-if)) ((6 boolean)) ((2 offset)))
mem: ((6 boolean)) => nil
run: send-prints-to-stdout 7: (((print-character)) ((1 terminal-address)) ((5 character)))
mem: ((1 terminal-address)) => 1178
mem: ((5 character)) => 

run: print-character/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: print-character/send-prints-to-stdout 0: 301504 => ((default-space space-address))
run: print-character/send-prints-to-stdout 1: (((1 terminal-address)) <- ((next-input)))
arg: nil 0 (1178 #\newline)
run: print-character/send-prints-to-stdout 1: 1178 => ((1 terminal-address))
mem: ((1 terminal-address)): 301506 <= 1178
run: print-character/send-prints-to-stdout 2: (((2 character)) <- ((next-input)))
arg: nil 1 (1178 #\newline)
run: print-character/send-prints-to-stdout 2: #\newline => ((2 character))
mem: ((2 character)): 301507 <= #\newline
run: print-character/send-prints-to-stdout 3: (((3 integer) (color)) <- ((next-input)))
arg: nil 2 (1178 #\newline)
run: print-character/send-prints-to-stdout 3: nil => ((3 integer) (color))
mem: ((3 integer) (color)): 301508 <= nil
run: print-character/send-prints-to-stdout 4: (((4 integer) (color)) <- ((next-input)))
arg: nil 3 (1178 #\newline)
run: print-character/send-prints-to-stdout 4: nil => ((4 integer) (color))
mem: ((4 integer) (color)): 301509 <= nil
run: print-character/send-prints-to-stdout 5: (((jump-unless)) ((1 terminal-address)) ((10 offset)))
mem: ((1 terminal-address)) => 1178
run: print-character/send-prints-to-stdout 6: (((5 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((2 offset)))
run: print-character/send-prints-to-stdout 6: 1180 => ((5 integer-address))
mem: ((5 integer-address)): 301510 <= 1180
run: print-character/send-prints-to-stdout 7: (((6 integer-address)) <- ((get-address)) ((1 terminal-address) (deref)) ((3 offset)))
run: print-character/send-prints-to-stdout 7: 1181 => ((6 integer-address))
mem: ((6 integer-address)): 301511 <= 1181
run: print-character/send-prints-to-stdout 8: (((7 integer)) <- ((get)) ((1 terminal-address) (deref)) ((1 offset)))
mem: ((1179 integer) (raw)) => 20
run: print-character/send-prints-to-stdout 8: 20 => ((7 integer))
mem: ((7 integer)): 301512 <= 20
run: print-character/send-prints-to-stdout 9: (((8 integer)) <- ((multiply)) ((5 integer-address) (deref)) ((7 integer)))
mem: ((5 integer-address) (deref)) => 0
mem: ((7 integer)) => 20
run: print-character/send-prints-to-stdout 9: 0 => ((8 integer))
mem: ((8 integer)): 301513 <= 0
run: print-character/send-prints-to-stdout 10: (((9 integer)) <- ((add)) ((8 integer)) ((6 integer-address) (deref)))
mem: ((8 integer)) => 0
mem: ((6 integer-address) (deref)) => 3
run: print-character/send-prints-to-stdout 10: 3 => ((9 integer))
mem: ((9 integer)): 301514 <= 3
run: print-character/send-prints-to-stdout 11: (((10 string-address)) <- ((get)) ((1 terminal-address) (deref)) ((4 offset)))
mem: ((1182 string-address) (raw)) => 1183
run: print-character/send-prints-to-stdout 11: 1183 => ((10 string-address))
mem: ((10 string-address)): 301515 <= 1183
run: print-character/send-prints-to-stdout 12: (((11 byte-address)) <- ((index-address)) ((10 string-address) (deref)) ((9 integer)))
mem: ((9 integer)) => 3
array-len: ((1183 string) (raw))
mem: ((1183 integer) (raw)) => 200
run: print-character/send-prints-to-stdout 12: 1187 => ((11 byte-address))
mem: ((11 byte-address)): 301516 <= 1187
run: print-character/send-prints-to-stdout 13: (((11 byte-address) (deref)) <- ((copy)) ((2 character)))
mem: ((2 character)) => 

run: print-character/send-prints-to-stdout 13: #\newline => ((11 byte-address) (deref))
mem: ((11 byte-address) (deref)): 1187 <= #\newline
run: print-character/send-prints-to-stdout 14: (((6 integer-address) (deref)) <- ((add)) ((6 integer-address) (deref)) ((1 literal)))
mem: ((6 integer-address) (deref)) => 3
run: print-character/send-prints-to-stdout 14: 4 => ((6 integer-address) (deref))
mem: ((6 integer-address) (deref)): 1181 <= 4
run: print-character/send-prints-to-stdout 15: (((reply)))
run: send-prints-to-stdout 8: (((jump)) ((-6 offset)))
run: send-prints-to-stdout 3: (((3 tagged-value)) ((2 channel-address) (deref)) <- ((read)) ((2 channel-address)))
mem: ((2 channel-address)) => 1139
run: read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: read/send-prints-to-stdout 0: 301535 => ((default-space space-address))
run: read/send-prints-to-stdout 1: (((1 channel-address)) <- ((next-input)))
arg: nil 0 (1139)
run: read/send-prints-to-stdout 1: 1139 => ((1 channel-address))
mem: ((1 channel-address)): 301537 <= 1139
run: read/send-prints-to-stdout 2: (((2 boolean)) <- ((empty?)) ((1 channel-address) (deref)))
mem: ((1 channel-address) (deref)) => #(tagged record (0 0 1142 . nil))
run: empty?/read/send-prints-to-stdout 0: (((default-space space-address)) <- ((new)) ((space literal)) ((30 literal)))
run: empty?/read/send-prints-to-stdout 0: 301566 => ((default-space space-address))
run: empty?/read/send-prints-to-stdout 1: (((1 channel)) <- ((next-input)))
arg: nil 0 (#(tagged record (0 0 1142 . nil)))
run: empty?/read/send-prints-to-stdout 1: #(tagged record (0 0 1142 . nil)) => ((1 channel))
mem: ((1 channel)): 301568 <= 0
mem: ((1 channel)): 301569 <= 0
mem: ((1 channel)): 301570 <= 1142
run: empty?/read/send-prints-to-stdout 2: (((4 integer)) <- ((get)) ((1 channel)) ((0 offset)))
mem: ((301568 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 2: 0 => ((4 integer))
mem: ((4 integer)): 301571 <= 0
run: empty?/read/send-prints-to-stdout 3: (((5 integer)) <- ((get)) ((1 channel)) ((1 offset)))
mem: ((301569 integer) (raw)) => 0
run: empty?/read/send-prints-to-stdout 3: 0 => ((5 integer))
mem: ((5 integer)): 301572 <= 0
run: empty?/read/send-prints-to-stdout 4: (((6 boolean)) <- ((equal)) ((4 integer)) ((5 integer)))
mem: ((4 integer)) => 0
mem: ((5 integer)) => 0
run: empty?/read/send-prints-to-stdout 4: t => ((6 boolean))
mem: ((6 boolean)): 301573 <= t
run: empty?/read/send-prints-to-stdout 5: (((reply)) ((6 boolean)))
mem: ((6 boolean)) => t
run: read/send-prints-to-stdout 2: t => ((2 boolean))
mem: ((2 boolean)): 301538 <= t
run: read/send-prints-to-stdout 3: (((jump-unless)) ((2 boolean)) ((2 offset)))
mem: ((2 boolean)) => t
run: read/send-prints-to-stdout 4: (((3 integer-address)) <- ((get-address)) ((1 channel-address) (deref)) ((1 offset)))
run: read/send-prints-to-stdout 4: 1140 => ((3 integer-address))
mem: ((3 integer-address)): 301539 <= 1140
run: read/send-prints-to-stdout 5: (((sleep)) ((until-location-changes literal)) ((3 integer-address) (deref)))
mem: ((3 integer-address) (deref)) => 0
schedule: pushing read/send-prints-to-stdout to sleep queue
schedule: skipping to cycle 2653
schedule: waking up main
schedule: main
schedule: done with routine nil
schedule: just helpers left; stopping everything