diff options
| author | Kartik Agaram <vc@akkartik.com> | 2020-06-21 17:31:38 -0700 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2020-06-21 17:31:38 -0700 |
| commit | 3b02c3dfa26745f2ea178600b840a34cec4d649b (patch) | |
| tree | 259be41cecbd13bb9357323f8d3a7ec6db9a37d1 | |
| parent | 47fe226b7e5841d25b3392f40bb3698d405e39f2 (diff) | |
| download | mu-3b02c3dfa26745f2ea178600b840a34cec4d649b.tar.gz | |
6572
Small change to mu.subx to keep the treeshaker working with it. That's currently the only place where we prevent jumps across 'functions'.
| -rwxr-xr-x | apps/mu | bin | 323388 -> 323454 bytes | |||
| -rw-r--r-- | apps/mu.subx | 42 | ||||
| -rw-r--r-- | html/apps/mu.subx.html | 20396 | ||||
| -rw-r--r-- | stats.txt | 8 |
4 files changed, 10253 insertions, 10193 deletions
diff --git a/apps/mu b/apps/mu index 48425fe1..c31e1b68 100755 --- a/apps/mu +++ b/apps/mu Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx index e2628d99..fd5bb573 100644 --- a/apps/mu.subx +++ b/apps/mu.subx @@ -7991,12 +7991,42 @@ Mu-registers: # (addr stream {(handle array byte), int}) 0x48/imm32/length # data # it is perfectly ok to use fake alloc-ids -- as long as you never try to reclaim them - 0x11/imm32/alloc-id $Register-eax/imm32 0/imm32 - 0x11/imm32/alloc-id $Register-ecx/imm32 1/imm32 - 0x11/imm32/alloc-id $Register-edx/imm32 2/imm32 - 0x11/imm32/alloc-id $Register-ebx/imm32 3/imm32 - 0x11/imm32/alloc-id $Register-esi/imm32 6/imm32 - 0x11/imm32/alloc-id $Register-edi/imm32 7/imm32 + 0x11/imm32/alloc-id $Mu-register-eax/imm32 0/imm32 + 0x11/imm32/alloc-id $Mu-register-ecx/imm32 1/imm32 + 0x11/imm32/alloc-id $Mu-register-edx/imm32 2/imm32 + 0x11/imm32/alloc-id $Mu-register-ebx/imm32 3/imm32 + 0x11/imm32/alloc-id $Mu-register-esi/imm32 6/imm32 + 0x11/imm32/alloc-id $Mu-register-edi/imm32 7/imm32 + +$Mu-register-eax: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x61/a 0x78/x + +$Mu-register-ecx: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x63/c 0x78/x + +$Mu-register-edx: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x64/d 0x78/x + +$Mu-register-ebx: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x62/b 0x78/x + +$Mu-register-esi: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x73/s 0x69/i + +$Mu-register-edi: + 0x11/imm32/alloc-id + 3/imm32/size + 0x65/e 0x64/d 0x69/i == code diff --git a/html/apps/mu.subx.html b/html/apps/mu.subx.html index 6e3220e1..d1bca9ae 100644 --- a/html/apps/mu.subx.html +++ b/html/apps/mu.subx.html @@ -544,10 +544,10 @@ if ('onhashchange' in window) { <span id="L482" class="LineNr"> 482 </span> c7 0/subop/copy *_Program-types->payload 0/imm32 <span id="L483" class="LineNr"> 483 </span> <span class="subxComment">#</span> <span id="L484" class="LineNr"> 484 </span> (<a href='mu.subx.html#L5148'>parse-mu</a> *(ebp+8) *(ebp+0x10) *(ebp+0x14)) -<span id="L485" class="LineNr"> 485 </span> (<a href='mu.subx.html#L9195'>populate-mu-type-sizes</a> *(ebp+0x10) *(ebp+0x14)) +<span id="L485" class="LineNr"> 485 </span> (<a href='mu.subx.html#L9225'>populate-mu-type-sizes</a> *(ebp+0x10) *(ebp+0x14)) <span id="L486" class="LineNr"> 486 </span><span class="CommentedCode">#? (dump-typeinfos "=== typeinfos\n")</span> -<span id="L487" class="LineNr"> 487 </span> (<a href='mu.subx.html#L9715'>check-mu-types</a> *(ebp+0x10) *(ebp+0x14)) -<span id="L488" class="LineNr"> 488 </span> (<a href='mu.subx.html#L10395'>emit-subx</a> *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L487" class="LineNr"> 487 </span> (<a href='mu.subx.html#L9745'>check-mu-types</a> *(ebp+0x10) *(ebp+0x14)) +<span id="L488" class="LineNr"> 488 </span> (<a href='mu.subx.html#L10425'>emit-subx</a> *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) <span id="L489" class="LineNr"> 489 </span><span class="Constant">$convert-mu:end</span>: <span id="L490" class="LineNr"> 490 </span> <span class="subxS1Comment"># . epilogue</span> <span id="L491" class="LineNr"> 491 </span> 89/<- %esp 5/r32/ebp @@ -870,7 +870,7 @@ if ('onhashchange' in window) { <span id="L848" class="LineNr"> 848 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) <span id="L849" class="LineNr"> 849 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) <span id="L850" class="LineNr"> 850 </span> <span class="subxComment">#</span> -<span id="L851" class="LineNr"> 851 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn <a href='../mu-init-test.subx.html#L7'>main</a> -> result/ebx: int {\n"</span>) +<span id="L851" class="LineNr"> 851 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn main -> result/ebx: int {\n"</span>) <span id="L852" class="LineNr"> 852 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">" result <- do-add 3 4\n"</span>) <span id="L853" class="LineNr"> 853 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"}\n"</span>) <span id="L854" class="LineNr"> 854 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn do-add a: int, b: int -> result/ebx: int {\n"</span>) @@ -1165,7 +1165,7 @@ if ('onhashchange' in window) { <span id="L1178" class="LineNr"> 1178 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) <span id="L1179" class="LineNr"> 1179 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) <span id="L1180" class="LineNr"> 1180 </span> <span class="subxComment">#</span> -<span id="L1181" class="LineNr"> 1181 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn <a href='../mu-init-test.subx.html#L7'>main</a> -> result/ebx: int {\n"</span>) +<span id="L1181" class="LineNr"> 1181 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn main -> result/ebx: int {\n"</span>) <span id="L1182" class="LineNr"> 1182 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">" result <- foo\n"</span>) <span id="L1183" class="LineNr"> 1183 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"}\n"</span>) <span id="L1184" class="LineNr"> 1184 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"fn foo -> result/ebx: int {\n"</span>) @@ -4884,12 +4884,12 @@ if ('onhashchange' in window) { <span id="L5277" class="LineNr"> 5277 </span> 68/push 0/imm32 <span id="L5278" class="LineNr"> 5278 </span> 68/push 0/imm32 <span id="L5279" class="LineNr"> 5279 </span> 89/<- %ecx 4/r32/esp -<span id="L5280" class="LineNr"> 5280 </span> (<a href='mu.subx.html#L8704'>find-or-create-typeinfo</a> %eax %ecx) +<span id="L5280" class="LineNr"> 5280 </span> (<a href='mu.subx.html#L8734'>find-or-create-typeinfo</a> %eax %ecx) <span id="L5281" class="LineNr"> 5281 </span> <span class="subxComment">#</span> <span id="L5282" class="LineNr"> 5282 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> <span id="L5283" class="LineNr"> 5283 </span> <span class="subxComment"># TODO: ensure that 'line' has nothing else but '{'</span> <span id="L5284" class="LineNr"> 5284 </span><span class="CommentedCode">#? (dump-typeinfos "=== aaa\n")</span> -<span id="L5285" class="LineNr"> 5285 </span> (<a href='mu.subx.html#L8935'>populate-mu-type</a> *(ebp+8) %eax *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L5285" class="LineNr"> 5285 </span> (<a href='mu.subx.html#L8965'>populate-mu-type</a> *(ebp+8) %eax *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> <span id="L5286" class="LineNr"> 5286 </span><span class="CommentedCode">#? (dump-typeinfos "=== zzz\n")</span> <span id="L5287" class="LineNr"> 5287 </span> <span class="subxComment"># reclaim new-type</span> <span id="L5288" class="LineNr"> 5288 </span> 81 0/subop/add %esp 8/imm32 @@ -5040,7 +5040,7 @@ if ('onhashchange' in window) { <span id="L5433" class="LineNr"> 5433 </span> <span class="subxComment">#</span> <span id="L5434" class="LineNr"> 5434 </span> <span class="subxComment"># out->inouts = append(v, out->inouts)</span> <span id="L5435" class="LineNr"> 5435 </span> 8d/copy-address *(edi+8) 0/r32/eax <span class="subxComment"># Function-inouts</span> -<span id="L5436" class="LineNr"> 5436 </span> (<a href='mu.subx.html#L8489'>append-list</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+8) *(edi+0xc) %eax) <span class="subxComment"># Function-inouts, Function-inouts</span> +<span id="L5436" class="LineNr"> 5436 </span> (<a href='mu.subx.html#L8519'>append-list</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+8) *(edi+0xc) %eax) <span class="subxComment"># Function-inouts, Function-inouts</span> <span id="L5437" class="LineNr"> 5437 </span> <span class="subxComment"># push(vars, {v, false})</span> <span id="L5438" class="LineNr"> 5438 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *ebx) <span id="L5439" class="LineNr"> 5439 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ebx+4)) @@ -5073,7 +5073,7 @@ if ('onhashchange' in window) { <span id="L5466" class="LineNr"> 5466 </span> 0f 84/jump-if-= $populate-mu-function-header:error3/disp32 <span id="L5467" class="LineNr"> 5467 </span> <span class="subxComment"># out->outputs = append(v, out->outputs)</span> <span id="L5468" class="LineNr"> 5468 </span> 8d/copy-address *(edi+0x10) 0/r32/eax <span class="subxComment"># Function-outputs</span> -<span id="L5469" class="LineNr"> 5469 </span> (<a href='mu.subx.html#L8489'>append-list</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+0x10) *(edi+0x14) %eax) <span class="subxComment"># Function-outputs, Function-outputs</span> +<span id="L5469" class="LineNr"> 5469 </span> (<a href='mu.subx.html#L8519'>append-list</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+0x10) *(edi+0x14) %eax) <span class="subxComment"># Function-outputs, Function-outputs</span> <span id="L5470" class="LineNr"> 5470 </span> <span class="subxComment">#</span> <span id="L5471" class="LineNr"> 5471 </span> e9/jump <span class="Constant">loop</span>/disp32 <span id="L5472" class="LineNr"> 5472 </span> } @@ -5395,7 +5395,7 @@ if ('onhashchange' in window) { <span id="L5788" class="LineNr"> 5788 </span> (<a href='../073next-token.subx.html#L163'>next-token-from-slice</a> *esi *(esi+4) 0x2f %ecx) <span class="subxComment"># Slice-start, Slice-end, '/'</span> <span id="L5789" class="LineNr"> 5789 </span><span class="Constant">$parse-var-with-type:create-var</span>: <span id="L5790" class="LineNr"> 5790 </span> <span class="subxComment"># new-var-from-slice(s, out)</span> -<span id="L5791" class="LineNr"> 5791 </span> (<a href='mu.subx.html#L8412'>new-var-from-slice</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %ecx *(ebp+0x10)) +<span id="L5791" class="LineNr"> 5791 </span> (<a href='mu.subx.html#L8442'>new-var-from-slice</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %ecx *(ebp+0x10)) <span id="L5792" class="LineNr"> 5792 </span> <span class="subxComment"># save out->register</span> <span id="L5793" class="LineNr"> 5793 </span><span class="Constant">$parse-var-with-type:save-register</span>: <span id="L5794" class="LineNr"> 5794 </span> <span class="subxS1Comment"># . var out-addr/edi: (addr var) = lookup(*out)</span> @@ -6526,7 +6526,7 @@ if ('onhashchange' in window) { <span id="L6919" class="LineNr"> 6919 </span> 89/<- %eax 4/r32/esp <span id="L6920" class="LineNr"> 6920 </span> <span class="subxS1Comment"># .</span> <span id="L6921" class="LineNr"> 6921 </span> (<a href='mu.subx.html#L6803'>parse-mu-block</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10) %eax *(ebp+0x18) *(ebp+0x1c)) -<span id="L6922" class="LineNr"> 6922 </span> (<a href='mu.subx.html#L8605'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) +<span id="L6922" class="LineNr"> 6922 </span> (<a href='mu.subx.html#L8635'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) <span id="L6923" class="LineNr"> 6923 </span> <span class="subxS1Comment"># . reclaim tmp</span> <span id="L6924" class="LineNr"> 6924 </span> 81 0/subop/add %esp 8/imm32 <span id="L6925" class="LineNr"> 6925 </span> <span class="subxS1Comment"># .</span> @@ -6558,7 +6558,7 @@ if ('onhashchange' in window) { <span id="L6951" class="LineNr"> 6951 </span> 89/<- %eax 4/r32/esp <span id="L6952" class="LineNr"> 6952 </span> <span class="subxComment">#</span> <span id="L6953" class="LineNr"> 6953 </span> (<a href='mu.subx.html#L7133'>parse-mu-named-block</a> %edx *(ebp+8) *(ebp+0xc) *(ebp+0x10) %eax *(ebp+0x18) *(ebp+0x1c)) -<span id="L6954" class="LineNr"> 6954 </span> (<a href='mu.subx.html#L8605'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) +<span id="L6954" class="LineNr"> 6954 </span> (<a href='mu.subx.html#L8635'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) <span id="L6955" class="LineNr"> 6955 </span> <span class="subxComment"># reclaim tmp</span> <span id="L6956" class="LineNr"> 6956 </span> 81 0/subop/add %esp 8/imm32 <span id="L6957" class="LineNr"> 6957 </span> <span class="subxComment">#</span> @@ -6576,7 +6576,7 @@ if ('onhashchange' in window) { <span id="L6969" class="LineNr"> 6969 </span> 89/<- %eax 4/r32/esp <span id="L6970" class="LineNr"> 6970 </span> <span class="subxComment">#</span> <span id="L6971" class="LineNr"> 6971 </span> (<a href='mu.subx.html#L7189'>parse-mu-var-def</a> %ecx *(ebp+0xc) %eax *(ebp+0x10) *(ebp+0x18) *(ebp+0x1c)) -<span id="L6972" class="LineNr"> 6972 </span> (<a href='mu.subx.html#L8605'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) +<span id="L6972" class="LineNr"> 6972 </span> (<a href='mu.subx.html#L8635'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) <span id="L6973" class="LineNr"> 6973 </span> <span class="subxComment"># reclaim tmp</span> <span id="L6974" class="LineNr"> 6974 </span> 81 0/subop/add %esp 8/imm32 <span id="L6975" class="LineNr"> 6975 </span> <span class="subxComment">#</span> @@ -6590,13 +6590,13 @@ if ('onhashchange' in window) { <span id="L6983" class="LineNr"> 6983 </span> 89/<- %eax 4/r32/esp <span id="L6984" class="LineNr"> 6984 </span> <span class="subxComment">#</span> <span id="L6985" class="LineNr"> 6985 </span> (<a href='mu.subx.html#L7393'>parse-mu-stmt</a> %ecx *(ebp+0xc) *(ebp+0x10) %eax *(ebp+0x18) *(ebp+0x1c)) -<span id="L6986" class="LineNr"> 6986 </span> (<a href='mu.subx.html#L8605'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) +<span id="L6986" class="LineNr"> 6986 </span> (<a href='mu.subx.html#L8635'>append-to-block</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edi *eax *(eax+4)) <span id="L6987" class="LineNr"> 6987 </span> <span class="subxComment"># reclaim tmp</span> <span id="L6988" class="LineNr"> 6988 </span> 81 0/subop/add %esp 8/imm32 <span id="L6989" class="LineNr"> 6989 </span> <span class="subxComment">#</span> <span id="L6990" class="LineNr"> 6990 </span> e9/jump <span class="Constant">loop</span>/disp32 <span id="L6991" class="LineNr"> 6991 </span> } <span class="subxComment"># end line loop</span> -<span id="L6992" class="LineNr"> 6992 </span> (<a href='mu.subx.html#L11469'>clean-up-blocks</a> *(ebp+0xc) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> *(ebp+0x10)) +<span id="L6992" class="LineNr"> 6992 </span> (<a href='mu.subx.html#L11499'>clean-up-blocks</a> *(ebp+0xc) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> *(ebp+0x10)) <span id="L6993" class="LineNr"> 6993 </span> <span class="subxComment"># decrement *Curr-block-depth</span> <span id="L6994" class="LineNr"> 6994 </span> ff 1/subop/decrement *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> <span id="L6995" class="LineNr"> 6995 </span> <span class="subxComment"># pop(vars)</span> @@ -6669,7 +6669,7 @@ if ('onhashchange' in window) { <span id="L7062" class="LineNr"> 7062 </span> ff 6/subop/push %edx <span id="L7063" class="LineNr"> 7063 </span> 89/<- %eax 4/r32/esp <span id="L7064" class="LineNr"> 7064 </span> <span class="subxComment"># out = new literal(s)</span> -<span id="L7065" class="LineNr"> 7065 </span> (<a href='mu.subx.html#L8373'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %eax *(ebp+0xc)) +<span id="L7065" class="LineNr"> 7065 </span> (<a href='mu.subx.html#L8403'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %eax *(ebp+0xc)) <span id="L7066" class="LineNr"> 7066 </span><span class="CommentedCode">#? 8b/-> *(ebp+0xc) 0/r32/eax</span> <span id="L7067" class="LineNr"> 7067 </span><span class="CommentedCode">#? (write-buffered Stderr "type allocid in caller after new-literal: ")</span> <span id="L7068" class="LineNr"> 7068 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(eax+8))</span> @@ -6759,7 +6759,7 @@ if ('onhashchange' in window) { <span id="L7152" class="LineNr"> 7152 </span> 68/push 0/imm32 <span id="L7153" class="LineNr"> 7153 </span> 89/<- %ecx 4/r32/esp <span id="L7154" class="LineNr"> 7154 </span> <span class="subxComment">#</span> -<span id="L7155" class="LineNr"> 7155 </span> (<a href='mu.subx.html#L8373'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+8) %ecx) +<span id="L7155" class="LineNr"> 7155 </span> (<a href='mu.subx.html#L8403'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+8) %ecx) <span id="L7156" class="LineNr"> 7156 </span> <span class="subxComment"># push(vars, v)</span> <span id="L7157" class="LineNr"> 7157 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *ecx) <span id="L7158" class="LineNr"> 7158 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ecx+4)) @@ -6833,7 +6833,7 @@ if ('onhashchange' in window) { <span id="L7226" class="LineNr"> 7226 </span> 3d/compare-eax-and 0/imm32/false <span id="L7227" class="LineNr"> 7227 </span> 0f 84/jump-if-= $parse-mu-var-def:error2/disp32 <span id="L7228" class="LineNr"> 7228 </span> <span class="subxComment">#</span> -<span id="L7229" class="LineNr"> 7229 </span> (<a href='mu.subx.html#L8436'>new-var-def</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *edx *(edx+4) %edi) +<span id="L7229" class="LineNr"> 7229 </span> (<a href='mu.subx.html#L8466'>new-var-def</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *edx *(edx+4) %edi) <span id="L7230" class="LineNr"> 7230 </span> e9/jump $parse-mu-var-def:update-vars/disp32 <span id="L7231" class="LineNr"> 7231 </span> } <span id="L7232" class="LineNr"> 7232 </span> <span class="subxComment"># or v has a register and there's more to this line</span> @@ -6847,7 +6847,7 @@ if ('onhashchange' in window) { <span id="L7240" class="LineNr"> 7240 </span> 3d/compare-eax-and 0/imm32/false <span id="L7241" class="LineNr"> 7241 </span> 0f 84/jump-if-= $parse-mu-var-def:error1/disp32 <span id="L7242" class="LineNr"> 7242 </span> <span class="subxComment">#</span> -<span id="L7243" class="LineNr"> 7243 </span> (<a href='mu.subx.html#L8464'>new-reg-var-def</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *edx *(edx+4) %edi) +<span id="L7243" class="LineNr"> 7243 </span> (<a href='mu.subx.html#L8494'>new-reg-var-def</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *edx *(edx+4) %edi) <span id="L7244" class="LineNr"> 7244 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> <span id="L7245" class="LineNr"> 7245 </span> (<a href='mu.subx.html#L7526'>add-operation-and-inputs-to-stmt</a> %eax *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) <span id="L7246" class="LineNr"> 7246 </span> } @@ -7081,9 +7081,9 @@ if ('onhashchange' in window) { <span id="L7474" class="LineNr"> 7474 </span> 3d/compare-eax-and 0/imm32/false <span id="L7475" class="LineNr"> 7475 </span> 0f 84/jump-if-= $parse-mu-stmt:abort/disp32 <span id="L7476" class="LineNr"> 7476 </span> <span class="subxComment">#</span> -<span id="L7477" class="LineNr"> 7477 </span> (<a href='mu.subx.html#L8004'>lookup-var-or-find-in-fn-outputs</a> %ecx *(ebp+0xc) *(ebp+0x10) %ebx *(ebp+0x18) *(ebp+0x1c)) +<span id="L7477" class="LineNr"> 7477 </span> (<a href='mu.subx.html#L8034'>lookup-var-or-find-in-fn-outputs</a> %ecx *(ebp+0xc) *(ebp+0x10) %ebx *(ebp+0x18) *(ebp+0x1c)) <span id="L7478" class="LineNr"> 7478 </span> 8d/copy-address *(edi+0x14) 0/r32/eax <span class="subxComment"># Stmt1-outputs</span> -<span id="L7479" class="LineNr"> 7479 </span> (<a href='mu.subx.html#L8547'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+0x14) *(edi+0x18) %edx %eax) <span class="subxComment"># Stmt1-outputs</span> +<span id="L7479" class="LineNr"> 7479 </span> (<a href='mu.subx.html#L8577'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *ebx *(ebx+4) *(edi+0x14) *(edi+0x18) %edx %eax) <span class="subxComment"># Stmt1-outputs</span> <span id="L7480" class="LineNr"> 7480 </span> <span class="subxComment">#</span> <span id="L7481" class="LineNr"> 7481 </span> e9/jump <span class="Constant">loop</span>/disp32 <span id="L7482" class="LineNr"> 7482 </span> } @@ -7099,7 +7099,7 @@ if ('onhashchange' in window) { <span id="L7492" class="LineNr"> 7492 </span> 81 7/subop/compare %edi 0/imm32 <span id="L7493" class="LineNr"> 7493 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 <span id="L7494" class="LineNr"> 7494 </span> <span class="subxComment">#</span> -<span id="L7495" class="LineNr"> 7495 </span> (<a href='mu.subx.html#L8093'>maybe-define-var</a> *edi *(edi+4) *(ebp+0xc)) <span class="subxComment"># if output is a deref, then it's already been defined,</span> +<span id="L7495" class="LineNr"> 7495 </span> (<a href='mu.subx.html#L8123'>maybe-define-var</a> *edi *(edi+4) *(ebp+0xc)) <span class="subxComment"># if output is a deref, then it's already been defined,</span> <span id="L7496" class="LineNr"> 7496 </span> <span class="subxComment"># and must be in vars. This call will be a no-op, but safe.</span> <span id="L7497" class="LineNr"> 7497 </span> <span class="subxComment"># output = output->next</span> <span id="L7498" class="LineNr"> 7498 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> @@ -7186,7 +7186,7 @@ if ('onhashchange' in window) { <span id="L7579" class="LineNr"> 7579 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0xc) *(edi+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> <span id="L7580" class="LineNr"> 7580 </span> 3d/compare-eax-and 0/imm32 <span id="L7581" class="LineNr"> 7581 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L7582" class="LineNr"> 7582 </span> (<a href='mu.subx.html#L8632'>lookup-or-create-constant</a> %eax %ecx %esi) +<span id="L7582" class="LineNr"> 7582 </span> (<a href='mu.subx.html#L8662'>lookup-or-create-constant</a> %eax %ecx %esi) <span id="L7583" class="LineNr"> 7583 </span><span class="CommentedCode">#? (lookup *esi *(esi+4))</span> <span id="L7584" class="LineNr"> 7584 </span><span class="CommentedCode">#? (write-buffered Stderr "creating new output var ")</span> <span id="L7585" class="LineNr"> 7585 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> @@ -7215,7 +7215,7 @@ if ('onhashchange' in window) { <span id="L7608" class="LineNr"> 7608 </span> (<a href='mu.subx.html#L7692'>lookup-var-or-literal</a> %ecx *(ebp+0x10) %esi *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) <span id="L7609" class="LineNr"> 7609 </span><span class="Constant">$add-operation-and-inputs-to-stmt:save-var</span>: <span id="L7610" class="LineNr"> 7610 </span> 8d/copy-address *(edi+0xc) 0/r32/eax -<span id="L7611" class="LineNr"> 7611 </span> (<a href='mu.subx.html#L8547'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *esi *(esi+4) *(edi+0xc) *(edi+0x10) %edx %eax) <span class="subxComment"># Stmt1-inouts or Regvardef-inouts</span> +<span id="L7611" class="LineNr"> 7611 </span> (<a href='mu.subx.html#L8577'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *esi *(esi+4) *(edi+0xc) *(edi+0x10) %edx %eax) <span class="subxComment"># Stmt1-inouts or Regvardef-inouts</span> <span id="L7612" class="LineNr"> 7612 </span> <span class="subxComment">#</span> <span id="L7613" class="LineNr"> 7613 </span> e9/jump <span class="Constant">loop</span>/disp32 <span id="L7614" class="LineNr"> 7614 </span> } @@ -7320,7 +7320,7 @@ if ('onhashchange' in window) { <span id="L7713" class="LineNr"> 7713 </span> 3d/compare-eax-and 0/imm32/false <span id="L7714" class="LineNr"> 7714 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 <span id="L7715" class="LineNr"> 7715 </span><span class="Constant">$lookup-var-or-literal:literal</span>: -<span id="L7716" class="LineNr"> 7716 </span> (<a href='mu.subx.html#L8324'>new-literal-integer</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %esi *(ebp+0x10) *(ebp+0x18) *(ebp+0x1c)) +<span id="L7716" class="LineNr"> 7716 </span> (<a href='mu.subx.html#L8354'>new-literal-integer</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %esi *(ebp+0x10) *(ebp+0x18) *(ebp+0x1c)) <span id="L7717" class="LineNr"> 7717 </span> eb/jump $lookup-var-or-literal:end/disp8 <span id="L7718" class="LineNr"> 7718 </span> } <span id="L7719" class="LineNr"> 7719 </span> <span class="subxComment"># else if (c == '"') return new var(name)</span> @@ -7328,7 +7328,7 @@ if ('onhashchange' in window) { <span id="L7721" class="LineNr"> 7721 </span> 81 7/subop/compare %ecx 0x22/imm32/dquote <span id="L7722" class="LineNr"> 7722 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 <span id="L7723" class="LineNr"> 7723 </span><span class="Constant">$lookup-var-or-literal:literal-string</span>: -<span id="L7724" class="LineNr"> 7724 </span> (<a href='mu.subx.html#L8373'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %esi *(ebp+0x10)) +<span id="L7724" class="LineNr"> 7724 </span> (<a href='mu.subx.html#L8403'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %esi *(ebp+0x10)) <span id="L7725" class="LineNr"> 7725 </span> eb/jump $lookup-var-or-literal:end/disp8 <span id="L7726" class="LineNr"> 7726 </span> } <span id="L7727" class="LineNr"> 7727 </span> <span class="subxComment"># otherwise return lookup-var(name, vars)</span> @@ -7574,7 +7574,7 @@ if ('onhashchange' in window) { <span id="L7967" class="LineNr"> 7967 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 <span id="L7968" class="LineNr"> 7968 </span> <span class="subxComment">#</span> <span id="L7969" class="LineNr"> 7969 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" var@"</span>) -<span id="L7970" class="LineNr"> 7970 </span> (<a href='mu.subx.html#L9636'>dump-var</a> 2 %ebx) +<span id="L7970" class="LineNr"> 7970 </span> (<a href='mu.subx.html#L9666'>dump-var</a> 2 %ebx) <span id="L7971" class="LineNr"> 7971 </span> <span class="subxComment"># curr -= 12</span> <span id="L7972" class="LineNr"> 7972 </span> 81 5/subop/subtract %ebx 0xc/imm32 <span id="L7973" class="LineNr"> 7973 </span> e9/jump <span class="Constant">loop</span>/disp32 @@ -7598,2037 +7598,2037 @@ if ('onhashchange' in window) { <span id="L7991" class="LineNr"> 7991 </span> 0x48/imm32/length <span id="L7992" class="LineNr"> 7992 </span> <span class="subxComment"># data</span> <span id="L7993" class="LineNr"> 7993 </span> <span class="subxComment"># it is perfectly ok to use fake alloc-ids -- as long as you never try to reclaim them</span> -<span id="L7994" class="LineNr"> 7994 </span> 0x11/imm32/alloc-id $Register-eax/imm32 0/imm32 -<span id="L7995" class="LineNr"> 7995 </span> 0x11/imm32/alloc-id $Register-ecx/imm32 1/imm32 -<span id="L7996" class="LineNr"> 7996 </span> 0x11/imm32/alloc-id $Register-edx/imm32 2/imm32 -<span id="L7997" class="LineNr"> 7997 </span> 0x11/imm32/alloc-id $Register-ebx/imm32 3/imm32 -<span id="L7998" class="LineNr"> 7998 </span> 0x11/imm32/alloc-id $Register-esi/imm32 6/imm32 -<span id="L7999" class="LineNr"> 7999 </span> 0x11/imm32/alloc-id $Register-edi/imm32 7/imm32 +<span id="L7994" class="LineNr"> 7994 </span> 0x11/imm32/alloc-id $Mu-register-eax/imm32 0/imm32 +<span id="L7995" class="LineNr"> 7995 </span> 0x11/imm32/alloc-id $Mu-register-ecx/imm32 1/imm32 +<span id="L7996" class="LineNr"> 7996 </span> 0x11/imm32/alloc-id $Mu-register-edx/imm32 2/imm32 +<span id="L7997" class="LineNr"> 7997 </span> 0x11/imm32/alloc-id $Mu-register-ebx/imm32 3/imm32 +<span id="L7998" class="LineNr"> 7998 </span> 0x11/imm32/alloc-id $Mu-register-esi/imm32 6/imm32 +<span id="L7999" class="LineNr"> 7999 </span> 0x11/imm32/alloc-id $Mu-register-edi/imm32 7/imm32 <span id="L8000" class="LineNr"> 8000 </span> -<span id="L8001" class="LineNr"> 8001 </span>== code -<span id="L8002" class="LineNr"> 8002 </span> -<span id="L8003" class="LineNr"> 8003 </span><span class="subxComment"># return first 'name' from the top (back) of 'vars' and create a new var for a fn output if not found</span> -<span id="L8004" class="LineNr"> 8004 </span><span class="subxFunction">lookup-var-or-find-in-fn-outputs</span>: <span class="subxComment"># name: (addr slice), vars: (addr stack live-var), fn: (addr function), out: (addr handle var), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L8005" class="LineNr"> 8005 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8006" class="LineNr"> 8006 </span> 55/push-ebp -<span id="L8007" class="LineNr"> 8007 </span> 89/<- %ebp 4/r32/esp -<span id="L8008" class="LineNr"> 8008 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8009" class="LineNr"> 8009 </span> 50/push-eax -<span id="L8010" class="LineNr"> 8010 </span> <span class="subxComment">#</span> -<span id="L8011" class="LineNr"> 8011 </span> (<a href='mu.subx.html#L7787'>lookup-var-helper</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x10) *(ebp+0x18) *(ebp+0x1c)) <span class="subxComment"># arg order slightly different; 'fn' is deemphasized</span> -<span id="L8012" class="LineNr"> 8012 </span> { -<span id="L8013" class="LineNr"> 8013 </span> <span class="subxComment"># if (out != 0) return</span> -<span id="L8014" class="LineNr"> 8014 </span> 8b/-> *(ebp+0x14) 0/r32/eax -<span id="L8015" class="LineNr"> 8015 </span> 81 7/subop/compare *eax 0/imm32 -<span id="L8016" class="LineNr"> 8016 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L8017" class="LineNr"> 8017 </span> <span class="subxComment"># if name is one of fn's outputs, return it</span> -<span id="L8018" class="LineNr"> 8018 </span> (<a href='mu.subx.html#L8040'>find-in-function-outputs</a> *(ebp+0x10) *(ebp+8) *(ebp+0x14)) -<span id="L8019" class="LineNr"> 8019 </span> 8b/-> *(ebp+0x14) 0/r32/eax -<span id="L8020" class="LineNr"> 8020 </span> 81 7/subop/compare *eax 0/imm32 -<span id="L8021" class="LineNr"> 8021 </span> <span class="subxComment"># otherwise abort</span> -<span id="L8022" class="LineNr"> 8022 </span> 0f 84/jump-if-= $lookup-or-define-var:abort/disp32 -<span id="L8023" class="LineNr"> 8023 </span> } -<span id="L8024" class="LineNr"> 8024 </span><span class="Constant">$lookup-or-define-var:end</span>: -<span id="L8025" class="LineNr"> 8025 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8026" class="LineNr"> 8026 </span> 58/pop-to-eax -<span id="L8027" class="LineNr"> 8027 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8028" class="LineNr"> 8028 </span> 89/<- %esp 5/r32/ebp -<span id="L8029" class="LineNr"> 8029 </span> 5d/pop-to-ebp -<span id="L8030" class="LineNr"> 8030 </span> c3/return -<span id="L8031" class="LineNr"> 8031 </span> -<span id="L8032" class="LineNr"> 8032 </span><span class="Constant">$lookup-or-define-var:abort</span>: -<span id="L8033" class="LineNr"> 8033 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"unknown variable '"</span>) -<span id="L8034" class="LineNr"> 8034 </span> (<a href='../072slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0x18) *(ebp+8)) -<span id="L8035" class="LineNr"> 8035 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"'\n"</span>) -<span id="L8036" class="LineNr"> 8036 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x18)) -<span id="L8037" class="LineNr"> 8037 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x1c) 1) -<span id="L8038" class="LineNr"> 8038 </span> <span class="subxComment"># never gets here</span> -<span id="L8039" class="LineNr"> 8039 </span> -<span id="L8040" class="LineNr"> 8040 </span><span class="subxFunction">find-in-function-outputs</span>: <span class="subxComment"># fn: (addr function), name: (addr slice), out: (addr handle var)</span> -<span id="L8041" class="LineNr"> 8041 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8042" class="LineNr"> 8042 </span> 55/push-ebp -<span id="L8043" class="LineNr"> 8043 </span> 89/<- %ebp 4/r32/esp -<span id="L8044" class="LineNr"> 8044 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8045" class="LineNr"> 8045 </span> 50/push-eax -<span id="L8046" class="LineNr"> 8046 </span> 51/push-ecx -<span id="L8047" class="LineNr"> 8047 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> -<span id="L8048" class="LineNr"> 8048 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L8049" class="LineNr"> 8049 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> -<span id="L8050" class="LineNr"> 8050 </span> 89/<- %ecx 0/r32/eax -<span id="L8051" class="LineNr"> 8051 </span> <span class="subxComment"># while curr != null</span> -<span id="L8052" class="LineNr"> 8052 </span> { -<span id="L8053" class="LineNr"> 8053 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L8054" class="LineNr"> 8054 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8055" class="LineNr"> 8055 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(curr->value)</span> -<span id="L8056" class="LineNr"> 8056 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L8057" class="LineNr"> 8057 </span> <span class="subxComment"># var s/eax: (addr array byte) = lookup(v->name)</span> -<span id="L8058" class="LineNr"> 8058 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L8059" class="LineNr"> 8059 </span> <span class="subxComment"># if (s == name) return curr->value</span> -<span id="L8060" class="LineNr"> 8060 </span> (<a href='../072slice.subx.html#L120'>slice-equal?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> -<span id="L8061" class="LineNr"> 8061 </span> 3d/compare-eax-and 0/imm32/false -<span id="L8062" class="LineNr"> 8062 </span> { -<span id="L8063" class="LineNr"> 8063 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8064" class="LineNr"> 8064 </span> <span class="subxComment"># var edi = out</span> -<span id="L8065" class="LineNr"> 8065 </span> 57/push-edi -<span id="L8066" class="LineNr"> 8066 </span> 8b/-> *(ebp+0x10) 7/r32/edi -<span id="L8067" class="LineNr"> 8067 </span> <span class="subxComment"># *out = curr->value</span> -<span id="L8068" class="LineNr"> 8068 </span> 8b/-> *ecx 0/r32/eax -<span id="L8069" class="LineNr"> 8069 </span> 89/<- *edi 0/r32/eax -<span id="L8070" class="LineNr"> 8070 </span> 8b/-> *(ecx+4) 0/r32/eax -<span id="L8071" class="LineNr"> 8071 </span> 89/<- *(edi+4) 0/r32/eax -<span id="L8072" class="LineNr"> 8072 </span> <span class="subxComment">#</span> -<span id="L8073" class="LineNr"> 8073 </span> 5f/pop-to-edi -<span id="L8074" class="LineNr"> 8074 </span> eb/jump $find-in-function-outputs:end/disp8 -<span id="L8075" class="LineNr"> 8075 </span> } -<span id="L8076" class="LineNr"> 8076 </span> <span class="subxComment"># curr = curr->next</span> -<span id="L8077" class="LineNr"> 8077 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L8078" class="LineNr"> 8078 </span> 89/<- %ecx 0/r32/eax -<span id="L8079" class="LineNr"> 8079 </span> <span class="subxComment">#</span> -<span id="L8080" class="LineNr"> 8080 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L8081" class="LineNr"> 8081 </span> } -<span id="L8082" class="LineNr"> 8082 </span> b8/copy-to-eax 0/imm32 -<span id="L8083" class="LineNr"> 8083 </span><span class="Constant">$find-in-function-outputs:end</span>: -<span id="L8084" class="LineNr"> 8084 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8085" class="LineNr"> 8085 </span> 59/pop-to-ecx -<span id="L8086" class="LineNr"> 8086 </span> 58/pop-to-eax -<span id="L8087" class="LineNr"> 8087 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8088" class="LineNr"> 8088 </span> 89/<- %esp 5/r32/ebp -<span id="L8089" class="LineNr"> 8089 </span> 5d/pop-to-ebp -<span id="L8090" class="LineNr"> 8090 </span> c3/return -<span id="L8091" class="LineNr"> 8091 </span> -<span id="L8092" class="LineNr"> 8092 </span><span class="subxComment"># push 'out' to 'vars' if not already there; it's assumed to be a fn output</span> -<span id="L8093" class="LineNr"> 8093 </span><span class="subxFunction">maybe-define-var</span>: <span class="subxComment"># out: (handle var), vars: (addr stack live-var)</span> -<span id="L8094" class="LineNr"> 8094 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8095" class="LineNr"> 8095 </span> 55/push-ebp -<span id="L8096" class="LineNr"> 8096 </span> 89/<- %ebp 4/r32/esp -<span id="L8097" class="LineNr"> 8097 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8098" class="LineNr"> 8098 </span> 50/push-eax -<span id="L8099" class="LineNr"> 8099 </span> <span class="subxComment"># var out-addr/eax: (addr var)</span> -<span id="L8100" class="LineNr"> 8100 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+8) *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L8101" class="LineNr"> 8101 </span> <span class="subxComment">#</span> -<span id="L8102" class="LineNr"> 8102 </span> (<a href='mu.subx.html#L8118'>binding-exists?</a> %eax *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L8103" class="LineNr"> 8103 </span> 3d/compare-eax-and 0/imm32/false -<span id="L8104" class="LineNr"> 8104 </span> 75/jump-if-!= $maybe-define-var:end/disp8 -<span id="L8105" class="LineNr"> 8105 </span> <span class="subxComment"># otherwise update vars</span> -<span id="L8106" class="LineNr"> 8106 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ebp+8)) -<span id="L8107" class="LineNr"> 8107 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ebp+0xc)) -<span id="L8108" class="LineNr"> 8108 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># 'out' is always a fn output; never spill it</span> -<span id="L8109" class="LineNr"> 8109 </span><span class="Constant">$maybe-define-var:end</span>: -<span id="L8110" class="LineNr"> 8110 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8111" class="LineNr"> 8111 </span> 58/pop-to-eax -<span id="L8112" class="LineNr"> 8112 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8113" class="LineNr"> 8113 </span> 89/<- %esp 5/r32/ebp -<span id="L8114" class="LineNr"> 8114 </span> 5d/pop-to-ebp -<span id="L8115" class="LineNr"> 8115 </span> c3/return -<span id="L8116" class="LineNr"> 8116 </span> -<span id="L8117" class="LineNr"> 8117 </span><span class="subxComment"># simpler version of lookup-var-helper</span> -<span id="L8118" class="LineNr"> 8118 </span><span class="subxFunction">binding-exists?</span>: <span class="subxComment"># target: (addr var), vars: (addr stack live-var) -> result/eax: boolean</span> -<span id="L8119" class="LineNr"> 8119 </span> <span class="subxComment"># pseudocode:</span> -<span id="L8120" class="LineNr"> 8120 </span> <span class="subxComment"># var curr: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L8121" class="LineNr"> 8121 </span> <span class="subxComment"># var min = vars->data</span> -<span id="L8122" class="LineNr"> 8122 </span> <span class="subxComment"># while curr >= min</span> -<span id="L8123" class="LineNr"> 8123 </span> <span class="subxComment"># var v: (handle var) = *curr</span> -<span id="L8124" class="LineNr"> 8124 </span> <span class="subxComment"># if v->name == target->name</span> -<span id="L8125" class="LineNr"> 8125 </span> <span class="subxComment"># return true</span> -<span id="L8126" class="LineNr"> 8126 </span> <span class="subxComment"># curr -= 12</span> -<span id="L8127" class="LineNr"> 8127 </span> <span class="subxComment"># return false</span> -<span id="L8128" class="LineNr"> 8128 </span> <span class="subxComment">#</span> -<span id="L8129" class="LineNr"> 8129 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8130" class="LineNr"> 8130 </span> 55/push-ebp -<span id="L8131" class="LineNr"> 8131 </span> 89/<- %ebp 4/r32/esp -<span id="L8132" class="LineNr"> 8132 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8133" class="LineNr"> 8133 </span> 51/push-ecx -<span id="L8134" class="LineNr"> 8134 </span> 52/push-edx -<span id="L8135" class="LineNr"> 8135 </span> 56/push-esi -<span id="L8136" class="LineNr"> 8136 </span> <span class="subxComment"># var target-name/ecx: (addr array byte) = lookup(target->name)</span> -<span id="L8137" class="LineNr"> 8137 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L8138" class="LineNr"> 8138 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L8139" class="LineNr"> 8139 </span> 89/<- %ecx 0/r32/eax -<span id="L8140" class="LineNr"> 8140 </span> <span class="subxComment"># esi = vars</span> -<span id="L8141" class="LineNr"> 8141 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L8142" class="LineNr"> 8142 </span> <span class="subxComment"># eax = vars->top</span> -<span id="L8143" class="LineNr"> 8143 </span> 8b/-> *esi 0/r32/eax -<span id="L8144" class="LineNr"> 8144 </span> <span class="subxComment"># var min/edx: (addr handle var) = vars->data</span> -<span id="L8145" class="LineNr"> 8145 </span> 8d/copy-address *(esi+8) 2/r32/edx -<span id="L8146" class="LineNr"> 8146 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L8147" class="LineNr"> 8147 </span> 8d/copy-address *(esi+eax-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->type - 12</span> -<span id="L8148" class="LineNr"> 8148 </span> { -<span id="L8149" class="LineNr"> 8149 </span><span class="Constant">$binding-exists?:loop</span>: -<span id="L8150" class="LineNr"> 8150 </span> <span class="subxComment"># if (curr < min) return</span> -<span id="L8151" class="LineNr"> 8151 </span> 39/compare %esi 2/r32/edx -<span id="L8152" class="LineNr"> 8152 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L8153" class="LineNr"> 8153 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(*curr)</span> -<span id="L8154" class="LineNr"> 8154 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> -<span id="L8155" class="LineNr"> 8155 </span> <span class="subxComment"># var vn/eax: (addr array byte) = lookup(v->name)</span> -<span id="L8156" class="LineNr"> 8156 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L8157" class="LineNr"> 8157 </span> <span class="subxComment"># if (vn == target-name) return true</span> -<span id="L8158" class="LineNr"> 8158 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx %eax) <span class="subxComment"># => eax</span> -<span id="L8159" class="LineNr"> 8159 </span> 3d/compare-eax-and 0/imm32/false -<span id="L8160" class="LineNr"> 8160 </span> 75/jump-if-!= $binding-exists?:end/disp8 <span class="subxComment"># eax already contains true</span> -<span id="L8161" class="LineNr"> 8161 </span> <span class="subxComment"># curr -= 12</span> -<span id="L8162" class="LineNr"> 8162 </span> 81 5/subop/subtract %esi 0xc/imm32 -<span id="L8163" class="LineNr"> 8163 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L8164" class="LineNr"> 8164 </span> } -<span id="L8165" class="LineNr"> 8165 </span> b8/copy-to-eax 0/imm32/false -<span id="L8166" class="LineNr"> 8166 </span><span class="Constant">$binding-exists?:end</span>: -<span id="L8167" class="LineNr"> 8167 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8168" class="LineNr"> 8168 </span> 5e/pop-to-esi -<span id="L8169" class="LineNr"> 8169 </span> 5a/pop-to-edx -<span id="L8170" class="LineNr"> 8170 </span> 59/pop-to-ecx -<span id="L8171" class="LineNr"> 8171 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8172" class="LineNr"> 8172 </span> 89/<- %esp 5/r32/ebp -<span id="L8173" class="LineNr"> 8173 </span> 5d/pop-to-ebp -<span id="L8174" class="LineNr"> 8174 </span> c3/return -<span id="L8175" class="LineNr"> 8175 </span> -<span id="L8176" class="LineNr"> 8176 </span><span class="subxTest">test-parse-mu-stmt</span>: -<span id="L8177" class="LineNr"> 8177 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8178" class="LineNr"> 8178 </span> 55/push-ebp -<span id="L8179" class="LineNr"> 8179 </span> 89/<- %ebp 4/r32/esp -<span id="L8180" class="LineNr"> 8180 </span> <span class="subxComment"># setup</span> -<span id="L8181" class="LineNr"> 8181 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>) -<span id="L8182" class="LineNr"> 8182 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"increment n\n"</span>) -<span id="L8183" class="LineNr"> 8183 </span> <span class="subxComment"># var vars/ecx: (stack (addr var) 16)</span> -<span id="L8184" class="LineNr"> 8184 </span> 81 5/subop/subtract %esp 0xc0/imm32 -<span id="L8185" class="LineNr"> 8185 </span> 68/push 0xc0/imm32/size -<span id="L8186" class="LineNr"> 8186 </span> 68/push 0/imm32/top -<span id="L8187" class="LineNr"> 8187 </span> 89/<- %ecx 4/r32/esp -<span id="L8188" class="LineNr"> 8188 </span> (<a href='../092stack.subx.html#L13'>clear-stack</a> %ecx) -<span id="L8189" class="LineNr"> 8189 </span> <span class="subxComment"># var v/edx: (handle var)</span> -<span id="L8190" class="LineNr"> 8190 </span> 68/push 0/imm32 -<span id="L8191" class="LineNr"> 8191 </span> 68/push 0/imm32 -<span id="L8192" class="LineNr"> 8192 </span> 89/<- %edx 4/r32/esp -<span id="L8193" class="LineNr"> 8193 </span> <span class="subxComment"># var s/eax: (handle array byte)</span> -<span id="L8194" class="LineNr"> 8194 </span> 68/push 0/imm32 -<span id="L8195" class="LineNr"> 8195 </span> 68/push 0/imm32 -<span id="L8196" class="LineNr"> 8196 </span> 89/<- %eax 4/r32/esp -<span id="L8197" class="LineNr"> 8197 </span> <span class="subxComment"># v = new var("n")</span> -<span id="L8198" class="LineNr"> 8198 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"n"</span> %eax) -<span id="L8199" class="LineNr"> 8199 </span> (<a href='mu.subx.html#L8288'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) -<span id="L8200" class="LineNr"> 8200 </span> <span class="subxComment">#</span> -<span id="L8201" class="LineNr"> 8201 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *edx) -<span id="L8202" class="LineNr"> 8202 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *(edx+4)) -<span id="L8203" class="LineNr"> 8203 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx 0) -<span id="L8204" class="LineNr"> 8204 </span> <span class="subxComment"># var out/eax: (handle stmt)</span> -<span id="L8205" class="LineNr"> 8205 </span> 68/push 0/imm32 -<span id="L8206" class="LineNr"> 8206 </span> 68/push 0/imm32 -<span id="L8207" class="LineNr"> 8207 </span> 89/<- %eax 4/r32/esp -<span id="L8208" class="LineNr"> 8208 </span> <span class="subxComment"># convert</span> -<span id="L8209" class="LineNr"> 8209 </span> (<a href='mu.subx.html#L7393'>parse-mu-stmt</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> %ecx 0 %eax <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L8210" class="LineNr"> 8210 </span> <span class="subxComment"># var out-addr/edx: (addr stmt) = lookup(*out)</span> -<span id="L8211" class="LineNr"> 8211 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8212" class="LineNr"> 8212 </span> 89/<- %edx 0/r32/eax -<span id="L8213" class="LineNr"> 8213 </span> <span class="subxComment"># out->tag</span> -<span id="L8214" class="LineNr"> 8214 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> *edx 1 <span class="Constant">"F - <a href='mu.subx.html#L8176'>test-parse-mu-stmt</a>/tag"</span>) <span class="subxComment"># Stmt-tag is Stmt1</span> -<span id="L8215" class="LineNr"> 8215 </span> <span class="subxComment"># out->operation</span> -<span id="L8216" class="LineNr"> 8216 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L8217" class="LineNr"> 8217 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"increment"</span> <span class="Constant">"F - <a href='mu.subx.html#L8176'>test-parse-mu-stmt</a>/name"</span>) <span class="subxComment"># Stmt1-operation</span> -<span id="L8218" class="LineNr"> 8218 </span> <span class="subxComment"># out->inouts->value->name</span> -<span id="L8219" class="LineNr"> 8219 </span> <span class="subxS1Comment"># . eax = out->inouts</span> -<span id="L8220" class="LineNr"> 8220 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L8221" class="LineNr"> 8221 </span> <span class="subxS1Comment"># . eax = out->inouts->value</span> -<span id="L8222" class="LineNr"> 8222 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L8223" class="LineNr"> 8223 </span> <span class="subxS1Comment"># . eax = out->inouts->value->name</span> -<span id="L8224" class="LineNr"> 8224 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L8225" class="LineNr"> 8225 </span> <span class="subxS1Comment"># .</span> -<span id="L8226" class="LineNr"> 8226 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"n"</span> <span class="Constant">"F - <a href='mu.subx.html#L8176'>test-parse-mu-stmt</a>/inout:0"</span>) -<span id="L8227" class="LineNr"> 8227 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8228" class="LineNr"> 8228 </span> 89/<- %esp 5/r32/ebp -<span id="L8229" class="LineNr"> 8229 </span> 5d/pop-to-ebp -<span id="L8230" class="LineNr"> 8230 </span> c3/return -<span id="L8231" class="LineNr"> 8231 </span> -<span id="L8232" class="LineNr"> 8232 </span><span class="subxTest">test-parse-mu-stmt-with-comma</span>: -<span id="L8233" class="LineNr"> 8233 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8234" class="LineNr"> 8234 </span> 55/push-ebp -<span id="L8235" class="LineNr"> 8235 </span> 89/<- %ebp 4/r32/esp -<span id="L8236" class="LineNr"> 8236 </span> <span class="subxComment"># setup</span> -<span id="L8237" class="LineNr"> 8237 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>) -<span id="L8238" class="LineNr"> 8238 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"copy-to n, 3\n"</span>) -<span id="L8239" class="LineNr"> 8239 </span> <span class="subxComment"># var vars/ecx: (stack (addr var) 16)</span> -<span id="L8240" class="LineNr"> 8240 </span> 81 5/subop/subtract %esp 0xc0/imm32 -<span id="L8241" class="LineNr"> 8241 </span> 68/push 0xc0/imm32/size -<span id="L8242" class="LineNr"> 8242 </span> 68/push 0/imm32/top -<span id="L8243" class="LineNr"> 8243 </span> 89/<- %ecx 4/r32/esp -<span id="L8244" class="LineNr"> 8244 </span> (<a href='../092stack.subx.html#L13'>clear-stack</a> %ecx) -<span id="L8245" class="LineNr"> 8245 </span> <span class="subxComment"># var v/edx: (handle var)</span> -<span id="L8246" class="LineNr"> 8246 </span> 68/push 0/imm32 -<span id="L8247" class="LineNr"> 8247 </span> 68/push 0/imm32 -<span id="L8248" class="LineNr"> 8248 </span> 89/<- %edx 4/r32/esp -<span id="L8249" class="LineNr"> 8249 </span> <span class="subxComment"># var s/eax: (handle array byte)</span> -<span id="L8250" class="LineNr"> 8250 </span> 68/push 0/imm32 -<span id="L8251" class="LineNr"> 8251 </span> 68/push 0/imm32 -<span id="L8252" class="LineNr"> 8252 </span> 89/<- %eax 4/r32/esp -<span id="L8253" class="LineNr"> 8253 </span> <span class="subxComment"># v = new var("n")</span> -<span id="L8254" class="LineNr"> 8254 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"n"</span> %eax) -<span id="L8255" class="LineNr"> 8255 </span> (<a href='mu.subx.html#L8288'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) -<span id="L8256" class="LineNr"> 8256 </span> <span class="subxComment">#</span> -<span id="L8257" class="LineNr"> 8257 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *edx) -<span id="L8258" class="LineNr"> 8258 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *(edx+4)) -<span id="L8259" class="LineNr"> 8259 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx 0) -<span id="L8260" class="LineNr"> 8260 </span> <span class="subxComment"># var out/eax: (handle stmt)</span> -<span id="L8261" class="LineNr"> 8261 </span> 68/push 0/imm32 -<span id="L8262" class="LineNr"> 8262 </span> 68/push 0/imm32 -<span id="L8263" class="LineNr"> 8263 </span> 89/<- %eax 4/r32/esp -<span id="L8264" class="LineNr"> 8264 </span> <span class="subxComment"># convert</span> -<span id="L8265" class="LineNr"> 8265 </span> (<a href='mu.subx.html#L7393'>parse-mu-stmt</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> %ecx 0 %eax <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L8266" class="LineNr"> 8266 </span> <span class="subxComment"># var out-addr/edx: (addr stmt) = lookup(*out)</span> -<span id="L8267" class="LineNr"> 8267 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8268" class="LineNr"> 8268 </span> 89/<- %edx 0/r32/eax -<span id="L8269" class="LineNr"> 8269 </span> <span class="subxComment"># out->tag</span> -<span id="L8270" class="LineNr"> 8270 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> *edx 1 <span class="Constant">"F - <a href='mu.subx.html#L8232'>test-parse-mu-stmt-with-comma</a>/tag"</span>) <span class="subxComment"># Stmt-tag is Stmt1</span> -<span id="L8271" class="LineNr"> 8271 </span> <span class="subxComment"># out->operation</span> -<span id="L8272" class="LineNr"> 8272 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L8273" class="LineNr"> 8273 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"copy-to"</span> <span class="Constant">"F - <a href='mu.subx.html#L8232'>test-parse-mu-stmt-with-comma</a>/name"</span>) <span class="subxComment"># Stmt1-operation</span> -<span id="L8274" class="LineNr"> 8274 </span> <span class="subxComment"># out->inouts->value->name</span> -<span id="L8275" class="LineNr"> 8275 </span> <span class="subxS1Comment"># . eax = out->inouts</span> -<span id="L8276" class="LineNr"> 8276 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L8277" class="LineNr"> 8277 </span> <span class="subxS1Comment"># . eax = out->inouts->value</span> -<span id="L8278" class="LineNr"> 8278 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L8279" class="LineNr"> 8279 </span> <span class="subxS1Comment"># . eax = out->inouts->value->name</span> -<span id="L8280" class="LineNr"> 8280 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L8281" class="LineNr"> 8281 </span> <span class="subxS1Comment"># .</span> -<span id="L8282" class="LineNr"> 8282 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"n"</span> <span class="Constant">"F - <a href='mu.subx.html#L8232'>test-parse-mu-stmt-with-comma</a>/inout:0"</span>) -<span id="L8283" class="LineNr"> 8283 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8284" class="LineNr"> 8284 </span> 89/<- %esp 5/r32/ebp -<span id="L8285" class="LineNr"> 8285 </span> 5d/pop-to-ebp -<span id="L8286" class="LineNr"> 8286 </span> c3/return -<span id="L8287" class="LineNr"> 8287 </span> -<span id="L8288" class="LineNr"> 8288 </span><span class="subxFunction">new-var</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (handle array byte), out: (addr handle var)</span> -<span id="L8289" class="LineNr"> 8289 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8290" class="LineNr"> 8290 </span> 55/push-ebp -<span id="L8291" class="LineNr"> 8291 </span> 89/<- %ebp 4/r32/esp -<span id="L8292" class="LineNr"> 8292 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8293" class="LineNr"> 8293 </span> 50/push-eax -<span id="L8294" class="LineNr"> 8294 </span> 51/push-ecx -<span id="L8295" class="LineNr"> 8295 </span> <span class="subxComment"># ecx = out</span> -<span id="L8296" class="LineNr"> 8296 </span> 8b/-> *(ebp+0x14) 1/r32/ecx -<span id="L8297" class="LineNr"> 8297 </span> <span class="subxComment">#</span> -<span id="L8298" class="LineNr"> 8298 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L332'>Var-size</a></span> %ecx) -<span id="L8299" class="LineNr"> 8299 </span> <span class="subxComment"># var out-addr/eax: (addr var)</span> -<span id="L8300" class="LineNr"> 8300 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> -<span id="L8301" class="LineNr"> 8301 </span> <span class="subxComment"># out-addr->name = name</span> -<span id="L8302" class="LineNr"> 8302 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L8303" class="LineNr"> 8303 </span> 89/<- *eax 1/r32/ecx <span class="subxComment"># Var-name</span> -<span id="L8304" class="LineNr"> 8304 </span> 8b/-> *(ebp+0x10) 1/r32/ecx -<span id="L8305" class="LineNr"> 8305 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Var-name</span> -<span id="L8306" class="LineNr"> 8306 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> -<span id="L8307" class="LineNr"> 8307 </span><span class="CommentedCode">#? (lookup *(ebp+0xc) *(ebp+0x10))</span> -<span id="L8308" class="LineNr"> 8308 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L8309" class="LineNr"> 8309 </span><span class="CommentedCode">#? (write-buffered Stderr " at ")</span> -<span id="L8310" class="LineNr"> 8310 </span><span class="CommentedCode">#? 8b/-> *(ebp+0x14) 1/r32/ecx</span> -<span id="L8311" class="LineNr"> 8311 </span><span class="CommentedCode">#? (lookup *ecx *(ecx+4)) # => eax</span> -<span id="L8312" class="LineNr"> 8312 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L8313" class="LineNr"> 8313 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8314" class="LineNr"> 8314 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8315" class="LineNr"> 8315 </span><span class="Constant">$new-var:end</span>: -<span id="L8316" class="LineNr"> 8316 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8317" class="LineNr"> 8317 </span> 59/pop-to-ecx -<span id="L8318" class="LineNr"> 8318 </span> 58/pop-to-eax -<span id="L8319" class="LineNr"> 8319 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8320" class="LineNr"> 8320 </span> 89/<- %esp 5/r32/ebp -<span id="L8321" class="LineNr"> 8321 </span> 5d/pop-to-ebp -<span id="L8322" class="LineNr"> 8322 </span> c3/return -<span id="L8323" class="LineNr"> 8323 </span> -<span id="L8324" class="LineNr"> 8324 </span><span class="subxFunction">new-literal-integer</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L8325" class="LineNr"> 8325 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8326" class="LineNr"> 8326 </span> 55/push-ebp -<span id="L8327" class="LineNr"> 8327 </span> 89/<- %ebp 4/r32/esp -<span id="L8328" class="LineNr"> 8328 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8329" class="LineNr"> 8329 </span> 50/push-eax -<span id="L8330" class="LineNr"> 8330 </span> 51/push-ecx -<span id="L8331" class="LineNr"> 8331 </span> <span class="subxComment"># if (!is-hex-int?(name)) abort</span> -<span id="L8332" class="LineNr"> 8332 </span> (<a href='../067parse-hex.subx.html#L9'>is-hex-int?</a> *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L8333" class="LineNr"> 8333 </span> 3d/compare-eax-and 0/imm32/false -<span id="L8334" class="LineNr"> 8334 </span> 0f 84/jump-if-= $new-literal-integer:abort/disp32 -<span id="L8335" class="LineNr"> 8335 </span> <span class="subxComment"># out = new var(s)</span> -<span id="L8336" class="LineNr"> 8336 </span> (<a href='mu.subx.html#L8412'>new-var-from-slice</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10)) -<span id="L8337" class="LineNr"> 8337 </span> <span class="subxComment"># var out-addr/ecx: (addr var) = lookup(*out)</span> -<span id="L8338" class="LineNr"> 8338 </span> 8b/-> *(ebp+0x10) 0/r32/eax -<span id="L8339" class="LineNr"> 8339 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8340" class="LineNr"> 8340 </span> 89/<- %ecx 0/r32/eax -<span id="L8341" class="LineNr"> 8341 </span> <span class="subxComment"># out-addr->block-depth = *Curr-block-depth</span> -<span id="L8342" class="LineNr"> 8342 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax -<span id="L8343" class="LineNr"> 8343 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> -<span id="L8344" class="LineNr"> 8344 </span> <span class="subxComment"># out-addr->type = new tree()</span> -<span id="L8345" class="LineNr"> 8345 </span> 8d/copy-address *(ecx+8) 0/r32/eax <span class="subxComment"># Var-type</span> -<span id="L8346" class="LineNr"> 8346 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) -<span id="L8347" class="LineNr"> 8347 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L8348" class="LineNr"> 8348 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> -<span id="L8349" class="LineNr"> 8349 </span> <span class="subxComment"># nothing else to do; default type is 'literal'</span> -<span id="L8350" class="LineNr"> 8350 </span><span class="Constant">$new-literal-integer:end</span>: -<span id="L8351" class="LineNr"> 8351 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8352" class="LineNr"> 8352 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8353" class="LineNr"> 8353 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8354" class="LineNr"> 8354 </span> 59/pop-to-ecx -<span id="L8355" class="LineNr"> 8355 </span> 58/pop-to-eax -<span id="L8356" class="LineNr"> 8356 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8357" class="LineNr"> 8357 </span> 89/<- %esp 5/r32/ebp -<span id="L8358" class="LineNr"> 8358 </span> 5d/pop-to-ebp -<span id="L8359" class="LineNr"> 8359 </span> c3/return -<span id="L8360" class="LineNr"> 8360 </span> -<span id="L8361" class="LineNr"> 8361 </span><span class="Constant">$new-literal-integer:abort</span>: -<span id="L8362" class="LineNr"> 8362 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"fn "</span>) -<span id="L8363" class="LineNr"> 8363 </span> 8b/-> *(ebp+0x14) 0/r32/eax -<span id="L8364" class="LineNr"> 8364 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L8365" class="LineNr"> 8365 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) %eax) -<span id="L8366" class="LineNr"> 8366 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">": variable cannot begin with a digit '"</span>) -<span id="L8367" class="LineNr"> 8367 </span> (<a href='../072slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0x18) *(ebp+0xc)) -<span id="L8368" class="LineNr"> 8368 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"'\n"</span>) -<span id="L8369" class="LineNr"> 8369 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x18)) -<span id="L8370" class="LineNr"> 8370 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x1c) 1) -<span id="L8371" class="LineNr"> 8371 </span> <span class="subxComment"># never gets here</span> -<span id="L8372" class="LineNr"> 8372 </span> -<span id="L8373" class="LineNr"> 8373 </span><span class="subxFunction">new-literal</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var)</span> -<span id="L8374" class="LineNr"> 8374 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8375" class="LineNr"> 8375 </span> 55/push-ebp -<span id="L8376" class="LineNr"> 8376 </span> 89/<- %ebp 4/r32/esp -<span id="L8377" class="LineNr"> 8377 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8378" class="LineNr"> 8378 </span> 50/push-eax -<span id="L8379" class="LineNr"> 8379 </span> 51/push-ecx -<span id="L8380" class="LineNr"> 8380 </span> <span class="subxComment"># var s/ecx: (handle array byte)</span> -<span id="L8381" class="LineNr"> 8381 </span> 68/push 0/imm32 -<span id="L8382" class="LineNr"> 8382 </span> 68/push 0/imm32 -<span id="L8383" class="LineNr"> 8383 </span> 89/<- %ecx 4/r32/esp -<span id="L8384" class="LineNr"> 8384 </span> <span class="subxComment"># s = slice-to-string(name)</span> -<span id="L8385" class="LineNr"> 8385 </span> (<a href='../072slice.subx.html#L1043'>slice-to-string</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %ecx) -<span id="L8386" class="LineNr"> 8386 </span> <span class="subxComment"># allocate to out</span> -<span id="L8387" class="LineNr"> 8387 </span> (<a href='mu.subx.html#L8288'>new-var</a> *(ebp+8) *ecx *(ecx+4) *(ebp+0x10)) -<span id="L8388" class="LineNr"> 8388 </span> <span class="subxComment"># var out-addr/ecx: (addr var) = lookup(*out)</span> -<span id="L8389" class="LineNr"> 8389 </span> 8b/-> *(ebp+0x10) 1/r32/ecx -<span id="L8390" class="LineNr"> 8390 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> -<span id="L8391" class="LineNr"> 8391 </span> 89/<- %ecx 0/r32/eax -<span id="L8392" class="LineNr"> 8392 </span> <span class="subxComment"># out-addr->block-depth = *Curr-block-depth</span> -<span id="L8393" class="LineNr"> 8393 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax -<span id="L8394" class="LineNr"> 8394 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> -<span id="L8395" class="LineNr"> 8395 </span> <span class="subxComment"># out-addr->type/eax = new type</span> -<span id="L8396" class="LineNr"> 8396 </span> 8d/copy-address *(ecx+8) 0/r32/eax <span class="subxComment"># Var-type</span> -<span id="L8397" class="LineNr"> 8397 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) -<span id="L8398" class="LineNr"> 8398 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L8399" class="LineNr"> 8399 </span> <span class="subxComment"># nothing else to do; default type is 'literal'</span> -<span id="L8400" class="LineNr"> 8400 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> -<span id="L8401" class="LineNr"> 8401 </span><span class="Constant">$new-literal:end</span>: -<span id="L8402" class="LineNr"> 8402 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8403" class="LineNr"> 8403 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8404" class="LineNr"> 8404 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8405" class="LineNr"> 8405 </span> 59/pop-to-ecx -<span id="L8406" class="LineNr"> 8406 </span> 58/pop-to-eax -<span id="L8407" class="LineNr"> 8407 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8408" class="LineNr"> 8408 </span> 89/<- %esp 5/r32/ebp -<span id="L8409" class="LineNr"> 8409 </span> 5d/pop-to-ebp -<span id="L8410" class="LineNr"> 8410 </span> c3/return -<span id="L8411" class="LineNr"> 8411 </span> -<span id="L8412" class="LineNr"> 8412 </span><span class="subxFunction">new-var-from-slice</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var)</span> -<span id="L8413" class="LineNr"> 8413 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8414" class="LineNr"> 8414 </span> 55/push-ebp -<span id="L8415" class="LineNr"> 8415 </span> 89/<- %ebp 4/r32/esp -<span id="L8416" class="LineNr"> 8416 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8417" class="LineNr"> 8417 </span> 51/push-ecx -<span id="L8418" class="LineNr"> 8418 </span> <span class="subxComment"># var tmp/ecx: (handle array byte)</span> -<span id="L8419" class="LineNr"> 8419 </span> 68/push 0/imm32 -<span id="L8420" class="LineNr"> 8420 </span> 68/push 0/imm32 -<span id="L8421" class="LineNr"> 8421 </span> 89/<- %ecx 4/r32/esp -<span id="L8422" class="LineNr"> 8422 </span> <span class="subxComment"># tmp = slice-to-string(name)</span> -<span id="L8423" class="LineNr"> 8423 </span> (<a href='../072slice.subx.html#L1043'>slice-to-string</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %ecx) -<span id="L8424" class="LineNr"> 8424 </span> <span class="subxComment"># out = new-var(tmp)</span> -<span id="L8425" class="LineNr"> 8425 </span> (<a href='mu.subx.html#L8288'>new-var</a> *(ebp+8) *ecx *(ecx+4) *(ebp+0x10)) -<span id="L8426" class="LineNr"> 8426 </span><span class="Constant">$new-var-from-slice:end</span>: -<span id="L8427" class="LineNr"> 8427 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8428" class="LineNr"> 8428 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8429" class="LineNr"> 8429 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8430" class="LineNr"> 8430 </span> 59/pop-to-ecx -<span id="L8431" class="LineNr"> 8431 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8432" class="LineNr"> 8432 </span> 89/<- %esp 5/r32/ebp -<span id="L8433" class="LineNr"> 8433 </span> 5d/pop-to-ebp -<span id="L8434" class="LineNr"> 8434 </span> c3/return -<span id="L8435" class="LineNr"> 8435 </span> -<span id="L8436" class="LineNr"> 8436 </span><span class="subxFunction">new-var-def</span>: <span class="subxComment"># ad: (addr allocation-descriptor), var: (handle var), out: (addr handle stmt)</span> -<span id="L8437" class="LineNr"> 8437 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8438" class="LineNr"> 8438 </span> 55/push-ebp -<span id="L8439" class="LineNr"> 8439 </span> 89/<- %ebp 4/r32/esp -<span id="L8440" class="LineNr"> 8440 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8441" class="LineNr"> 8441 </span> 50/push-eax -<span id="L8442" class="LineNr"> 8442 </span> 51/push-ecx -<span id="L8443" class="LineNr"> 8443 </span> <span class="subxComment">#</span> -<span id="L8444" class="LineNr"> 8444 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L319'>Stmt-size</a></span> *(ebp+0x14)) -<span id="L8445" class="LineNr"> 8445 </span> <span class="subxComment"># var out-addr/eax: (addr stmt) = lookup(*out)</span> -<span id="L8446" class="LineNr"> 8446 </span> 8b/-> *(ebp+0x14) 0/r32/eax -<span id="L8447" class="LineNr"> 8447 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8448" class="LineNr"> 8448 </span> <span class="subxComment"># out-addr->tag = stmt</span> -<span id="L8449" class="LineNr"> 8449 </span> c7 0/subop/copy *eax 2/imm32/tag/var-on-stack <span class="subxComment"># Stmt-tag</span> -<span id="L8450" class="LineNr"> 8450 </span> <span class="subxComment"># result->var = var</span> -<span id="L8451" class="LineNr"> 8451 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L8452" class="LineNr"> 8452 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Vardef-var</span> -<span id="L8453" class="LineNr"> 8453 </span> 8b/-> *(ebp+0x10) 1/r32/ecx -<span id="L8454" class="LineNr"> 8454 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Vardef-var</span> -<span id="L8455" class="LineNr"> 8455 </span><span class="Constant">$new-var-def:end</span>: -<span id="L8456" class="LineNr"> 8456 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8457" class="LineNr"> 8457 </span> 59/pop-to-ecx -<span id="L8458" class="LineNr"> 8458 </span> 58/pop-to-eax -<span id="L8459" class="LineNr"> 8459 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8460" class="LineNr"> 8460 </span> 89/<- %esp 5/r32/ebp -<span id="L8461" class="LineNr"> 8461 </span> 5d/pop-to-ebp -<span id="L8462" class="LineNr"> 8462 </span> c3/return -<span id="L8463" class="LineNr"> 8463 </span> -<span id="L8464" class="LineNr"> 8464 </span><span class="subxFunction">new-reg-var-def</span>: <span class="subxComment"># ad: (addr allocation-descriptor), var: (handle var), out: (addr handle stmt)</span> -<span id="L8465" class="LineNr"> 8465 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8466" class="LineNr"> 8466 </span> 55/push-ebp -<span id="L8467" class="LineNr"> 8467 </span> 89/<- %ebp 4/r32/esp -<span id="L8468" class="LineNr"> 8468 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8469" class="LineNr"> 8469 </span> 50/push-eax -<span id="L8470" class="LineNr"> 8470 </span> <span class="subxComment"># eax = out</span> -<span id="L8471" class="LineNr"> 8471 </span> 8b/-> *(ebp+0x14) 0/r32/eax -<span id="L8472" class="LineNr"> 8472 </span> <span class="subxComment">#</span> -<span id="L8473" class="LineNr"> 8473 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L319'>Stmt-size</a></span> %eax) -<span id="L8474" class="LineNr"> 8474 </span> <span class="subxComment"># var out-addr/eax: (addr stmt) = lookup(*out)</span> -<span id="L8475" class="LineNr"> 8475 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8476" class="LineNr"> 8476 </span> <span class="subxComment"># set tag</span> -<span id="L8477" class="LineNr"> 8477 </span> c7 0/subop/copy *eax 3/imm32/tag/var-in-register <span class="subxComment"># Stmt-tag</span> -<span id="L8478" class="LineNr"> 8478 </span> <span class="subxComment"># set output</span> -<span id="L8479" class="LineNr"> 8479 </span> 8d/copy-address *(eax+0x14) 0/r32/eax <span class="subxComment"># Regvardef-outputs</span> -<span id="L8480" class="LineNr"> 8480 </span> (<a href='mu.subx.html#L8547'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) *(ebp+0x10) 0 0 0 %eax) -<span id="L8481" class="LineNr"> 8481 </span><span class="Constant">$new-reg-var-def:end</span>: -<span id="L8482" class="LineNr"> 8482 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8483" class="LineNr"> 8483 </span> 58/pop-to-eax -<span id="L8484" class="LineNr"> 8484 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8485" class="LineNr"> 8485 </span> 89/<- %esp 5/r32/ebp -<span id="L8486" class="LineNr"> 8486 </span> 5d/pop-to-ebp -<span id="L8487" class="LineNr"> 8487 </span> c3/return -<span id="L8488" class="LineNr"> 8488 </span> -<span id="L8489" class="LineNr"> 8489 </span><span class="subxFunction">append-list</span>: <span class="subxComment"># ad: (addr allocation-descriptor), value: (handle _type), list: (handle list _type), out: (addr handle list _type)</span> -<span id="L8490" class="LineNr"> 8490 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8491" class="LineNr"> 8491 </span> 55/push-ebp -<span id="L8492" class="LineNr"> 8492 </span> 89/<- %ebp 4/r32/esp -<span id="L8493" class="LineNr"> 8493 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8494" class="LineNr"> 8494 </span> 50/push-eax -<span id="L8495" class="LineNr"> 8495 </span> 51/push-ecx -<span id="L8496" class="LineNr"> 8496 </span> 57/push-edi -<span id="L8497" class="LineNr"> 8497 </span> <span class="subxComment"># edi = out</span> -<span id="L8498" class="LineNr"> 8498 </span> 8b/-> *(ebp+0x1c) 7/r32/edi -<span id="L8499" class="LineNr"> 8499 </span> <span class="subxComment"># *out = new list</span> -<span id="L8500" class="LineNr"> 8500 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L339'>List-size</a></span> %edi) -<span id="L8501" class="LineNr"> 8501 </span> <span class="subxComment"># var out-addr/edi: (addr list _type) = lookup(*out)</span> -<span id="L8502" class="LineNr"> 8502 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> -<span id="L8503" class="LineNr"> 8503 </span> 89/<- %edi 0/r32/eax -<span id="L8504" class="LineNr"> 8504 </span> <span class="subxComment"># out-addr->value = value</span> -<span id="L8505" class="LineNr"> 8505 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L8506" class="LineNr"> 8506 </span> 89/<- *edi 0/r32/eax <span class="subxComment"># List-value</span> -<span id="L8507" class="LineNr"> 8507 </span> 8b/-> *(ebp+0x10) 0/r32/eax -<span id="L8508" class="LineNr"> 8508 </span> 89/<- *(edi+4) 0/r32/eax <span class="subxComment"># List-value</span> -<span id="L8509" class="LineNr"> 8509 </span> <span class="subxComment"># if (list == null) return</span> -<span id="L8510" class="LineNr"> 8510 </span> 81 7/subop/compare *(ebp+0x14) 0/imm32 -<span id="L8511" class="LineNr"> 8511 </span> 74/jump-if-= $append-list:end/disp8 -<span id="L8512" class="LineNr"> 8512 </span> <span class="subxComment"># otherwise append</span> -<span id="L8513" class="LineNr"> 8513 </span><span class="Constant">$append-list:non-empty-list</span>: -<span id="L8514" class="LineNr"> 8514 </span> <span class="subxComment"># var curr/eax: (addr list _type) = lookup(list)</span> -<span id="L8515" class="LineNr"> 8515 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> -<span id="L8516" class="LineNr"> 8516 </span> <span class="subxComment"># while (curr->next != null) curr = curr->next</span> -<span id="L8517" class="LineNr"> 8517 </span> { -<span id="L8518" class="LineNr"> 8518 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># List-next</span> -<span id="L8519" class="LineNr"> 8519 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8520" class="LineNr"> 8520 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L8521" class="LineNr"> 8521 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># List-next, List-next => eax</span> -<span id="L8522" class="LineNr"> 8522 </span> <span class="subxComment">#</span> -<span id="L8523" class="LineNr"> 8523 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L8524" class="LineNr"> 8524 </span> } -<span id="L8525" class="LineNr"> 8525 </span> <span class="subxComment"># edi = out</span> -<span id="L8526" class="LineNr"> 8526 </span> 8b/-> *(ebp+0x1c) 7/r32/edi -<span id="L8527" class="LineNr"> 8527 </span> <span class="subxComment"># curr->next = out</span> -<span id="L8528" class="LineNr"> 8528 </span> 8b/-> *edi 1/r32/ecx -<span id="L8529" class="LineNr"> 8529 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># List-next</span> -<span id="L8530" class="LineNr"> 8530 </span> 8b/-> *(edi+4) 1/r32/ecx -<span id="L8531" class="LineNr"> 8531 </span> 89/<- *(eax+0xc) 1/r32/ecx <span class="subxComment"># List-next</span> -<span id="L8532" class="LineNr"> 8532 </span> <span class="subxComment"># out = list</span> -<span id="L8533" class="LineNr"> 8533 </span> 8b/-> *(ebp+0x14) 1/r32/ecx -<span id="L8534" class="LineNr"> 8534 </span> 89/<- *edi 1/r32/ecx -<span id="L8535" class="LineNr"> 8535 </span> 8b/-> *(ebp+0x18) 1/r32/ecx -<span id="L8536" class="LineNr"> 8536 </span> 89/<- *(edi+4) 1/r32/ecx -<span id="L8537" class="LineNr"> 8537 </span><span class="Constant">$append-list:end</span>: -<span id="L8538" class="LineNr"> 8538 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8539" class="LineNr"> 8539 </span> 5f/pop-to-edi -<span id="L8540" class="LineNr"> 8540 </span> 59/pop-to-ecx -<span id="L8541" class="LineNr"> 8541 </span> 58/pop-to-eax -<span id="L8542" class="LineNr"> 8542 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8543" class="LineNr"> 8543 </span> 89/<- %esp 5/r32/ebp -<span id="L8544" class="LineNr"> 8544 </span> 5d/pop-to-ebp -<span id="L8545" class="LineNr"> 8545 </span> c3/return -<span id="L8546" class="LineNr"> 8546 </span> -<span id="L8547" class="LineNr"> 8547 </span><span class="subxFunction">append-stmt-var</span>: <span class="subxComment"># ad: (addr allocation-descriptor), v: (handle var), vars: (handle stmt-var), is-deref?: boolean, out: (addr handle stmt-var)</span> -<span id="L8548" class="LineNr"> 8548 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8549" class="LineNr"> 8549 </span> 55/push-ebp -<span id="L8550" class="LineNr"> 8550 </span> 89/<- %ebp 4/r32/esp -<span id="L8551" class="LineNr"> 8551 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8552" class="LineNr"> 8552 </span> 50/push-eax -<span id="L8553" class="LineNr"> 8553 </span> 51/push-ecx -<span id="L8554" class="LineNr"> 8554 </span> 57/push-edi +<span id="L8001" class="LineNr"> 8001 </span><span class="Constant">$Mu-register-eax</span>: +<span id="L8002" class="LineNr"> 8002 </span> 0x11/imm32/alloc-id +<span id="L8003" class="LineNr"> 8003 </span> 3/imm32/size +<span id="L8004" class="LineNr"> 8004 </span> 0x65/e 0x61/a 0x78/x +<span id="L8005" class="LineNr"> 8005 </span> +<span id="L8006" class="LineNr"> 8006 </span><span class="Constant">$Mu-register-ecx</span>: +<span id="L8007" class="LineNr"> 8007 </span> 0x11/imm32/alloc-id +<span id="L8008" class="LineNr"> 8008 </span> 3/imm32/size +<span id="L8009" class="LineNr"> 8009 </span> 0x65/e 0x63/c 0x78/x +<span id="L8010" class="LineNr"> 8010 </span> +<span id="L8011" class="LineNr"> 8011 </span><span class="Constant">$Mu-register-edx</span>: +<span id="L8012" class="LineNr"> 8012 </span> 0x11/imm32/alloc-id +<span id="L8013" class="LineNr"> 8013 </span> 3/imm32/size +<span id="L8014" class="LineNr"> 8014 </span> 0x65/e 0x64/d 0x78/x +<span id="L8015" class="LineNr"> 8015 </span> +<span id="L8016" class="LineNr"> 8016 </span><span class="Constant">$Mu-register-ebx</span>: +<span id="L8017" class="LineNr"> 8017 </span> 0x11/imm32/alloc-id +<span id="L8018" class="LineNr"> 8018 </span> 3/imm32/size +<span id="L8019" class="LineNr"> 8019 </span> 0x65/e 0x62/b 0x78/x +<span id="L8020" class="LineNr"> 8020 </span> +<span id="L8021" class="LineNr"> 8021 </span><span class="Constant">$Mu-register-esi</span>: +<span id="L8022" class="LineNr"> 8022 </span> 0x11/imm32/alloc-id +<span id="L8023" class="LineNr"> 8023 </span> 3/imm32/size +<span id="L8024" class="LineNr"> 8024 </span> 0x65/e 0x73/s 0x69/i +<span id="L8025" class="LineNr"> 8025 </span> +<span id="L8026" class="LineNr"> 8026 </span><span class="Constant">$Mu-register-edi</span>: +<span id="L8027" class="LineNr"> 8027 </span> 0x11/imm32/alloc-id +<span id="L8028" class="LineNr"> 8028 </span> 3/imm32/size +<span id="L8029" class="LineNr"> 8029 </span> 0x65/e 0x64/d 0x69/i +<span id="L8030" class="LineNr"> 8030 </span> +<span id="L8031" class="LineNr"> 8031 </span>== code +<span id="L8032" class="LineNr"> 8032 </span> +<span id="L8033" class="LineNr"> 8033 </span><span class="subxComment"># return first 'name' from the top (back) of 'vars' and create a new var for a fn output if not found</span> +<span id="L8034" class="LineNr"> 8034 </span><span class="subxFunction">lookup-var-or-find-in-fn-outputs</span>: <span class="subxComment"># name: (addr slice), vars: (addr stack live-var), fn: (addr function), out: (addr handle var), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L8035" class="LineNr"> 8035 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8036" class="LineNr"> 8036 </span> 55/push-ebp +<span id="L8037" class="LineNr"> 8037 </span> 89/<- %ebp 4/r32/esp +<span id="L8038" class="LineNr"> 8038 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8039" class="LineNr"> 8039 </span> 50/push-eax +<span id="L8040" class="LineNr"> 8040 </span> <span class="subxComment">#</span> +<span id="L8041" class="LineNr"> 8041 </span> (<a href='mu.subx.html#L7787'>lookup-var-helper</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x10) *(ebp+0x18) *(ebp+0x1c)) <span class="subxComment"># arg order slightly different; 'fn' is deemphasized</span> +<span id="L8042" class="LineNr"> 8042 </span> { +<span id="L8043" class="LineNr"> 8043 </span> <span class="subxComment"># if (out != 0) return</span> +<span id="L8044" class="LineNr"> 8044 </span> 8b/-> *(ebp+0x14) 0/r32/eax +<span id="L8045" class="LineNr"> 8045 </span> 81 7/subop/compare *eax 0/imm32 +<span id="L8046" class="LineNr"> 8046 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L8047" class="LineNr"> 8047 </span> <span class="subxComment"># if name is one of fn's outputs, return it</span> +<span id="L8048" class="LineNr"> 8048 </span> (<a href='mu.subx.html#L8070'>find-in-function-outputs</a> *(ebp+0x10) *(ebp+8) *(ebp+0x14)) +<span id="L8049" class="LineNr"> 8049 </span> 8b/-> *(ebp+0x14) 0/r32/eax +<span id="L8050" class="LineNr"> 8050 </span> 81 7/subop/compare *eax 0/imm32 +<span id="L8051" class="LineNr"> 8051 </span> <span class="subxComment"># otherwise abort</span> +<span id="L8052" class="LineNr"> 8052 </span> 0f 84/jump-if-= $lookup-or-define-var:abort/disp32 +<span id="L8053" class="LineNr"> 8053 </span> } +<span id="L8054" class="LineNr"> 8054 </span><span class="Constant">$lookup-or-define-var:end</span>: +<span id="L8055" class="LineNr"> 8055 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8056" class="LineNr"> 8056 </span> 58/pop-to-eax +<span id="L8057" class="LineNr"> 8057 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8058" class="LineNr"> 8058 </span> 89/<- %esp 5/r32/ebp +<span id="L8059" class="LineNr"> 8059 </span> 5d/pop-to-ebp +<span id="L8060" class="LineNr"> 8060 </span> c3/return +<span id="L8061" class="LineNr"> 8061 </span> +<span id="L8062" class="LineNr"> 8062 </span><span class="Constant">$lookup-or-define-var:abort</span>: +<span id="L8063" class="LineNr"> 8063 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"unknown variable '"</span>) +<span id="L8064" class="LineNr"> 8064 </span> (<a href='../072slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0x18) *(ebp+8)) +<span id="L8065" class="LineNr"> 8065 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"'\n"</span>) +<span id="L8066" class="LineNr"> 8066 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x18)) +<span id="L8067" class="LineNr"> 8067 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x1c) 1) +<span id="L8068" class="LineNr"> 8068 </span> <span class="subxComment"># never gets here</span> +<span id="L8069" class="LineNr"> 8069 </span> +<span id="L8070" class="LineNr"> 8070 </span><span class="subxFunction">find-in-function-outputs</span>: <span class="subxComment"># fn: (addr function), name: (addr slice), out: (addr handle var)</span> +<span id="L8071" class="LineNr"> 8071 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8072" class="LineNr"> 8072 </span> 55/push-ebp +<span id="L8073" class="LineNr"> 8073 </span> 89/<- %ebp 4/r32/esp +<span id="L8074" class="LineNr"> 8074 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8075" class="LineNr"> 8075 </span> 50/push-eax +<span id="L8076" class="LineNr"> 8076 </span> 51/push-ecx +<span id="L8077" class="LineNr"> 8077 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> +<span id="L8078" class="LineNr"> 8078 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L8079" class="LineNr"> 8079 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> +<span id="L8080" class="LineNr"> 8080 </span> 89/<- %ecx 0/r32/eax +<span id="L8081" class="LineNr"> 8081 </span> <span class="subxComment"># while curr != null</span> +<span id="L8082" class="LineNr"> 8082 </span> { +<span id="L8083" class="LineNr"> 8083 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L8084" class="LineNr"> 8084 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8085" class="LineNr"> 8085 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(curr->value)</span> +<span id="L8086" class="LineNr"> 8086 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L8087" class="LineNr"> 8087 </span> <span class="subxComment"># var s/eax: (addr array byte) = lookup(v->name)</span> +<span id="L8088" class="LineNr"> 8088 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L8089" class="LineNr"> 8089 </span> <span class="subxComment"># if (s == name) return curr->value</span> +<span id="L8090" class="LineNr"> 8090 </span> (<a href='../072slice.subx.html#L120'>slice-equal?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> +<span id="L8091" class="LineNr"> 8091 </span> 3d/compare-eax-and 0/imm32/false +<span id="L8092" class="LineNr"> 8092 </span> { +<span id="L8093" class="LineNr"> 8093 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8094" class="LineNr"> 8094 </span> <span class="subxComment"># var edi = out</span> +<span id="L8095" class="LineNr"> 8095 </span> 57/push-edi +<span id="L8096" class="LineNr"> 8096 </span> 8b/-> *(ebp+0x10) 7/r32/edi +<span id="L8097" class="LineNr"> 8097 </span> <span class="subxComment"># *out = curr->value</span> +<span id="L8098" class="LineNr"> 8098 </span> 8b/-> *ecx 0/r32/eax +<span id="L8099" class="LineNr"> 8099 </span> 89/<- *edi 0/r32/eax +<span id="L8100" class="LineNr"> 8100 </span> 8b/-> *(ecx+4) 0/r32/eax +<span id="L8101" class="LineNr"> 8101 </span> 89/<- *(edi+4) 0/r32/eax +<span id="L8102" class="LineNr"> 8102 </span> <span class="subxComment">#</span> +<span id="L8103" class="LineNr"> 8103 </span> 5f/pop-to-edi +<span id="L8104" class="LineNr"> 8104 </span> eb/jump $find-in-function-outputs:end/disp8 +<span id="L8105" class="LineNr"> 8105 </span> } +<span id="L8106" class="LineNr"> 8106 </span> <span class="subxComment"># curr = curr->next</span> +<span id="L8107" class="LineNr"> 8107 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L8108" class="LineNr"> 8108 </span> 89/<- %ecx 0/r32/eax +<span id="L8109" class="LineNr"> 8109 </span> <span class="subxComment">#</span> +<span id="L8110" class="LineNr"> 8110 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L8111" class="LineNr"> 8111 </span> } +<span id="L8112" class="LineNr"> 8112 </span> b8/copy-to-eax 0/imm32 +<span id="L8113" class="LineNr"> 8113 </span><span class="Constant">$find-in-function-outputs:end</span>: +<span id="L8114" class="LineNr"> 8114 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8115" class="LineNr"> 8115 </span> 59/pop-to-ecx +<span id="L8116" class="LineNr"> 8116 </span> 58/pop-to-eax +<span id="L8117" class="LineNr"> 8117 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8118" class="LineNr"> 8118 </span> 89/<- %esp 5/r32/ebp +<span id="L8119" class="LineNr"> 8119 </span> 5d/pop-to-ebp +<span id="L8120" class="LineNr"> 8120 </span> c3/return +<span id="L8121" class="LineNr"> 8121 </span> +<span id="L8122" class="LineNr"> 8122 </span><span class="subxComment"># push 'out' to 'vars' if not already there; it's assumed to be a fn output</span> +<span id="L8123" class="LineNr"> 8123 </span><span class="subxFunction">maybe-define-var</span>: <span class="subxComment"># out: (handle var), vars: (addr stack live-var)</span> +<span id="L8124" class="LineNr"> 8124 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8125" class="LineNr"> 8125 </span> 55/push-ebp +<span id="L8126" class="LineNr"> 8126 </span> 89/<- %ebp 4/r32/esp +<span id="L8127" class="LineNr"> 8127 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8128" class="LineNr"> 8128 </span> 50/push-eax +<span id="L8129" class="LineNr"> 8129 </span> <span class="subxComment"># var out-addr/eax: (addr var)</span> +<span id="L8130" class="LineNr"> 8130 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+8) *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L8131" class="LineNr"> 8131 </span> <span class="subxComment">#</span> +<span id="L8132" class="LineNr"> 8132 </span> (<a href='mu.subx.html#L8148'>binding-exists?</a> %eax *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L8133" class="LineNr"> 8133 </span> 3d/compare-eax-and 0/imm32/false +<span id="L8134" class="LineNr"> 8134 </span> 75/jump-if-!= $maybe-define-var:end/disp8 +<span id="L8135" class="LineNr"> 8135 </span> <span class="subxComment"># otherwise update vars</span> +<span id="L8136" class="LineNr"> 8136 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ebp+8)) +<span id="L8137" class="LineNr"> 8137 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ebp+0xc)) +<span id="L8138" class="LineNr"> 8138 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># 'out' is always a fn output; never spill it</span> +<span id="L8139" class="LineNr"> 8139 </span><span class="Constant">$maybe-define-var:end</span>: +<span id="L8140" class="LineNr"> 8140 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8141" class="LineNr"> 8141 </span> 58/pop-to-eax +<span id="L8142" class="LineNr"> 8142 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8143" class="LineNr"> 8143 </span> 89/<- %esp 5/r32/ebp +<span id="L8144" class="LineNr"> 8144 </span> 5d/pop-to-ebp +<span id="L8145" class="LineNr"> 8145 </span> c3/return +<span id="L8146" class="LineNr"> 8146 </span> +<span id="L8147" class="LineNr"> 8147 </span><span class="subxComment"># simpler version of lookup-var-helper</span> +<span id="L8148" class="LineNr"> 8148 </span><span class="subxFunction">binding-exists?</span>: <span class="subxComment"># target: (addr var), vars: (addr stack live-var) -> result/eax: boolean</span> +<span id="L8149" class="LineNr"> 8149 </span> <span class="subxComment"># pseudocode:</span> +<span id="L8150" class="LineNr"> 8150 </span> <span class="subxComment"># var curr: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L8151" class="LineNr"> 8151 </span> <span class="subxComment"># var min = vars->data</span> +<span id="L8152" class="LineNr"> 8152 </span> <span class="subxComment"># while curr >= min</span> +<span id="L8153" class="LineNr"> 8153 </span> <span class="subxComment"># var v: (handle var) = *curr</span> +<span id="L8154" class="LineNr"> 8154 </span> <span class="subxComment"># if v->name == target->name</span> +<span id="L8155" class="LineNr"> 8155 </span> <span class="subxComment"># return true</span> +<span id="L8156" class="LineNr"> 8156 </span> <span class="subxComment"># curr -= 12</span> +<span id="L8157" class="LineNr"> 8157 </span> <span class="subxComment"># return false</span> +<span id="L8158" class="LineNr"> 8158 </span> <span class="subxComment">#</span> +<span id="L8159" class="LineNr"> 8159 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8160" class="LineNr"> 8160 </span> 55/push-ebp +<span id="L8161" class="LineNr"> 8161 </span> 89/<- %ebp 4/r32/esp +<span id="L8162" class="LineNr"> 8162 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8163" class="LineNr"> 8163 </span> 51/push-ecx +<span id="L8164" class="LineNr"> 8164 </span> 52/push-edx +<span id="L8165" class="LineNr"> 8165 </span> 56/push-esi +<span id="L8166" class="LineNr"> 8166 </span> <span class="subxComment"># var target-name/ecx: (addr array byte) = lookup(target->name)</span> +<span id="L8167" class="LineNr"> 8167 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L8168" class="LineNr"> 8168 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L8169" class="LineNr"> 8169 </span> 89/<- %ecx 0/r32/eax +<span id="L8170" class="LineNr"> 8170 </span> <span class="subxComment"># esi = vars</span> +<span id="L8171" class="LineNr"> 8171 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L8172" class="LineNr"> 8172 </span> <span class="subxComment"># eax = vars->top</span> +<span id="L8173" class="LineNr"> 8173 </span> 8b/-> *esi 0/r32/eax +<span id="L8174" class="LineNr"> 8174 </span> <span class="subxComment"># var min/edx: (addr handle var) = vars->data</span> +<span id="L8175" class="LineNr"> 8175 </span> 8d/copy-address *(esi+8) 2/r32/edx +<span id="L8176" class="LineNr"> 8176 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L8177" class="LineNr"> 8177 </span> 8d/copy-address *(esi+eax-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->type - 12</span> +<span id="L8178" class="LineNr"> 8178 </span> { +<span id="L8179" class="LineNr"> 8179 </span><span class="Constant">$binding-exists?:loop</span>: +<span id="L8180" class="LineNr"> 8180 </span> <span class="subxComment"># if (curr < min) return</span> +<span id="L8181" class="LineNr"> 8181 </span> 39/compare %esi 2/r32/edx +<span id="L8182" class="LineNr"> 8182 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L8183" class="LineNr"> 8183 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(*curr)</span> +<span id="L8184" class="LineNr"> 8184 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> +<span id="L8185" class="LineNr"> 8185 </span> <span class="subxComment"># var vn/eax: (addr array byte) = lookup(v->name)</span> +<span id="L8186" class="LineNr"> 8186 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L8187" class="LineNr"> 8187 </span> <span class="subxComment"># if (vn == target-name) return true</span> +<span id="L8188" class="LineNr"> 8188 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx %eax) <span class="subxComment"># => eax</span> +<span id="L8189" class="LineNr"> 8189 </span> 3d/compare-eax-and 0/imm32/false +<span id="L8190" class="LineNr"> 8190 </span> 75/jump-if-!= $binding-exists?:end/disp8 <span class="subxComment"># eax already contains true</span> +<span id="L8191" class="LineNr"> 8191 </span> <span class="subxComment"># curr -= 12</span> +<span id="L8192" class="LineNr"> 8192 </span> 81 5/subop/subtract %esi 0xc/imm32 +<span id="L8193" class="LineNr"> 8193 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L8194" class="LineNr"> 8194 </span> } +<span id="L8195" class="LineNr"> 8195 </span> b8/copy-to-eax 0/imm32/false +<span id="L8196" class="LineNr"> 8196 </span><span class="Constant">$binding-exists?:end</span>: +<span id="L8197" class="LineNr"> 8197 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8198" class="LineNr"> 8198 </span> 5e/pop-to-esi +<span id="L8199" class="LineNr"> 8199 </span> 5a/pop-to-edx +<span id="L8200" class="LineNr"> 8200 </span> 59/pop-to-ecx +<span id="L8201" class="LineNr"> 8201 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8202" class="LineNr"> 8202 </span> 89/<- %esp 5/r32/ebp +<span id="L8203" class="LineNr"> 8203 </span> 5d/pop-to-ebp +<span id="L8204" class="LineNr"> 8204 </span> c3/return +<span id="L8205" class="LineNr"> 8205 </span> +<span id="L8206" class="LineNr"> 8206 </span><span class="subxTest">test-parse-mu-stmt</span>: +<span id="L8207" class="LineNr"> 8207 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8208" class="LineNr"> 8208 </span> 55/push-ebp +<span id="L8209" class="LineNr"> 8209 </span> 89/<- %ebp 4/r32/esp +<span id="L8210" class="LineNr"> 8210 </span> <span class="subxComment"># setup</span> +<span id="L8211" class="LineNr"> 8211 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>) +<span id="L8212" class="LineNr"> 8212 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"increment n\n"</span>) +<span id="L8213" class="LineNr"> 8213 </span> <span class="subxComment"># var vars/ecx: (stack (addr var) 16)</span> +<span id="L8214" class="LineNr"> 8214 </span> 81 5/subop/subtract %esp 0xc0/imm32 +<span id="L8215" class="LineNr"> 8215 </span> 68/push 0xc0/imm32/size +<span id="L8216" class="LineNr"> 8216 </span> 68/push 0/imm32/top +<span id="L8217" class="LineNr"> 8217 </span> 89/<- %ecx 4/r32/esp +<span id="L8218" class="LineNr"> 8218 </span> (<a href='../092stack.subx.html#L13'>clear-stack</a> %ecx) +<span id="L8219" class="LineNr"> 8219 </span> <span class="subxComment"># var v/edx: (handle var)</span> +<span id="L8220" class="LineNr"> 8220 </span> 68/push 0/imm32 +<span id="L8221" class="LineNr"> 8221 </span> 68/push 0/imm32 +<span id="L8222" class="LineNr"> 8222 </span> 89/<- %edx 4/r32/esp +<span id="L8223" class="LineNr"> 8223 </span> <span class="subxComment"># var s/eax: (handle array byte)</span> +<span id="L8224" class="LineNr"> 8224 </span> 68/push 0/imm32 +<span id="L8225" class="LineNr"> 8225 </span> 68/push 0/imm32 +<span id="L8226" class="LineNr"> 8226 </span> 89/<- %eax 4/r32/esp +<span id="L8227" class="LineNr"> 8227 </span> <span class="subxComment"># v = new var("n")</span> +<span id="L8228" class="LineNr"> 8228 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"n"</span> %eax) +<span id="L8229" class="LineNr"> 8229 </span> (<a href='mu.subx.html#L8318'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) +<span id="L8230" class="LineNr"> 8230 </span> <span class="subxComment">#</span> +<span id="L8231" class="LineNr"> 8231 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *edx) +<span id="L8232" class="LineNr"> 8232 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *(edx+4)) +<span id="L8233" class="LineNr"> 8233 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx 0) +<span id="L8234" class="LineNr"> 8234 </span> <span class="subxComment"># var out/eax: (handle stmt)</span> +<span id="L8235" class="LineNr"> 8235 </span> 68/push 0/imm32 +<span id="L8236" class="LineNr"> 8236 </span> 68/push 0/imm32 +<span id="L8237" class="LineNr"> 8237 </span> 89/<- %eax 4/r32/esp +<span id="L8238" class="LineNr"> 8238 </span> <span class="subxComment"># convert</span> +<span id="L8239" class="LineNr"> 8239 </span> (<a href='mu.subx.html#L7393'>parse-mu-stmt</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> %ecx 0 %eax <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L8240" class="LineNr"> 8240 </span> <span class="subxComment"># var out-addr/edx: (addr stmt) = lookup(*out)</span> +<span id="L8241" class="LineNr"> 8241 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8242" class="LineNr"> 8242 </span> 89/<- %edx 0/r32/eax +<span id="L8243" class="LineNr"> 8243 </span> <span class="subxComment"># out->tag</span> +<span id="L8244" class="LineNr"> 8244 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> *edx 1 <span class="Constant">"F - <a href='mu.subx.html#L8206'>test-parse-mu-stmt</a>/tag"</span>) <span class="subxComment"># Stmt-tag is Stmt1</span> +<span id="L8245" class="LineNr"> 8245 </span> <span class="subxComment"># out->operation</span> +<span id="L8246" class="LineNr"> 8246 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L8247" class="LineNr"> 8247 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"increment"</span> <span class="Constant">"F - <a href='mu.subx.html#L8206'>test-parse-mu-stmt</a>/name"</span>) <span class="subxComment"># Stmt1-operation</span> +<span id="L8248" class="LineNr"> 8248 </span> <span class="subxComment"># out->inouts->value->name</span> +<span id="L8249" class="LineNr"> 8249 </span> <span class="subxS1Comment"># . eax = out->inouts</span> +<span id="L8250" class="LineNr"> 8250 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L8251" class="LineNr"> 8251 </span> <span class="subxS1Comment"># . eax = out->inouts->value</span> +<span id="L8252" class="LineNr"> 8252 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L8253" class="LineNr"> 8253 </span> <span class="subxS1Comment"># . eax = out->inouts->value->name</span> +<span id="L8254" class="LineNr"> 8254 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L8255" class="LineNr"> 8255 </span> <span class="subxS1Comment"># .</span> +<span id="L8256" class="LineNr"> 8256 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"n"</span> <span class="Constant">"F - <a href='mu.subx.html#L8206'>test-parse-mu-stmt</a>/inout:0"</span>) +<span id="L8257" class="LineNr"> 8257 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8258" class="LineNr"> 8258 </span> 89/<- %esp 5/r32/ebp +<span id="L8259" class="LineNr"> 8259 </span> 5d/pop-to-ebp +<span id="L8260" class="LineNr"> 8260 </span> c3/return +<span id="L8261" class="LineNr"> 8261 </span> +<span id="L8262" class="LineNr"> 8262 </span><span class="subxTest">test-parse-mu-stmt-with-comma</span>: +<span id="L8263" class="LineNr"> 8263 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8264" class="LineNr"> 8264 </span> 55/push-ebp +<span id="L8265" class="LineNr"> 8265 </span> 89/<- %ebp 4/r32/esp +<span id="L8266" class="LineNr"> 8266 </span> <span class="subxComment"># setup</span> +<span id="L8267" class="LineNr"> 8267 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a>) +<span id="L8268" class="LineNr"> 8268 </span> (<a href='../057write.subx.html#L24'>write</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> <span class="Constant">"copy-to n, 3\n"</span>) +<span id="L8269" class="LineNr"> 8269 </span> <span class="subxComment"># var vars/ecx: (stack (addr var) 16)</span> +<span id="L8270" class="LineNr"> 8270 </span> 81 5/subop/subtract %esp 0xc0/imm32 +<span id="L8271" class="LineNr"> 8271 </span> 68/push 0xc0/imm32/size +<span id="L8272" class="LineNr"> 8272 </span> 68/push 0/imm32/top +<span id="L8273" class="LineNr"> 8273 </span> 89/<- %ecx 4/r32/esp +<span id="L8274" class="LineNr"> 8274 </span> (<a href='../092stack.subx.html#L13'>clear-stack</a> %ecx) +<span id="L8275" class="LineNr"> 8275 </span> <span class="subxComment"># var v/edx: (handle var)</span> +<span id="L8276" class="LineNr"> 8276 </span> 68/push 0/imm32 +<span id="L8277" class="LineNr"> 8277 </span> 68/push 0/imm32 +<span id="L8278" class="LineNr"> 8278 </span> 89/<- %edx 4/r32/esp +<span id="L8279" class="LineNr"> 8279 </span> <span class="subxComment"># var s/eax: (handle array byte)</span> +<span id="L8280" class="LineNr"> 8280 </span> 68/push 0/imm32 +<span id="L8281" class="LineNr"> 8281 </span> 68/push 0/imm32 +<span id="L8282" class="LineNr"> 8282 </span> 89/<- %eax 4/r32/esp +<span id="L8283" class="LineNr"> 8283 </span> <span class="subxComment"># v = new var("n")</span> +<span id="L8284" class="LineNr"> 8284 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"n"</span> %eax) +<span id="L8285" class="LineNr"> 8285 </span> (<a href='mu.subx.html#L8318'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) +<span id="L8286" class="LineNr"> 8286 </span> <span class="subxComment">#</span> +<span id="L8287" class="LineNr"> 8287 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *edx) +<span id="L8288" class="LineNr"> 8288 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx *(edx+4)) +<span id="L8289" class="LineNr"> 8289 </span> (<a href='../092stack.subx.html#L114'>push</a> %ecx 0) +<span id="L8290" class="LineNr"> 8290 </span> <span class="subxComment"># var out/eax: (handle stmt)</span> +<span id="L8291" class="LineNr"> 8291 </span> 68/push 0/imm32 +<span id="L8292" class="LineNr"> 8292 </span> 68/push 0/imm32 +<span id="L8293" class="LineNr"> 8293 </span> 89/<- %eax 4/r32/esp +<span id="L8294" class="LineNr"> 8294 </span> <span class="subxComment"># convert</span> +<span id="L8295" class="LineNr"> 8295 </span> (<a href='mu.subx.html#L7393'>parse-mu-stmt</a> <a href='../061read-byte.subx.html#L287'>_test-input-stream</a> %ecx 0 %eax <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L8296" class="LineNr"> 8296 </span> <span class="subxComment"># var out-addr/edx: (addr stmt) = lookup(*out)</span> +<span id="L8297" class="LineNr"> 8297 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8298" class="LineNr"> 8298 </span> 89/<- %edx 0/r32/eax +<span id="L8299" class="LineNr"> 8299 </span> <span class="subxComment"># out->tag</span> +<span id="L8300" class="LineNr"> 8300 </span> (<a href='../051test.subx.html#L23'>check-ints-equal</a> *edx 1 <span class="Constant">"F - <a href='mu.subx.html#L8262'>test-parse-mu-stmt-with-comma</a>/tag"</span>) <span class="subxComment"># Stmt-tag is Stmt1</span> +<span id="L8301" class="LineNr"> 8301 </span> <span class="subxComment"># out->operation</span> +<span id="L8302" class="LineNr"> 8302 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L8303" class="LineNr"> 8303 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"copy-to"</span> <span class="Constant">"F - <a href='mu.subx.html#L8262'>test-parse-mu-stmt-with-comma</a>/name"</span>) <span class="subxComment"># Stmt1-operation</span> +<span id="L8304" class="LineNr"> 8304 </span> <span class="subxComment"># out->inouts->value->name</span> +<span id="L8305" class="LineNr"> 8305 </span> <span class="subxS1Comment"># . eax = out->inouts</span> +<span id="L8306" class="LineNr"> 8306 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L8307" class="LineNr"> 8307 </span> <span class="subxS1Comment"># . eax = out->inouts->value</span> +<span id="L8308" class="LineNr"> 8308 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L8309" class="LineNr"> 8309 </span> <span class="subxS1Comment"># . eax = out->inouts->value->name</span> +<span id="L8310" class="LineNr"> 8310 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L8311" class="LineNr"> 8311 </span> <span class="subxS1Comment"># .</span> +<span id="L8312" class="LineNr"> 8312 </span> (<a href='../054string-equal.subx.html#L220'>check-strings-equal</a> %eax <span class="Constant">"n"</span> <span class="Constant">"F - <a href='mu.subx.html#L8262'>test-parse-mu-stmt-with-comma</a>/inout:0"</span>) +<span id="L8313" class="LineNr"> 8313 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8314" class="LineNr"> 8314 </span> 89/<- %esp 5/r32/ebp +<span id="L8315" class="LineNr"> 8315 </span> 5d/pop-to-ebp +<span id="L8316" class="LineNr"> 8316 </span> c3/return +<span id="L8317" class="LineNr"> 8317 </span> +<span id="L8318" class="LineNr"> 8318 </span><span class="subxFunction">new-var</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (handle array byte), out: (addr handle var)</span> +<span id="L8319" class="LineNr"> 8319 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8320" class="LineNr"> 8320 </span> 55/push-ebp +<span id="L8321" class="LineNr"> 8321 </span> 89/<- %ebp 4/r32/esp +<span id="L8322" class="LineNr"> 8322 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8323" class="LineNr"> 8323 </span> 50/push-eax +<span id="L8324" class="LineNr"> 8324 </span> 51/push-ecx +<span id="L8325" class="LineNr"> 8325 </span> <span class="subxComment"># ecx = out</span> +<span id="L8326" class="LineNr"> 8326 </span> 8b/-> *(ebp+0x14) 1/r32/ecx +<span id="L8327" class="LineNr"> 8327 </span> <span class="subxComment">#</span> +<span id="L8328" class="LineNr"> 8328 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L332'>Var-size</a></span> %ecx) +<span id="L8329" class="LineNr"> 8329 </span> <span class="subxComment"># var out-addr/eax: (addr var)</span> +<span id="L8330" class="LineNr"> 8330 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> +<span id="L8331" class="LineNr"> 8331 </span> <span class="subxComment"># out-addr->name = name</span> +<span id="L8332" class="LineNr"> 8332 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L8333" class="LineNr"> 8333 </span> 89/<- *eax 1/r32/ecx <span class="subxComment"># Var-name</span> +<span id="L8334" class="LineNr"> 8334 </span> 8b/-> *(ebp+0x10) 1/r32/ecx +<span id="L8335" class="LineNr"> 8335 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Var-name</span> +<span id="L8336" class="LineNr"> 8336 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> +<span id="L8337" class="LineNr"> 8337 </span><span class="CommentedCode">#? (lookup *(ebp+0xc) *(ebp+0x10))</span> +<span id="L8338" class="LineNr"> 8338 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L8339" class="LineNr"> 8339 </span><span class="CommentedCode">#? (write-buffered Stderr " at ")</span> +<span id="L8340" class="LineNr"> 8340 </span><span class="CommentedCode">#? 8b/-> *(ebp+0x14) 1/r32/ecx</span> +<span id="L8341" class="LineNr"> 8341 </span><span class="CommentedCode">#? (lookup *ecx *(ecx+4)) # => eax</span> +<span id="L8342" class="LineNr"> 8342 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L8343" class="LineNr"> 8343 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8344" class="LineNr"> 8344 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8345" class="LineNr"> 8345 </span><span class="Constant">$new-var:end</span>: +<span id="L8346" class="LineNr"> 8346 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8347" class="LineNr"> 8347 </span> 59/pop-to-ecx +<span id="L8348" class="LineNr"> 8348 </span> 58/pop-to-eax +<span id="L8349" class="LineNr"> 8349 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8350" class="LineNr"> 8350 </span> 89/<- %esp 5/r32/ebp +<span id="L8351" class="LineNr"> 8351 </span> 5d/pop-to-ebp +<span id="L8352" class="LineNr"> 8352 </span> c3/return +<span id="L8353" class="LineNr"> 8353 </span> +<span id="L8354" class="LineNr"> 8354 </span><span class="subxFunction">new-literal-integer</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L8355" class="LineNr"> 8355 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8356" class="LineNr"> 8356 </span> 55/push-ebp +<span id="L8357" class="LineNr"> 8357 </span> 89/<- %ebp 4/r32/esp +<span id="L8358" class="LineNr"> 8358 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8359" class="LineNr"> 8359 </span> 50/push-eax +<span id="L8360" class="LineNr"> 8360 </span> 51/push-ecx +<span id="L8361" class="LineNr"> 8361 </span> <span class="subxComment"># if (!is-hex-int?(name)) abort</span> +<span id="L8362" class="LineNr"> 8362 </span> (<a href='../067parse-hex.subx.html#L9'>is-hex-int?</a> *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L8363" class="LineNr"> 8363 </span> 3d/compare-eax-and 0/imm32/false +<span id="L8364" class="LineNr"> 8364 </span> 0f 84/jump-if-= $new-literal-integer:abort/disp32 +<span id="L8365" class="LineNr"> 8365 </span> <span class="subxComment"># out = new var(s)</span> +<span id="L8366" class="LineNr"> 8366 </span> (<a href='mu.subx.html#L8442'>new-var-from-slice</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10)) +<span id="L8367" class="LineNr"> 8367 </span> <span class="subxComment"># var out-addr/ecx: (addr var) = lookup(*out)</span> +<span id="L8368" class="LineNr"> 8368 </span> 8b/-> *(ebp+0x10) 0/r32/eax +<span id="L8369" class="LineNr"> 8369 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8370" class="LineNr"> 8370 </span> 89/<- %ecx 0/r32/eax +<span id="L8371" class="LineNr"> 8371 </span> <span class="subxComment"># out-addr->block-depth = *Curr-block-depth</span> +<span id="L8372" class="LineNr"> 8372 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax +<span id="L8373" class="LineNr"> 8373 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> +<span id="L8374" class="LineNr"> 8374 </span> <span class="subxComment"># out-addr->type = new tree()</span> +<span id="L8375" class="LineNr"> 8375 </span> 8d/copy-address *(ecx+8) 0/r32/eax <span class="subxComment"># Var-type</span> +<span id="L8376" class="LineNr"> 8376 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) +<span id="L8377" class="LineNr"> 8377 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L8378" class="LineNr"> 8378 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> +<span id="L8379" class="LineNr"> 8379 </span> <span class="subxComment"># nothing else to do; default type is 'literal'</span> +<span id="L8380" class="LineNr"> 8380 </span><span class="Constant">$new-literal-integer:end</span>: +<span id="L8381" class="LineNr"> 8381 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8382" class="LineNr"> 8382 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8383" class="LineNr"> 8383 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8384" class="LineNr"> 8384 </span> 59/pop-to-ecx +<span id="L8385" class="LineNr"> 8385 </span> 58/pop-to-eax +<span id="L8386" class="LineNr"> 8386 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8387" class="LineNr"> 8387 </span> 89/<- %esp 5/r32/ebp +<span id="L8388" class="LineNr"> 8388 </span> 5d/pop-to-ebp +<span id="L8389" class="LineNr"> 8389 </span> c3/return +<span id="L8390" class="LineNr"> 8390 </span> +<span id="L8391" class="LineNr"> 8391 </span><span class="Constant">$new-literal-integer:abort</span>: +<span id="L8392" class="LineNr"> 8392 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"fn "</span>) +<span id="L8393" class="LineNr"> 8393 </span> 8b/-> *(ebp+0x14) 0/r32/eax +<span id="L8394" class="LineNr"> 8394 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L8395" class="LineNr"> 8395 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) %eax) +<span id="L8396" class="LineNr"> 8396 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">": variable cannot begin with a digit '"</span>) +<span id="L8397" class="LineNr"> 8397 </span> (<a href='../072slice.subx.html#L908'>write-slice-buffered</a> *(ebp+0x18) *(ebp+0xc)) +<span id="L8398" class="LineNr"> 8398 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x18) <span class="Constant">"'\n"</span>) +<span id="L8399" class="LineNr"> 8399 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x18)) +<span id="L8400" class="LineNr"> 8400 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x1c) 1) +<span id="L8401" class="LineNr"> 8401 </span> <span class="subxComment"># never gets here</span> +<span id="L8402" class="LineNr"> 8402 </span> +<span id="L8403" class="LineNr"> 8403 </span><span class="subxFunction">new-literal</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var)</span> +<span id="L8404" class="LineNr"> 8404 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8405" class="LineNr"> 8405 </span> 55/push-ebp +<span id="L8406" class="LineNr"> 8406 </span> 89/<- %ebp 4/r32/esp +<span id="L8407" class="LineNr"> 8407 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8408" class="LineNr"> 8408 </span> 50/push-eax +<span id="L8409" class="LineNr"> 8409 </span> 51/push-ecx +<span id="L8410" class="LineNr"> 8410 </span> <span class="subxComment"># var s/ecx: (handle array byte)</span> +<span id="L8411" class="LineNr"> 8411 </span> 68/push 0/imm32 +<span id="L8412" class="LineNr"> 8412 </span> 68/push 0/imm32 +<span id="L8413" class="LineNr"> 8413 </span> 89/<- %ecx 4/r32/esp +<span id="L8414" class="LineNr"> 8414 </span> <span class="subxComment"># s = slice-to-string(name)</span> +<span id="L8415" class="LineNr"> 8415 </span> (<a href='../072slice.subx.html#L1043'>slice-to-string</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %ecx) +<span id="L8416" class="LineNr"> 8416 </span> <span class="subxComment"># allocate to out</span> +<span id="L8417" class="LineNr"> 8417 </span> (<a href='mu.subx.html#L8318'>new-var</a> *(ebp+8) *ecx *(ecx+4) *(ebp+0x10)) +<span id="L8418" class="LineNr"> 8418 </span> <span class="subxComment"># var out-addr/ecx: (addr var) = lookup(*out)</span> +<span id="L8419" class="LineNr"> 8419 </span> 8b/-> *(ebp+0x10) 1/r32/ecx +<span id="L8420" class="LineNr"> 8420 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> +<span id="L8421" class="LineNr"> 8421 </span> 89/<- %ecx 0/r32/eax +<span id="L8422" class="LineNr"> 8422 </span> <span class="subxComment"># out-addr->block-depth = *Curr-block-depth</span> +<span id="L8423" class="LineNr"> 8423 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax +<span id="L8424" class="LineNr"> 8424 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> +<span id="L8425" class="LineNr"> 8425 </span> <span class="subxComment"># out-addr->type/eax = new type</span> +<span id="L8426" class="LineNr"> 8426 </span> 8d/copy-address *(ecx+8) 0/r32/eax <span class="subxComment"># Var-type</span> +<span id="L8427" class="LineNr"> 8427 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) +<span id="L8428" class="LineNr"> 8428 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L8429" class="LineNr"> 8429 </span> <span class="subxComment"># nothing else to do; default type is 'literal'</span> +<span id="L8430" class="LineNr"> 8430 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> +<span id="L8431" class="LineNr"> 8431 </span><span class="Constant">$new-literal:end</span>: +<span id="L8432" class="LineNr"> 8432 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8433" class="LineNr"> 8433 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8434" class="LineNr"> 8434 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8435" class="LineNr"> 8435 </span> 59/pop-to-ecx +<span id="L8436" class="LineNr"> 8436 </span> 58/pop-to-eax +<span id="L8437" class="LineNr"> 8437 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8438" class="LineNr"> 8438 </span> 89/<- %esp 5/r32/ebp +<span id="L8439" class="LineNr"> 8439 </span> 5d/pop-to-ebp +<span id="L8440" class="LineNr"> 8440 </span> c3/return +<span id="L8441" class="LineNr"> 8441 </span> +<span id="L8442" class="LineNr"> 8442 </span><span class="subxFunction">new-var-from-slice</span>: <span class="subxComment"># ad: (addr allocation-descriptor), name: (addr slice), out: (addr handle var)</span> +<span id="L8443" class="LineNr"> 8443 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8444" class="LineNr"> 8444 </span> 55/push-ebp +<span id="L8445" class="LineNr"> 8445 </span> 89/<- %ebp 4/r32/esp +<span id="L8446" class="LineNr"> 8446 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8447" class="LineNr"> 8447 </span> 51/push-ecx +<span id="L8448" class="LineNr"> 8448 </span> <span class="subxComment"># var tmp/ecx: (handle array byte)</span> +<span id="L8449" class="LineNr"> 8449 </span> 68/push 0/imm32 +<span id="L8450" class="LineNr"> 8450 </span> 68/push 0/imm32 +<span id="L8451" class="LineNr"> 8451 </span> 89/<- %ecx 4/r32/esp +<span id="L8452" class="LineNr"> 8452 </span> <span class="subxComment"># tmp = slice-to-string(name)</span> +<span id="L8453" class="LineNr"> 8453 </span> (<a href='../072slice.subx.html#L1043'>slice-to-string</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) %ecx) +<span id="L8454" class="LineNr"> 8454 </span> <span class="subxComment"># out = new-var(tmp)</span> +<span id="L8455" class="LineNr"> 8455 </span> (<a href='mu.subx.html#L8318'>new-var</a> *(ebp+8) *ecx *(ecx+4) *(ebp+0x10)) +<span id="L8456" class="LineNr"> 8456 </span><span class="Constant">$new-var-from-slice:end</span>: +<span id="L8457" class="LineNr"> 8457 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8458" class="LineNr"> 8458 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8459" class="LineNr"> 8459 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8460" class="LineNr"> 8460 </span> 59/pop-to-ecx +<span id="L8461" class="LineNr"> 8461 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8462" class="LineNr"> 8462 </span> 89/<- %esp 5/r32/ebp +<span id="L8463" class="LineNr"> 8463 </span> 5d/pop-to-ebp +<span id="L8464" class="LineNr"> 8464 </span> c3/return +<span id="L8465" class="LineNr"> 8465 </span> +<span id="L8466" class="LineNr"> 8466 </span><span class="subxFunction">new-var-def</span>: <span class="subxComment"># ad: (addr allocation-descriptor), var: (handle var), out: (addr handle stmt)</span> +<span id="L8467" class="LineNr"> 8467 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8468" class="LineNr"> 8468 </span> 55/push-ebp +<span id="L8469" class="LineNr"> 8469 </span> 89/<- %ebp 4/r32/esp +<span id="L8470" class="LineNr"> 8470 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8471" class="LineNr"> 8471 </span> 50/push-eax +<span id="L8472" class="LineNr"> 8472 </span> 51/push-ecx +<span id="L8473" class="LineNr"> 8473 </span> <span class="subxComment">#</span> +<span id="L8474" class="LineNr"> 8474 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L319'>Stmt-size</a></span> *(ebp+0x14)) +<span id="L8475" class="LineNr"> 8475 </span> <span class="subxComment"># var out-addr/eax: (addr stmt) = lookup(*out)</span> +<span id="L8476" class="LineNr"> 8476 </span> 8b/-> *(ebp+0x14) 0/r32/eax +<span id="L8477" class="LineNr"> 8477 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8478" class="LineNr"> 8478 </span> <span class="subxComment"># out-addr->tag = stmt</span> +<span id="L8479" class="LineNr"> 8479 </span> c7 0/subop/copy *eax 2/imm32/tag/var-on-stack <span class="subxComment"># Stmt-tag</span> +<span id="L8480" class="LineNr"> 8480 </span> <span class="subxComment"># result->var = var</span> +<span id="L8481" class="LineNr"> 8481 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L8482" class="LineNr"> 8482 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Vardef-var</span> +<span id="L8483" class="LineNr"> 8483 </span> 8b/-> *(ebp+0x10) 1/r32/ecx +<span id="L8484" class="LineNr"> 8484 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Vardef-var</span> +<span id="L8485" class="LineNr"> 8485 </span><span class="Constant">$new-var-def:end</span>: +<span id="L8486" class="LineNr"> 8486 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8487" class="LineNr"> 8487 </span> 59/pop-to-ecx +<span id="L8488" class="LineNr"> 8488 </span> 58/pop-to-eax +<span id="L8489" class="LineNr"> 8489 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8490" class="LineNr"> 8490 </span> 89/<- %esp 5/r32/ebp +<span id="L8491" class="LineNr"> 8491 </span> 5d/pop-to-ebp +<span id="L8492" class="LineNr"> 8492 </span> c3/return +<span id="L8493" class="LineNr"> 8493 </span> +<span id="L8494" class="LineNr"> 8494 </span><span class="subxFunction">new-reg-var-def</span>: <span class="subxComment"># ad: (addr allocation-descriptor), var: (handle var), out: (addr handle stmt)</span> +<span id="L8495" class="LineNr"> 8495 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8496" class="LineNr"> 8496 </span> 55/push-ebp +<span id="L8497" class="LineNr"> 8497 </span> 89/<- %ebp 4/r32/esp +<span id="L8498" class="LineNr"> 8498 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8499" class="LineNr"> 8499 </span> 50/push-eax +<span id="L8500" class="LineNr"> 8500 </span> <span class="subxComment"># eax = out</span> +<span id="L8501" class="LineNr"> 8501 </span> 8b/-> *(ebp+0x14) 0/r32/eax +<span id="L8502" class="LineNr"> 8502 </span> <span class="subxComment">#</span> +<span id="L8503" class="LineNr"> 8503 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L319'>Stmt-size</a></span> %eax) +<span id="L8504" class="LineNr"> 8504 </span> <span class="subxComment"># var out-addr/eax: (addr stmt) = lookup(*out)</span> +<span id="L8505" class="LineNr"> 8505 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8506" class="LineNr"> 8506 </span> <span class="subxComment"># set tag</span> +<span id="L8507" class="LineNr"> 8507 </span> c7 0/subop/copy *eax 3/imm32/tag/var-in-register <span class="subxComment"># Stmt-tag</span> +<span id="L8508" class="LineNr"> 8508 </span> <span class="subxComment"># set output</span> +<span id="L8509" class="LineNr"> 8509 </span> 8d/copy-address *(eax+0x14) 0/r32/eax <span class="subxComment"># Regvardef-outputs</span> +<span id="L8510" class="LineNr"> 8510 </span> (<a href='mu.subx.html#L8577'>append-stmt-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *(ebp+0xc) *(ebp+0x10) 0 0 0 %eax) +<span id="L8511" class="LineNr"> 8511 </span><span class="Constant">$new-reg-var-def:end</span>: +<span id="L8512" class="LineNr"> 8512 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8513" class="LineNr"> 8513 </span> 58/pop-to-eax +<span id="L8514" class="LineNr"> 8514 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8515" class="LineNr"> 8515 </span> 89/<- %esp 5/r32/ebp +<span id="L8516" class="LineNr"> 8516 </span> 5d/pop-to-ebp +<span id="L8517" class="LineNr"> 8517 </span> c3/return +<span id="L8518" class="LineNr"> 8518 </span> +<span id="L8519" class="LineNr"> 8519 </span><span class="subxFunction">append-list</span>: <span class="subxComment"># ad: (addr allocation-descriptor), value: (handle _type), list: (handle list _type), out: (addr handle list _type)</span> +<span id="L8520" class="LineNr"> 8520 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8521" class="LineNr"> 8521 </span> 55/push-ebp +<span id="L8522" class="LineNr"> 8522 </span> 89/<- %ebp 4/r32/esp +<span id="L8523" class="LineNr"> 8523 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8524" class="LineNr"> 8524 </span> 50/push-eax +<span id="L8525" class="LineNr"> 8525 </span> 51/push-ecx +<span id="L8526" class="LineNr"> 8526 </span> 57/push-edi +<span id="L8527" class="LineNr"> 8527 </span> <span class="subxComment"># edi = out</span> +<span id="L8528" class="LineNr"> 8528 </span> 8b/-> *(ebp+0x1c) 7/r32/edi +<span id="L8529" class="LineNr"> 8529 </span> <span class="subxComment"># *out = new list</span> +<span id="L8530" class="LineNr"> 8530 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L339'>List-size</a></span> %edi) +<span id="L8531" class="LineNr"> 8531 </span> <span class="subxComment"># var out-addr/edi: (addr list _type) = lookup(*out)</span> +<span id="L8532" class="LineNr"> 8532 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> +<span id="L8533" class="LineNr"> 8533 </span> 89/<- %edi 0/r32/eax +<span id="L8534" class="LineNr"> 8534 </span> <span class="subxComment"># out-addr->value = value</span> +<span id="L8535" class="LineNr"> 8535 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L8536" class="LineNr"> 8536 </span> 89/<- *edi 0/r32/eax <span class="subxComment"># List-value</span> +<span id="L8537" class="LineNr"> 8537 </span> 8b/-> *(ebp+0x10) 0/r32/eax +<span id="L8538" class="LineNr"> 8538 </span> 89/<- *(edi+4) 0/r32/eax <span class="subxComment"># List-value</span> +<span id="L8539" class="LineNr"> 8539 </span> <span class="subxComment"># if (list == null) return</span> +<span id="L8540" class="LineNr"> 8540 </span> 81 7/subop/compare *(ebp+0x14) 0/imm32 +<span id="L8541" class="LineNr"> 8541 </span> 74/jump-if-= $append-list:end/disp8 +<span id="L8542" class="LineNr"> 8542 </span> <span class="subxComment"># otherwise append</span> +<span id="L8543" class="LineNr"> 8543 </span><span class="Constant">$append-list:non-empty-list</span>: +<span id="L8544" class="LineNr"> 8544 </span> <span class="subxComment"># var curr/eax: (addr list _type) = lookup(list)</span> +<span id="L8545" class="LineNr"> 8545 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> +<span id="L8546" class="LineNr"> 8546 </span> <span class="subxComment"># while (curr->next != null) curr = curr->next</span> +<span id="L8547" class="LineNr"> 8547 </span> { +<span id="L8548" class="LineNr"> 8548 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># List-next</span> +<span id="L8549" class="LineNr"> 8549 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8550" class="LineNr"> 8550 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L8551" class="LineNr"> 8551 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># List-next, List-next => eax</span> +<span id="L8552" class="LineNr"> 8552 </span> <span class="subxComment">#</span> +<span id="L8553" class="LineNr"> 8553 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L8554" class="LineNr"> 8554 </span> } <span id="L8555" class="LineNr"> 8555 </span> <span class="subxComment"># edi = out</span> -<span id="L8556" class="LineNr"> 8556 </span> 8b/-> *(ebp+0x20) 7/r32/edi -<span id="L8557" class="LineNr"> 8557 </span> <span class="subxComment"># out = new stmt-var</span> -<span id="L8558" class="LineNr"> 8558 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L349'>Stmt-var-size</a></span> %edi) -<span id="L8559" class="LineNr"> 8559 </span> <span class="subxComment"># var out-addr/ecx: (addr stmt-var) = lookup(*out)</span> -<span id="L8560" class="LineNr"> 8560 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> -<span id="L8561" class="LineNr"> 8561 </span> 89/<- %ecx 0/r32/eax -<span id="L8562" class="LineNr"> 8562 </span> <span class="subxComment"># out-addr->value = v</span> -<span id="L8563" class="LineNr"> 8563 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L8564" class="LineNr"> 8564 </span> 89/<- *ecx 0/r32/eax <span class="subxComment"># Stmt-var-value</span> -<span id="L8565" class="LineNr"> 8565 </span> 8b/-> *(ebp+0x10) 0/r32/eax -<span id="L8566" class="LineNr"> 8566 </span> 89/<- *(ecx+4) 0/r32/eax <span class="subxComment"># Stmt-var-value</span> -<span id="L8567" class="LineNr"> 8567 </span> <span class="subxComment"># out-addr->is-deref? = is-deref?</span> -<span id="L8568" class="LineNr"> 8568 </span> 8b/-> *(ebp+0x1c) 0/r32/eax -<span id="L8569" class="LineNr"> 8569 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L8570" class="LineNr"> 8570 </span> <span class="subxComment"># if (vars == null) return result</span> -<span id="L8571" class="LineNr"> 8571 </span> 81 7/subop/compare *(ebp+0x14) 0/imm32/null -<span id="L8572" class="LineNr"> 8572 </span> 74/jump-if-= $append-stmt-var:end/disp8 -<span id="L8573" class="LineNr"> 8573 </span> <span class="subxComment"># otherwise append</span> -<span id="L8574" class="LineNr"> 8574 </span> <span class="subxComment"># var curr/eax: (addr stmt-var) = lookup(vars)</span> -<span id="L8575" class="LineNr"> 8575 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> -<span id="L8576" class="LineNr"> 8576 </span> <span class="subxComment"># while (curr->next != null) curr = curr->next</span> -<span id="L8577" class="LineNr"> 8577 </span> { -<span id="L8578" class="LineNr"> 8578 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># Stmt-var-next</span> -<span id="L8579" class="LineNr"> 8579 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8580" class="LineNr"> 8580 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L8581" class="LineNr"> 8581 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next, Stmt-var-next => eax</span> -<span id="L8582" class="LineNr"> 8582 </span> <span class="subxComment">#</span> -<span id="L8583" class="LineNr"> 8583 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L8584" class="LineNr"> 8584 </span> } -<span id="L8585" class="LineNr"> 8585 </span> <span class="subxComment"># curr->next = out</span> -<span id="L8586" class="LineNr"> 8586 </span> 8b/-> *edi 1/r32/ecx -<span id="L8587" class="LineNr"> 8587 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Stmt-var-next</span> -<span id="L8588" class="LineNr"> 8588 </span> 8b/-> *(edi+4) 1/r32/ecx -<span id="L8589" class="LineNr"> 8589 </span> 89/<- *(eax+0xc) 1/r32/ecx <span class="subxComment"># Stmt-var-next</span> -<span id="L8590" class="LineNr"> 8590 </span> <span class="subxComment"># out = vars</span> -<span id="L8591" class="LineNr"> 8591 </span> 8b/-> *(ebp+0x14) 1/r32/ecx -<span id="L8592" class="LineNr"> 8592 </span> 89/<- *edi 1/r32/ecx -<span id="L8593" class="LineNr"> 8593 </span> 8b/-> *(ebp+0x18) 1/r32/ecx -<span id="L8594" class="LineNr"> 8594 </span> 89/<- *(edi+4) 1/r32/ecx -<span id="L8595" class="LineNr"> 8595 </span><span class="Constant">$append-stmt-var:end</span>: -<span id="L8596" class="LineNr"> 8596 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8597" class="LineNr"> 8597 </span> 5f/pop-to-edi -<span id="L8598" class="LineNr"> 8598 </span> 59/pop-to-ecx -<span id="L8599" class="LineNr"> 8599 </span> 58/pop-to-eax -<span id="L8600" class="LineNr"> 8600 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8601" class="LineNr"> 8601 </span> 89/<- %esp 5/r32/ebp -<span id="L8602" class="LineNr"> 8602 </span> 5d/pop-to-ebp -<span id="L8603" class="LineNr"> 8603 </span> c3/return -<span id="L8604" class="LineNr"> 8604 </span> -<span id="L8605" class="LineNr"> 8605 </span><span class="subxFunction">append-to-block</span>: <span class="subxComment"># ad: (addr allocation-descriptor), block: (addr block), x: (handle stmt)</span> -<span id="L8606" class="LineNr"> 8606 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8607" class="LineNr"> 8607 </span> 55/push-ebp -<span id="L8608" class="LineNr"> 8608 </span> 89/<- %ebp 4/r32/esp -<span id="L8609" class="LineNr"> 8609 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8610" class="LineNr"> 8610 </span> 50/push-eax -<span id="L8611" class="LineNr"> 8611 </span> 56/push-esi -<span id="L8612" class="LineNr"> 8612 </span> <span class="subxComment"># esi = block</span> -<span id="L8613" class="LineNr"> 8613 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L8614" class="LineNr"> 8614 </span> <span class="subxComment"># block->stmts = append(x, block->stmts)</span> -<span id="L8615" class="LineNr"> 8615 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Block-stmts</span> -<span id="L8616" class="LineNr"> 8616 </span> (<a href='mu.subx.html#L8489'>append-list</a> *(ebp+8) *(ebp+0x10) *(ebp+0x14) *(esi+4) *(esi+8) %eax) <span class="subxComment"># ad, x, x, Block-stmts, Block-stmts</span> -<span id="L8617" class="LineNr"> 8617 </span><span class="Constant">$append-to-block:end</span>: -<span id="L8618" class="LineNr"> 8618 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8619" class="LineNr"> 8619 </span> 5e/pop-to-esi -<span id="L8620" class="LineNr"> 8620 </span> 58/pop-to-eax -<span id="L8621" class="LineNr"> 8621 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8622" class="LineNr"> 8622 </span> 89/<- %esp 5/r32/ebp -<span id="L8623" class="LineNr"> 8623 </span> 5d/pop-to-ebp -<span id="L8624" class="LineNr"> 8624 </span> c3/return -<span id="L8625" class="LineNr"> 8625 </span> -<span id="L8626" class="LineNr"> 8626 </span><span class="subxComment">## Parsing types</span> -<span id="L8627" class="LineNr"> 8627 </span><span class="subxComment"># We need to create metadata on user-defined types, and we need to use this</span> -<span id="L8628" class="LineNr"> 8628 </span><span class="subxComment"># metadata as we parse instructions.</span> -<span id="L8629" class="LineNr"> 8629 </span><span class="subxComment"># However, we also want to allow types to be used before their definitions.</span> -<span id="L8630" class="LineNr"> 8630 </span><span class="subxComment"># This means we can't ever assume any type data structures exist.</span> -<span id="L8631" class="LineNr"> 8631 </span> -<span id="L8632" class="LineNr"> 8632 </span><span class="subxFunction">lookup-or-create-constant</span>: <span class="subxComment"># container: (addr stmt-var), field-name: (addr slice), out: (addr handle var)</span> -<span id="L8633" class="LineNr"> 8633 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8634" class="LineNr"> 8634 </span> 55/push-ebp -<span id="L8635" class="LineNr"> 8635 </span> 89/<- %ebp 4/r32/esp -<span id="L8636" class="LineNr"> 8636 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8637" class="LineNr"> 8637 </span> 50/push-eax -<span id="L8638" class="LineNr"> 8638 </span> 56/push-esi -<span id="L8639" class="LineNr"> 8639 </span> <span class="subxComment"># var container-type/esi: type-id</span> -<span id="L8640" class="LineNr"> 8640 </span> (<a href='mu.subx.html#L8683'>container-type</a> *(ebp+8)) <span class="subxComment"># => eax</span> -<span id="L8641" class="LineNr"> 8641 </span> 89/<- %esi 0/r32/eax -<span id="L8642" class="LineNr"> 8642 </span> <span class="subxComment"># var tmp/eax: (handle typeinfo) = find-or-create-typeinfo(container-type)</span> -<span id="L8643" class="LineNr"> 8643 </span> 68/push 0/imm32 -<span id="L8644" class="LineNr"> 8644 </span> 68/push 0/imm32 -<span id="L8645" class="LineNr"> 8645 </span> 89/<- %eax 4/r32/esp -<span id="L8646" class="LineNr"> 8646 </span> (<a href='mu.subx.html#L8704'>find-or-create-typeinfo</a> %esi %eax) -<span id="L8647" class="LineNr"> 8647 </span> <span class="subxComment"># var tmp-addr/eax: (addr typeinfo) = lookup(tmp)</span> -<span id="L8648" class="LineNr"> 8648 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L8649" class="LineNr"> 8649 </span> <span class="subxComment"># result = find-or-create-typeinfo-output-var(typeinfo, field-name)</span> -<span id="L8650" class="LineNr"> 8650 </span><span class="CommentedCode">#? (write-buffered Stderr "constant: ")</span> -<span id="L8651" class="LineNr"> 8651 </span><span class="CommentedCode">#? (write-slice-buffered Stderr *(ebp+0xc))</span> -<span id="L8652" class="LineNr"> 8652 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8653" class="LineNr"> 8653 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8654" class="LineNr"> 8654 </span> (<a href='mu.subx.html#L8817'>find-or-create-typeinfo-output-var</a> %eax *(ebp+0xc) *(ebp+0x10)) -<span id="L8655" class="LineNr"> 8655 </span><span class="CommentedCode">#? 8b/-> *(ebp+0x10) 0/r32/eax</span> -<span id="L8656" class="LineNr"> 8656 </span><span class="CommentedCode">#? (write-buffered Stderr "@")</span> -<span id="L8657" class="LineNr"> 8657 </span><span class="CommentedCode">#? (lookup *eax *(eax+4))</span> -<span id="L8658" class="LineNr"> 8658 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L8659" class="LineNr"> 8659 </span><span class="CommentedCode">#? (lookup *eax *(eax+4))</span> -<span id="L8660" class="LineNr"> 8660 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L8661" class="LineNr"> 8661 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8662" class="LineNr"> 8662 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8663" class="LineNr"> 8663 </span><span class="CommentedCode">#? (write-buffered Stderr "offset: ")</span> -<span id="L8664" class="LineNr"> 8664 </span><span class="CommentedCode">#? 8b/-> *(eax+0x14) 0/r32/eax</span> -<span id="L8665" class="LineNr"> 8665 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L8666" class="LineNr"> 8666 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8667" class="LineNr"> 8667 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8668" class="LineNr"> 8668 </span><span class="Constant">$lookup-or-create-constant:end</span>: -<span id="L8669" class="LineNr"> 8669 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8670" class="LineNr"> 8670 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8671" class="LineNr"> 8671 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8672" class="LineNr"> 8672 </span> 5e/pop-to-esi -<span id="L8673" class="LineNr"> 8673 </span> 58/pop-to-eax -<span id="L8674" class="LineNr"> 8674 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8675" class="LineNr"> 8675 </span> 89/<- %esp 5/r32/ebp -<span id="L8676" class="LineNr"> 8676 </span> 5d/pop-to-ebp -<span id="L8677" class="LineNr"> 8677 </span> c3/return -<span id="L8678" class="LineNr"> 8678 </span> -<span id="L8679" class="LineNr"> 8679 </span><span class="subxComment"># if addr var:</span> -<span id="L8680" class="LineNr"> 8680 </span><span class="subxComment"># container->var->type->right->left->value</span> -<span id="L8681" class="LineNr"> 8681 </span><span class="subxComment"># otherwise</span> -<span id="L8682" class="LineNr"> 8682 </span><span class="subxComment"># container->var->type->value</span> -<span id="L8683" class="LineNr"> 8683 </span><span class="subxFunction">container-type</span>: <span class="subxComment"># container: (addr stmt-var) -> result/eax: type-id</span> -<span id="L8684" class="LineNr"> 8684 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8685" class="LineNr"> 8685 </span> 55/push-ebp -<span id="L8686" class="LineNr"> 8686 </span> 89/<- %ebp 4/r32/esp -<span id="L8687" class="LineNr"> 8687 </span> <span class="subxComment">#</span> -<span id="L8688" class="LineNr"> 8688 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L8689" class="LineNr"> 8689 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L8690" class="LineNr"> 8690 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L8691" class="LineNr"> 8691 </span> { -<span id="L8692" class="LineNr"> 8692 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># Tree-right</span> -<span id="L8693" class="LineNr"> 8693 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8694" class="LineNr"> 8694 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L8695" class="LineNr"> 8695 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L8696" class="LineNr"> 8696 </span> } -<span id="L8697" class="LineNr"> 8697 </span> 8b/-> *(eax+4) 0/r32/eax <span class="subxComment"># Tree-value</span> -<span id="L8698" class="LineNr"> 8698 </span><span class="Constant">$container-type:end</span>: -<span id="L8699" class="LineNr"> 8699 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8700" class="LineNr"> 8700 </span> 89/<- %esp 5/r32/ebp -<span id="L8701" class="LineNr"> 8701 </span> 5d/pop-to-ebp -<span id="L8702" class="LineNr"> 8702 </span> c3/return -<span id="L8703" class="LineNr"> 8703 </span> -<span id="L8704" class="LineNr"> 8704 </span><span class="subxFunction">find-or-create-typeinfo</span>: <span class="subxComment"># t: type-id, out: (addr handle typeinfo)</span> -<span id="L8705" class="LineNr"> 8705 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8706" class="LineNr"> 8706 </span> 55/push-ebp -<span id="L8707" class="LineNr"> 8707 </span> 89/<- %ebp 4/r32/esp -<span id="L8708" class="LineNr"> 8708 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8709" class="LineNr"> 8709 </span> 50/push-eax -<span id="L8710" class="LineNr"> 8710 </span> 51/push-ecx -<span id="L8711" class="LineNr"> 8711 </span> 52/push-edx -<span id="L8712" class="LineNr"> 8712 </span> 57/push-edi -<span id="L8713" class="LineNr"> 8713 </span> <span class="subxComment"># edi = out</span> -<span id="L8714" class="LineNr"> 8714 </span> 8b/-> *(ebp+0xc) 7/r32/edi -<span id="L8715" class="LineNr"> 8715 </span> <span class="subxComment"># var fields/ecx: (handle table (handle array byte) (handle typeinfo-entry))</span> -<span id="L8716" class="LineNr"> 8716 </span> 68/push 0/imm32 -<span id="L8717" class="LineNr"> 8717 </span> 68/push 0/imm32 -<span id="L8718" class="LineNr"> 8718 </span> 89/<- %ecx 4/r32/esp -<span id="L8719" class="LineNr"> 8719 </span> <span class="subxComment"># find-typeinfo(t, out)</span> -<span id="L8720" class="LineNr"> 8720 </span> (<a href='mu.subx.html#L8771'>find-typeinfo</a> *(ebp+8) %edi) +<span id="L8556" class="LineNr"> 8556 </span> 8b/-> *(ebp+0x1c) 7/r32/edi +<span id="L8557" class="LineNr"> 8557 </span> <span class="subxComment"># curr->next = out</span> +<span id="L8558" class="LineNr"> 8558 </span> 8b/-> *edi 1/r32/ecx +<span id="L8559" class="LineNr"> 8559 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># List-next</span> +<span id="L8560" class="LineNr"> 8560 </span> 8b/-> *(edi+4) 1/r32/ecx +<span id="L8561" class="LineNr"> 8561 </span> 89/<- *(eax+0xc) 1/r32/ecx <span class="subxComment"># List-next</span> +<span id="L8562" class="LineNr"> 8562 </span> <span class="subxComment"># out = list</span> +<span id="L8563" class="LineNr"> 8563 </span> 8b/-> *(ebp+0x14) 1/r32/ecx +<span id="L8564" class="LineNr"> 8564 </span> 89/<- *edi 1/r32/ecx +<span id="L8565" class="LineNr"> 8565 </span> 8b/-> *(ebp+0x18) 1/r32/ecx +<span id="L8566" class="LineNr"> 8566 </span> 89/<- *(edi+4) 1/r32/ecx +<span id="L8567" class="LineNr"> 8567 </span><span class="Constant">$append-list:end</span>: +<span id="L8568" class="LineNr"> 8568 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8569" class="LineNr"> 8569 </span> 5f/pop-to-edi +<span id="L8570" class="LineNr"> 8570 </span> 59/pop-to-ecx +<span id="L8571" class="LineNr"> 8571 </span> 58/pop-to-eax +<span id="L8572" class="LineNr"> 8572 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8573" class="LineNr"> 8573 </span> 89/<- %esp 5/r32/ebp +<span id="L8574" class="LineNr"> 8574 </span> 5d/pop-to-ebp +<span id="L8575" class="LineNr"> 8575 </span> c3/return +<span id="L8576" class="LineNr"> 8576 </span> +<span id="L8577" class="LineNr"> 8577 </span><span class="subxFunction">append-stmt-var</span>: <span class="subxComment"># ad: (addr allocation-descriptor), v: (handle var), vars: (handle stmt-var), is-deref?: boolean, out: (addr handle stmt-var)</span> +<span id="L8578" class="LineNr"> 8578 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8579" class="LineNr"> 8579 </span> 55/push-ebp +<span id="L8580" class="LineNr"> 8580 </span> 89/<- %ebp 4/r32/esp +<span id="L8581" class="LineNr"> 8581 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8582" class="LineNr"> 8582 </span> 50/push-eax +<span id="L8583" class="LineNr"> 8583 </span> 51/push-ecx +<span id="L8584" class="LineNr"> 8584 </span> 57/push-edi +<span id="L8585" class="LineNr"> 8585 </span> <span class="subxComment"># edi = out</span> +<span id="L8586" class="LineNr"> 8586 </span> 8b/-> *(ebp+0x20) 7/r32/edi +<span id="L8587" class="LineNr"> 8587 </span> <span class="subxComment"># out = new stmt-var</span> +<span id="L8588" class="LineNr"> 8588 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L349'>Stmt-var-size</a></span> %edi) +<span id="L8589" class="LineNr"> 8589 </span> <span class="subxComment"># var out-addr/ecx: (addr stmt-var) = lookup(*out)</span> +<span id="L8590" class="LineNr"> 8590 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> +<span id="L8591" class="LineNr"> 8591 </span> 89/<- %ecx 0/r32/eax +<span id="L8592" class="LineNr"> 8592 </span> <span class="subxComment"># out-addr->value = v</span> +<span id="L8593" class="LineNr"> 8593 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L8594" class="LineNr"> 8594 </span> 89/<- *ecx 0/r32/eax <span class="subxComment"># Stmt-var-value</span> +<span id="L8595" class="LineNr"> 8595 </span> 8b/-> *(ebp+0x10) 0/r32/eax +<span id="L8596" class="LineNr"> 8596 </span> 89/<- *(ecx+4) 0/r32/eax <span class="subxComment"># Stmt-var-value</span> +<span id="L8597" class="LineNr"> 8597 </span> <span class="subxComment"># out-addr->is-deref? = is-deref?</span> +<span id="L8598" class="LineNr"> 8598 </span> 8b/-> *(ebp+0x1c) 0/r32/eax +<span id="L8599" class="LineNr"> 8599 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L8600" class="LineNr"> 8600 </span> <span class="subxComment"># if (vars == null) return result</span> +<span id="L8601" class="LineNr"> 8601 </span> 81 7/subop/compare *(ebp+0x14) 0/imm32/null +<span id="L8602" class="LineNr"> 8602 </span> 74/jump-if-= $append-stmt-var:end/disp8 +<span id="L8603" class="LineNr"> 8603 </span> <span class="subxComment"># otherwise append</span> +<span id="L8604" class="LineNr"> 8604 </span> <span class="subxComment"># var curr/eax: (addr stmt-var) = lookup(vars)</span> +<span id="L8605" class="LineNr"> 8605 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> +<span id="L8606" class="LineNr"> 8606 </span> <span class="subxComment"># while (curr->next != null) curr = curr->next</span> +<span id="L8607" class="LineNr"> 8607 </span> { +<span id="L8608" class="LineNr"> 8608 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># Stmt-var-next</span> +<span id="L8609" class="LineNr"> 8609 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8610" class="LineNr"> 8610 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L8611" class="LineNr"> 8611 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next, Stmt-var-next => eax</span> +<span id="L8612" class="LineNr"> 8612 </span> <span class="subxComment">#</span> +<span id="L8613" class="LineNr"> 8613 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L8614" class="LineNr"> 8614 </span> } +<span id="L8615" class="LineNr"> 8615 </span> <span class="subxComment"># curr->next = out</span> +<span id="L8616" class="LineNr"> 8616 </span> 8b/-> *edi 1/r32/ecx +<span id="L8617" class="LineNr"> 8617 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Stmt-var-next</span> +<span id="L8618" class="LineNr"> 8618 </span> 8b/-> *(edi+4) 1/r32/ecx +<span id="L8619" class="LineNr"> 8619 </span> 89/<- *(eax+0xc) 1/r32/ecx <span class="subxComment"># Stmt-var-next</span> +<span id="L8620" class="LineNr"> 8620 </span> <span class="subxComment"># out = vars</span> +<span id="L8621" class="LineNr"> 8621 </span> 8b/-> *(ebp+0x14) 1/r32/ecx +<span id="L8622" class="LineNr"> 8622 </span> 89/<- *edi 1/r32/ecx +<span id="L8623" class="LineNr"> 8623 </span> 8b/-> *(ebp+0x18) 1/r32/ecx +<span id="L8624" class="LineNr"> 8624 </span> 89/<- *(edi+4) 1/r32/ecx +<span id="L8625" class="LineNr"> 8625 </span><span class="Constant">$append-stmt-var:end</span>: +<span id="L8626" class="LineNr"> 8626 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8627" class="LineNr"> 8627 </span> 5f/pop-to-edi +<span id="L8628" class="LineNr"> 8628 </span> 59/pop-to-ecx +<span id="L8629" class="LineNr"> 8629 </span> 58/pop-to-eax +<span id="L8630" class="LineNr"> 8630 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8631" class="LineNr"> 8631 </span> 89/<- %esp 5/r32/ebp +<span id="L8632" class="LineNr"> 8632 </span> 5d/pop-to-ebp +<span id="L8633" class="LineNr"> 8633 </span> c3/return +<span id="L8634" class="LineNr"> 8634 </span> +<span id="L8635" class="LineNr"> 8635 </span><span class="subxFunction">append-to-block</span>: <span class="subxComment"># ad: (addr allocation-descriptor), block: (addr block), x: (handle stmt)</span> +<span id="L8636" class="LineNr"> 8636 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8637" class="LineNr"> 8637 </span> 55/push-ebp +<span id="L8638" class="LineNr"> 8638 </span> 89/<- %ebp 4/r32/esp +<span id="L8639" class="LineNr"> 8639 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8640" class="LineNr"> 8640 </span> 50/push-eax +<span id="L8641" class="LineNr"> 8641 </span> 56/push-esi +<span id="L8642" class="LineNr"> 8642 </span> <span class="subxComment"># esi = block</span> +<span id="L8643" class="LineNr"> 8643 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L8644" class="LineNr"> 8644 </span> <span class="subxComment"># block->stmts = append(x, block->stmts)</span> +<span id="L8645" class="LineNr"> 8645 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Block-stmts</span> +<span id="L8646" class="LineNr"> 8646 </span> (<a href='mu.subx.html#L8519'>append-list</a> *(ebp+8) *(ebp+0x10) *(ebp+0x14) *(esi+4) *(esi+8) %eax) <span class="subxComment"># ad, x, x, Block-stmts, Block-stmts</span> +<span id="L8647" class="LineNr"> 8647 </span><span class="Constant">$append-to-block:end</span>: +<span id="L8648" class="LineNr"> 8648 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8649" class="LineNr"> 8649 </span> 5e/pop-to-esi +<span id="L8650" class="LineNr"> 8650 </span> 58/pop-to-eax +<span id="L8651" class="LineNr"> 8651 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8652" class="LineNr"> 8652 </span> 89/<- %esp 5/r32/ebp +<span id="L8653" class="LineNr"> 8653 </span> 5d/pop-to-ebp +<span id="L8654" class="LineNr"> 8654 </span> c3/return +<span id="L8655" class="LineNr"> 8655 </span> +<span id="L8656" class="LineNr"> 8656 </span><span class="subxComment">## Parsing types</span> +<span id="L8657" class="LineNr"> 8657 </span><span class="subxComment"># We need to create metadata on user-defined types, and we need to use this</span> +<span id="L8658" class="LineNr"> 8658 </span><span class="subxComment"># metadata as we parse instructions.</span> +<span id="L8659" class="LineNr"> 8659 </span><span class="subxComment"># However, we also want to allow types to be used before their definitions.</span> +<span id="L8660" class="LineNr"> 8660 </span><span class="subxComment"># This means we can't ever assume any type data structures exist.</span> +<span id="L8661" class="LineNr"> 8661 </span> +<span id="L8662" class="LineNr"> 8662 </span><span class="subxFunction">lookup-or-create-constant</span>: <span class="subxComment"># container: (addr stmt-var), field-name: (addr slice), out: (addr handle var)</span> +<span id="L8663" class="LineNr"> 8663 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8664" class="LineNr"> 8664 </span> 55/push-ebp +<span id="L8665" class="LineNr"> 8665 </span> 89/<- %ebp 4/r32/esp +<span id="L8666" class="LineNr"> 8666 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8667" class="LineNr"> 8667 </span> 50/push-eax +<span id="L8668" class="LineNr"> 8668 </span> 56/push-esi +<span id="L8669" class="LineNr"> 8669 </span> <span class="subxComment"># var container-type/esi: type-id</span> +<span id="L8670" class="LineNr"> 8670 </span> (<a href='mu.subx.html#L8713'>container-type</a> *(ebp+8)) <span class="subxComment"># => eax</span> +<span id="L8671" class="LineNr"> 8671 </span> 89/<- %esi 0/r32/eax +<span id="L8672" class="LineNr"> 8672 </span> <span class="subxComment"># var tmp/eax: (handle typeinfo) = find-or-create-typeinfo(container-type)</span> +<span id="L8673" class="LineNr"> 8673 </span> 68/push 0/imm32 +<span id="L8674" class="LineNr"> 8674 </span> 68/push 0/imm32 +<span id="L8675" class="LineNr"> 8675 </span> 89/<- %eax 4/r32/esp +<span id="L8676" class="LineNr"> 8676 </span> (<a href='mu.subx.html#L8734'>find-or-create-typeinfo</a> %esi %eax) +<span id="L8677" class="LineNr"> 8677 </span> <span class="subxComment"># var tmp-addr/eax: (addr typeinfo) = lookup(tmp)</span> +<span id="L8678" class="LineNr"> 8678 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L8679" class="LineNr"> 8679 </span> <span class="subxComment"># result = find-or-create-typeinfo-output-var(typeinfo, field-name)</span> +<span id="L8680" class="LineNr"> 8680 </span><span class="CommentedCode">#? (write-buffered Stderr "constant: ")</span> +<span id="L8681" class="LineNr"> 8681 </span><span class="CommentedCode">#? (write-slice-buffered Stderr *(ebp+0xc))</span> +<span id="L8682" class="LineNr"> 8682 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8683" class="LineNr"> 8683 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8684" class="LineNr"> 8684 </span> (<a href='mu.subx.html#L8847'>find-or-create-typeinfo-output-var</a> %eax *(ebp+0xc) *(ebp+0x10)) +<span id="L8685" class="LineNr"> 8685 </span><span class="CommentedCode">#? 8b/-> *(ebp+0x10) 0/r32/eax</span> +<span id="L8686" class="LineNr"> 8686 </span><span class="CommentedCode">#? (write-buffered Stderr "@")</span> +<span id="L8687" class="LineNr"> 8687 </span><span class="CommentedCode">#? (lookup *eax *(eax+4))</span> +<span id="L8688" class="LineNr"> 8688 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L8689" class="LineNr"> 8689 </span><span class="CommentedCode">#? (lookup *eax *(eax+4))</span> +<span id="L8690" class="LineNr"> 8690 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L8691" class="LineNr"> 8691 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8692" class="LineNr"> 8692 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8693" class="LineNr"> 8693 </span><span class="CommentedCode">#? (write-buffered Stderr "offset: ")</span> +<span id="L8694" class="LineNr"> 8694 </span><span class="CommentedCode">#? 8b/-> *(eax+0x14) 0/r32/eax</span> +<span id="L8695" class="LineNr"> 8695 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L8696" class="LineNr"> 8696 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8697" class="LineNr"> 8697 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8698" class="LineNr"> 8698 </span><span class="Constant">$lookup-or-create-constant:end</span>: +<span id="L8699" class="LineNr"> 8699 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8700" class="LineNr"> 8700 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8701" class="LineNr"> 8701 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8702" class="LineNr"> 8702 </span> 5e/pop-to-esi +<span id="L8703" class="LineNr"> 8703 </span> 58/pop-to-eax +<span id="L8704" class="LineNr"> 8704 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8705" class="LineNr"> 8705 </span> 89/<- %esp 5/r32/ebp +<span id="L8706" class="LineNr"> 8706 </span> 5d/pop-to-ebp +<span id="L8707" class="LineNr"> 8707 </span> c3/return +<span id="L8708" class="LineNr"> 8708 </span> +<span id="L8709" class="LineNr"> 8709 </span><span class="subxComment"># if addr var:</span> +<span id="L8710" class="LineNr"> 8710 </span><span class="subxComment"># container->var->type->right->left->value</span> +<span id="L8711" class="LineNr"> 8711 </span><span class="subxComment"># otherwise</span> +<span id="L8712" class="LineNr"> 8712 </span><span class="subxComment"># container->var->type->value</span> +<span id="L8713" class="LineNr"> 8713 </span><span class="subxFunction">container-type</span>: <span class="subxComment"># container: (addr stmt-var) -> result/eax: type-id</span> +<span id="L8714" class="LineNr"> 8714 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8715" class="LineNr"> 8715 </span> 55/push-ebp +<span id="L8716" class="LineNr"> 8716 </span> 89/<- %ebp 4/r32/esp +<span id="L8717" class="LineNr"> 8717 </span> <span class="subxComment">#</span> +<span id="L8718" class="LineNr"> 8718 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L8719" class="LineNr"> 8719 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L8720" class="LineNr"> 8720 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> <span id="L8721" class="LineNr"> 8721 </span> { -<span id="L8722" class="LineNr"> 8722 </span> <span class="subxComment"># if (*out != 0) break</span> -<span id="L8723" class="LineNr"> 8723 </span> 81 7/subop/compare *edi 0/imm32 -<span id="L8724" class="LineNr"> 8724 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L8725" class="LineNr"> 8725 </span><span class="Constant">$find-or-create-typeinfo:create</span>: -<span id="L8726" class="LineNr"> 8726 </span> <span class="subxComment"># *out = allocate</span> -<span id="L8727" class="LineNr"> 8727 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L419'>Typeinfo-size</a></span> %edi) -<span id="L8728" class="LineNr"> 8728 </span> <span class="subxComment"># var tmp/eax: (addr typeinfo) = lookup(*out)</span> -<span id="L8729" class="LineNr"> 8729 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> -<span id="L8730" class="LineNr"> 8730 </span><span class="CommentedCode">#? (write-buffered Stderr "created typeinfo at ")</span> -<span id="L8731" class="LineNr"> 8731 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L8732" class="LineNr"> 8732 </span><span class="CommentedCode">#? (write-buffered Stderr " for type-id ")</span> -<span id="L8733" class="LineNr"> 8733 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> -<span id="L8734" class="LineNr"> 8734 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8735" class="LineNr"> 8735 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8736" class="LineNr"> 8736 </span> <span class="subxComment"># tmp->id = t</span> -<span id="L8737" class="LineNr"> 8737 </span> 8b/-> *(ebp+8) 2/r32/edx -<span id="L8738" class="LineNr"> 8738 </span> 89/<- *eax 2/r32/edx <span class="subxComment"># Typeinfo-id</span> -<span id="L8739" class="LineNr"> 8739 </span> <span class="subxComment"># tmp->fields = new table</span> -<span id="L8740" class="LineNr"> 8740 </span> <span class="subxS1Comment"># . fields = new table</span> -<span id="L8741" class="LineNr"> 8741 </span> (<a href='../070new-stream.subx.html#L8'>new-stream</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> 0x40 *<span class="SpecialChar"><a href='mu.subx.html#L424'>Typeinfo-fields-row-size</a></span> %ecx) -<span id="L8742" class="LineNr"> 8742 </span> <span class="subxS1Comment"># . tmp->fields = fields</span> -<span id="L8743" class="LineNr"> 8743 </span> 8b/-> *ecx 2/r32/edx -<span id="L8744" class="LineNr"> 8744 </span> 89/<- *(eax+4) 2/r32/edx <span class="subxComment"># Typeinfo-fields</span> -<span id="L8745" class="LineNr"> 8745 </span> 8b/-> *(ecx+4) 2/r32/edx -<span id="L8746" class="LineNr"> 8746 </span> 89/<- *(eax+8) 2/r32/edx <span class="subxComment"># Typeinfo-fields</span> -<span id="L8747" class="LineNr"> 8747 </span> <span class="subxComment"># tmp->next = Program->types</span> -<span id="L8748" class="LineNr"> 8748 </span> 8b/-> *_Program-types 1/r32/ecx -<span id="L8749" class="LineNr"> 8749 </span> 89/<- *(eax+0x10) 1/r32/ecx <span class="subxComment"># Typeinfo-next</span> -<span id="L8750" class="LineNr"> 8750 </span> 8b/-> *_Program-types->payload 1/r32/ecx -<span id="L8751" class="LineNr"> 8751 </span> 89/<- *(eax+0x14) 1/r32/ecx <span class="subxComment"># Typeinfo-next</span> -<span id="L8752" class="LineNr"> 8752 </span> <span class="subxComment"># Program->types = out</span> -<span id="L8753" class="LineNr"> 8753 </span> 8b/-> *edi 1/r32/ecx -<span id="L8754" class="LineNr"> 8754 </span> 89/<- *_Program-types 1/r32/ecx -<span id="L8755" class="LineNr"> 8755 </span> 8b/-> *(edi+4) 1/r32/ecx -<span id="L8756" class="LineNr"> 8756 </span> 89/<- *_Program-types->payload 1/r32/ecx -<span id="L8757" class="LineNr"> 8757 </span> } -<span id="L8758" class="LineNr"> 8758 </span><span class="Constant">$find-or-create-typeinfo:end</span>: -<span id="L8759" class="LineNr"> 8759 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8760" class="LineNr"> 8760 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8761" class="LineNr"> 8761 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8762" class="LineNr"> 8762 </span> 5f/pop-to-edi -<span id="L8763" class="LineNr"> 8763 </span> 5a/pop-to-edx -<span id="L8764" class="LineNr"> 8764 </span> 59/pop-to-ecx -<span id="L8765" class="LineNr"> 8765 </span> 58/pop-to-eax -<span id="L8766" class="LineNr"> 8766 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8767" class="LineNr"> 8767 </span> 89/<- %esp 5/r32/ebp -<span id="L8768" class="LineNr"> 8768 </span> 5d/pop-to-ebp -<span id="L8769" class="LineNr"> 8769 </span> c3/return -<span id="L8770" class="LineNr"> 8770 </span> -<span id="L8771" class="LineNr"> 8771 </span><span class="subxFunction">find-typeinfo</span>: <span class="subxComment"># t: type-id, out: (addr handle typeinfo)</span> -<span id="L8772" class="LineNr"> 8772 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8773" class="LineNr"> 8773 </span> 55/push-ebp -<span id="L8774" class="LineNr"> 8774 </span> 89/<- %ebp 4/r32/esp -<span id="L8775" class="LineNr"> 8775 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8776" class="LineNr"> 8776 </span> 50/push-eax -<span id="L8777" class="LineNr"> 8777 </span> 51/push-ecx -<span id="L8778" class="LineNr"> 8778 </span> 52/push-edx -<span id="L8779" class="LineNr"> 8779 </span> 57/push-edi -<span id="L8780" class="LineNr"> 8780 </span> <span class="subxComment"># ecx = t</span> -<span id="L8781" class="LineNr"> 8781 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L8782" class="LineNr"> 8782 </span> <span class="subxComment"># edi = out</span> -<span id="L8783" class="LineNr"> 8783 </span> 8b/-> *(ebp+0xc) 7/r32/edi -<span id="L8784" class="LineNr"> 8784 </span> <span class="subxComment"># *out = Program->types</span> -<span id="L8785" class="LineNr"> 8785 </span> 8b/-> *_Program-types 0/r32/eax -<span id="L8786" class="LineNr"> 8786 </span> 89/<- *edi 0/r32/eax -<span id="L8787" class="LineNr"> 8787 </span> 8b/-> *_Program-types->payload 0/r32/eax -<span id="L8788" class="LineNr"> 8788 </span> 89/<- *(edi+4) 0/r32/eax -<span id="L8789" class="LineNr"> 8789 </span> { -<span id="L8790" class="LineNr"> 8790 </span> <span class="subxComment"># if (*out == 0) break</span> -<span id="L8791" class="LineNr"> 8791 </span> 81 7/subop/compare *edi 0/imm32 -<span id="L8792" class="LineNr"> 8792 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8793" class="LineNr"> 8793 </span> <span class="subxComment"># var tmp/eax: (addr typeinfo) = lookup(*out)</span> -<span id="L8794" class="LineNr"> 8794 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> -<span id="L8795" class="LineNr"> 8795 </span> <span class="subxComment"># if (tmp->id == t) break</span> -<span id="L8796" class="LineNr"> 8796 </span> 39/compare *eax 1/r32/ecx <span class="subxComment"># Typeinfo-id</span> -<span id="L8797" class="LineNr"> 8797 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L8798" class="LineNr"> 8798 </span> <span class="subxComment"># *out = tmp->next</span> -<span id="L8799" class="LineNr"> 8799 </span> 8b/-> *(eax+0x10) 2/r32/edx <span class="subxComment"># Typeinfo-next</span> -<span id="L8800" class="LineNr"> 8800 </span> 89/<- *edi 2/r32/edx -<span id="L8801" class="LineNr"> 8801 </span> 8b/-> *(eax+0x14) 2/r32/edx <span class="subxComment"># Typeinfo-next</span> -<span id="L8802" class="LineNr"> 8802 </span> 89/<- *(edi+4) 2/r32/edx -<span id="L8803" class="LineNr"> 8803 </span> <span class="subxComment">#</span> -<span id="L8804" class="LineNr"> 8804 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L8805" class="LineNr"> 8805 </span> } -<span id="L8806" class="LineNr"> 8806 </span><span class="Constant">$find-typeinfo:end</span>: -<span id="L8807" class="LineNr"> 8807 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8808" class="LineNr"> 8808 </span> 5f/pop-to-edi -<span id="L8809" class="LineNr"> 8809 </span> 5a/pop-to-edx -<span id="L8810" class="LineNr"> 8810 </span> 59/pop-to-ecx -<span id="L8811" class="LineNr"> 8811 </span> 58/pop-to-eax -<span id="L8812" class="LineNr"> 8812 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8813" class="LineNr"> 8813 </span> 89/<- %esp 5/r32/ebp -<span id="L8814" class="LineNr"> 8814 </span> 5d/pop-to-ebp -<span id="L8815" class="LineNr"> 8815 </span> c3/return -<span id="L8816" class="LineNr"> 8816 </span> -<span id="L8817" class="LineNr"> 8817 </span><span class="subxFunction">find-or-create-typeinfo-output-var</span>: <span class="subxComment"># T: (addr typeinfo), f: (addr slice), out: (addr handle var)</span> -<span id="L8818" class="LineNr"> 8818 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8819" class="LineNr"> 8819 </span> 55/push-ebp -<span id="L8820" class="LineNr"> 8820 </span> 89/<- %ebp 4/r32/esp -<span id="L8821" class="LineNr"> 8821 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8822" class="LineNr"> 8822 </span> 50/push-eax -<span id="L8823" class="LineNr"> 8823 </span> 52/push-edx -<span id="L8824" class="LineNr"> 8824 </span> 57/push-edi -<span id="L8825" class="LineNr"> 8825 </span> <span class="subxComment"># var dest/edi: (handle typeinfo-entry)</span> -<span id="L8826" class="LineNr"> 8826 </span> 68/push 0/imm32 -<span id="L8827" class="LineNr"> 8827 </span> 68/push 0/imm32 -<span id="L8828" class="LineNr"> 8828 </span> 89/<- %edi 4/r32/esp -<span id="L8829" class="LineNr"> 8829 </span> <span class="subxComment"># find-or-create-typeinfo-fields(T, f, dest)</span> -<span id="L8830" class="LineNr"> 8830 </span> (<a href='mu.subx.html#L8882'>find-or-create-typeinfo-fields</a> *(ebp+8) *(ebp+0xc) %edi) -<span id="L8831" class="LineNr"> 8831 </span> <span class="subxComment"># var dest-addr/edi: (addr typeinfo-entry) = lookup(dest)</span> -<span id="L8832" class="LineNr"> 8832 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> -<span id="L8833" class="LineNr"> 8833 </span> 89/<- %edi 0/r32/eax -<span id="L8834" class="LineNr"> 8834 </span> <span class="subxComment"># if dest-addr->output-var doesn't exist, create it</span> -<span id="L8835" class="LineNr"> 8835 </span> { -<span id="L8836" class="LineNr"> 8836 </span> 81 7/subop/compare *(edi+0xc) 0/imm32 <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L8837" class="LineNr"> 8837 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L8838" class="LineNr"> 8838 </span> <span class="subxComment"># dest-addr->output-var = new var(dummy name, type, -1 offset)</span> -<span id="L8839" class="LineNr"> 8839 </span> <span class="subxS1Comment"># . var name/eax: (handle array byte) = "field"</span> -<span id="L8840" class="LineNr"> 8840 </span> 68/push 0/imm32 -<span id="L8841" class="LineNr"> 8841 </span> 68/push 0/imm32 -<span id="L8842" class="LineNr"> 8842 </span> 89/<- %eax 4/r32/esp -<span id="L8843" class="LineNr"> 8843 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"field"</span> %eax) -<span id="L8844" class="LineNr"> 8844 </span> <span class="subxS1Comment"># . new var</span> -<span id="L8845" class="LineNr"> 8845 </span> 8d/copy-address *(edi+0xc) 2/r32/edx -<span id="L8846" class="LineNr"> 8846 </span> (<a href='mu.subx.html#L8288'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) -<span id="L8847" class="LineNr"> 8847 </span> <span class="subxS1Comment"># . reclaim name</span> -<span id="L8848" class="LineNr"> 8848 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8849" class="LineNr"> 8849 </span> <span class="subxComment"># var result/edx: (addr var) = lookup(dest-addr->output-var)</span> -<span id="L8850" class="LineNr"> 8850 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0xc) *(edi+0x10)) <span class="subxComment"># => eax</span> -<span id="L8851" class="LineNr"> 8851 </span> 89/<- %edx 0/r32/eax -<span id="L8852" class="LineNr"> 8852 </span> <span class="subxComment"># result->type = new constant type</span> -<span id="L8853" class="LineNr"> 8853 </span> 8d/copy-address *(edx+8) 0/r32/eax <span class="subxComment"># Var-type</span> -<span id="L8854" class="LineNr"> 8854 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) -<span id="L8855" class="LineNr"> 8855 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># => eax</span> -<span id="L8856" class="LineNr"> 8856 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> -<span id="L8857" class="LineNr"> 8857 </span> c7 0/subop/copy *(eax+4) 6/imm32/constant <span class="subxComment"># Tree-value</span> -<span id="L8858" class="LineNr"> 8858 </span> c7 0/subop/copy *(eax+8) 0/imm32 <span class="subxComment"># Tree-left</span> -<span id="L8859" class="LineNr"> 8859 </span> c7 0/subop/copy *(eax+0xc) 0/imm32 <span class="subxComment"># Tree-right</span> -<span id="L8860" class="LineNr"> 8860 </span> c7 0/subop/copy *(eax+0x10) 0/imm32 <span class="subxComment"># Tree-right</span> -<span id="L8861" class="LineNr"> 8861 </span> <span class="subxComment"># result->offset isn't filled out yet</span> -<span id="L8862" class="LineNr"> 8862 </span> c7 0/subop/copy *(edx+0x14) -1/imm32/uninitialized <span class="subxComment"># Var-offset</span> -<span id="L8863" class="LineNr"> 8863 </span> } -<span id="L8864" class="LineNr"> 8864 </span> <span class="subxComment"># out = dest-addr->output-var</span> -<span id="L8865" class="LineNr"> 8865 </span> 8b/-> *(ebp+0x10) 2/r32/edx -<span id="L8866" class="LineNr"> 8866 </span> 8b/-> *(edi+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L8867" class="LineNr"> 8867 </span> 89/<- *edx 0/r32/eax -<span id="L8868" class="LineNr"> 8868 </span> 8b/-> *(edi+0x10) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L8869" class="LineNr"> 8869 </span> 89/<- *(edx+4) 0/r32/eax -<span id="L8870" class="LineNr"> 8870 </span><span class="Constant">$find-or-create-typeinfo-output-var:end</span>: -<span id="L8871" class="LineNr"> 8871 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L8872" class="LineNr"> 8872 </span> 81 0/subop/add %esp 8/imm32 -<span id="L8873" class="LineNr"> 8873 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8874" class="LineNr"> 8874 </span> 5f/pop-to-edi -<span id="L8875" class="LineNr"> 8875 </span> 5a/pop-to-edx -<span id="L8876" class="LineNr"> 8876 </span> 58/pop-to-eax -<span id="L8877" class="LineNr"> 8877 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8878" class="LineNr"> 8878 </span> 89/<- %esp 5/r32/ebp -<span id="L8879" class="LineNr"> 8879 </span> 5d/pop-to-ebp -<span id="L8880" class="LineNr"> 8880 </span> c3/return -<span id="L8881" class="LineNr"> 8881 </span> -<span id="L8882" class="LineNr"> 8882 </span><span class="subxFunction">find-or-create-typeinfo-fields</span>: <span class="subxComment"># T: (addr typeinfo), f: (addr slice), out: (addr handle typeinfo-entry)</span> -<span id="L8883" class="LineNr"> 8883 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8884" class="LineNr"> 8884 </span> 55/push-ebp -<span id="L8885" class="LineNr"> 8885 </span> 89/<- %ebp 4/r32/esp -<span id="L8886" class="LineNr"> 8886 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8887" class="LineNr"> 8887 </span> 50/push-eax -<span id="L8888" class="LineNr"> 8888 </span> 56/push-esi -<span id="L8889" class="LineNr"> 8889 </span> 57/push-edi -<span id="L8890" class="LineNr"> 8890 </span> <span class="subxComment"># eax = lookup(T->fields)</span> -<span id="L8891" class="LineNr"> 8891 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L8892" class="LineNr"> 8892 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> -<span id="L8893" class="LineNr"> 8893 </span> <span class="subxComment"># edi = out</span> -<span id="L8894" class="LineNr"> 8894 </span> 8b/-> *(ebp+0x10) 7/r32/edi -<span id="L8895" class="LineNr"> 8895 </span> <span class="subxComment"># var src/esi: (addr handle typeinfo-entry) = get-or-insert-slice(T->fields, f)</span> -<span id="L8896" class="LineNr"> 8896 </span> (<a href='../081table.subx.html#L1022'>get-or-insert-slice</a> %eax *(ebp+0xc) *<span class="SpecialChar"><a href='mu.subx.html#L424'>Typeinfo-fields-row-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>) <span class="subxComment"># => eax</span> -<span id="L8897" class="LineNr"> 8897 </span> 89/<- %esi 0/r32/eax -<span id="L8898" class="LineNr"> 8898 </span> <span class="subxComment"># if src doesn't exist, allocate it</span> -<span id="L8899" class="LineNr"> 8899 </span> { -<span id="L8900" class="LineNr"> 8900 </span> 81 7/subop/compare *esi 0/imm32 -<span id="L8901" class="LineNr"> 8901 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L8902" class="LineNr"> 8902 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L440'>Typeinfo-entry-size</a></span> %esi) -<span id="L8903" class="LineNr"> 8903 </span><span class="CommentedCode">#? (write-buffered Stderr "handle at ")</span> -<span id="L8904" class="LineNr"> 8904 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %esi)</span> -<span id="L8905" class="LineNr"> 8905 </span><span class="CommentedCode">#? (write-buffered Stderr ": ")</span> -<span id="L8906" class="LineNr"> 8906 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *esi)</span> -<span id="L8907" class="LineNr"> 8907 </span><span class="CommentedCode">#? (write-buffered Stderr " ")</span> -<span id="L8908" class="LineNr"> 8908 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(esi+4))</span> -<span id="L8909" class="LineNr"> 8909 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8910" class="LineNr"> 8910 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8911" class="LineNr"> 8911 </span><span class="CommentedCode">#? (lookup *esi *(esi+4))</span> -<span id="L8912" class="LineNr"> 8912 </span><span class="CommentedCode">#? (write-buffered Stderr "created typeinfo fields at ")</span> -<span id="L8913" class="LineNr"> 8913 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %esi)</span> -<span id="L8914" class="LineNr"> 8914 </span><span class="CommentedCode">#? (write-buffered Stderr " for ")</span> -<span id="L8915" class="LineNr"> 8915 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> -<span id="L8916" class="LineNr"> 8916 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L8917" class="LineNr"> 8917 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L8918" class="LineNr"> 8918 </span> } -<span id="L8919" class="LineNr"> 8919 </span> <span class="subxComment"># *out = src</span> -<span id="L8920" class="LineNr"> 8920 </span> <span class="subxS1Comment"># . *edi = *src</span> -<span id="L8921" class="LineNr"> 8921 </span> 8b/-> *esi 0/r32/eax -<span id="L8922" class="LineNr"> 8922 </span> 89/<- *edi 0/r32/eax -<span id="L8923" class="LineNr"> 8923 </span> 8b/-> *(esi+4) 0/r32/eax -<span id="L8924" class="LineNr"> 8924 </span> 89/<- *(edi+4) 0/r32/eax -<span id="L8925" class="LineNr"> 8925 </span><span class="Constant">$find-or-create-typeinfo-fields:end</span>: -<span id="L8926" class="LineNr"> 8926 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L8927" class="LineNr"> 8927 </span> 5f/pop-to-edi -<span id="L8928" class="LineNr"> 8928 </span> 5e/pop-to-esi -<span id="L8929" class="LineNr"> 8929 </span> 58/pop-to-eax -<span id="L8930" class="LineNr"> 8930 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L8931" class="LineNr"> 8931 </span> 89/<- %esp 5/r32/ebp -<span id="L8932" class="LineNr"> 8932 </span> 5d/pop-to-ebp -<span id="L8933" class="LineNr"> 8933 </span> c3/return -<span id="L8934" class="LineNr"> 8934 </span> -<span id="L8935" class="LineNr"> 8935 </span><span class="subxFunction">populate-mu-type</span>: <span class="subxComment"># in: (addr stream byte), t: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L8936" class="LineNr"> 8936 </span> <span class="subxComment"># pseudocode:</span> -<span id="L8937" class="LineNr"> 8937 </span> <span class="subxComment"># var line: (stream byte 512)</span> -<span id="L8938" class="LineNr"> 8938 </span> <span class="subxComment"># curr-index = 0</span> -<span id="L8939" class="LineNr"> 8939 </span> <span class="subxComment"># while true</span> -<span id="L8940" class="LineNr"> 8940 </span> <span class="subxComment"># clear-stream(line)</span> -<span id="L8941" class="LineNr"> 8941 </span> <span class="subxComment"># read-line-buffered(in, line)</span> -<span id="L8942" class="LineNr"> 8942 </span> <span class="subxComment"># if line->write == 0</span> -<span id="L8943" class="LineNr"> 8943 </span> <span class="subxComment"># abort</span> -<span id="L8944" class="LineNr"> 8944 </span> <span class="subxComment"># word-slice = next-mu-token(line)</span> -<span id="L8945" class="LineNr"> 8945 </span> <span class="subxComment"># if slice-empty?(word-slice) # end of line</span> -<span id="L8946" class="LineNr"> 8946 </span> <span class="subxComment"># continue</span> -<span id="L8947" class="LineNr"> 8947 </span> <span class="subxComment"># if slice-equal?(word-slice, "}")</span> -<span id="L8948" class="LineNr"> 8948 </span> <span class="subxComment"># break</span> -<span id="L8949" class="LineNr"> 8949 </span> <span class="subxComment"># var v: (handle var) = parse-var-with-type(word-slice, line)</span> -<span id="L8950" class="LineNr"> 8950 </span> <span class="subxComment"># var r: (handle typeinfo-fields) = find-or-create-typeinfo-fields(t, word-slice/v->name)</span> -<span id="L8951" class="LineNr"> 8951 </span> <span class="subxComment"># TODO: ensure that r->first is null</span> -<span id="L8952" class="LineNr"> 8952 </span> <span class="subxComment"># r->index = curr-index</span> -<span id="L8953" class="LineNr"> 8953 </span> <span class="subxComment"># curr-index++</span> -<span id="L8954" class="LineNr"> 8954 </span> <span class="subxComment"># r->input-var = v</span> -<span id="L8955" class="LineNr"> 8955 </span> <span class="subxComment"># if r->output-var == 0</span> -<span id="L8956" class="LineNr"> 8956 </span> <span class="subxComment"># r->output-var = new literal</span> -<span id="L8957" class="LineNr"> 8957 </span> <span class="subxComment"># TODO: ensure nothing else in line</span> -<span id="L8958" class="LineNr"> 8958 </span> <span class="subxComment"># t->total-size-in-bytes = -2 (not yet initialized)</span> -<span id="L8959" class="LineNr"> 8959 </span> <span class="subxComment"># check-input-vars(t, err, ed)</span> -<span id="L8960" class="LineNr"> 8960 </span> <span class="subxComment">#</span> -<span id="L8961" class="LineNr"> 8961 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L8962" class="LineNr"> 8962 </span> 55/push-ebp -<span id="L8963" class="LineNr"> 8963 </span> 89/<- %ebp 4/r32/esp -<span id="L8964" class="LineNr"> 8964 </span> <span class="subxComment"># var curr-index: int at *(ebp-4)</span> -<span id="L8965" class="LineNr"> 8965 </span> 68/push 0/imm32 -<span id="L8966" class="LineNr"> 8966 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L8967" class="LineNr"> 8967 </span> 50/push-eax -<span id="L8968" class="LineNr"> 8968 </span> 51/push-ecx -<span id="L8969" class="LineNr"> 8969 </span> 52/push-edx -<span id="L8970" class="LineNr"> 8970 </span> 53/push-ebx -<span id="L8971" class="LineNr"> 8971 </span> 56/push-esi -<span id="L8972" class="LineNr"> 8972 </span> 57/push-edi -<span id="L8973" class="LineNr"> 8973 </span> <span class="subxComment"># edi = t</span> -<span id="L8974" class="LineNr"> 8974 </span> 8b/-> *(ebp+0xc) 7/r32/edi -<span id="L8975" class="LineNr"> 8975 </span> <span class="subxComment"># var line/ecx: (stream byte 512)</span> -<span id="L8976" class="LineNr"> 8976 </span> 81 5/subop/subtract %esp 0x200/imm32 -<span id="L8977" class="LineNr"> 8977 </span> 68/push 0x200/imm32/size -<span id="L8978" class="LineNr"> 8978 </span> 68/push 0/imm32/read -<span id="L8979" class="LineNr"> 8979 </span> 68/push 0/imm32/write -<span id="L8980" class="LineNr"> 8980 </span> 89/<- %ecx 4/r32/esp -<span id="L8981" class="LineNr"> 8981 </span> <span class="subxComment"># var word-slice/edx: slice</span> -<span id="L8982" class="LineNr"> 8982 </span> 68/push 0/imm32/end -<span id="L8983" class="LineNr"> 8983 </span> 68/push 0/imm32/start -<span id="L8984" class="LineNr"> 8984 </span> 89/<- %edx 4/r32/esp -<span id="L8985" class="LineNr"> 8985 </span> <span class="subxComment"># var v/esi: (handle var)</span> -<span id="L8986" class="LineNr"> 8986 </span> 68/push 0/imm32 -<span id="L8987" class="LineNr"> 8987 </span> 68/push 0/imm32 -<span id="L8988" class="LineNr"> 8988 </span> 89/<- %esi 4/r32/esp -<span id="L8989" class="LineNr"> 8989 </span> <span class="subxComment"># var r/ebx: (handle typeinfo-entry)</span> -<span id="L8990" class="LineNr"> 8990 </span> 68/push 0/imm32 -<span id="L8991" class="LineNr"> 8991 </span> 68/push 0/imm32 -<span id="L8992" class="LineNr"> 8992 </span> 89/<- %ebx 4/r32/esp -<span id="L8993" class="LineNr"> 8993 </span> { -<span id="L8994" class="LineNr"> 8994 </span><span class="Constant">$populate-mu-type:line-loop</span>: -<span id="L8995" class="LineNr"> 8995 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> %ecx) -<span id="L8996" class="LineNr"> 8996 </span> (<a href='../071read-line.subx.html#L9'>read-line-buffered</a> *(ebp+8) %ecx) -<span id="L8997" class="LineNr"> 8997 </span> <span class="subxComment"># if (line->write == 0) abort</span> -<span id="L8998" class="LineNr"> 8998 </span> 81 7/subop/compare *ecx 0/imm32 -<span id="L8999" class="LineNr"> 8999 </span> 0f 84/jump-if-= $populate-mu-type:abort/disp32 -<span id="L9000" class="Folded"> 9000 </span><span class="Folded">+-- 6 lines: #? # dump line ------------------------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L9006" class="LineNr"> 9006 </span> (<a href='mu.subx.html#L6008'>next-mu-token</a> %ecx %edx) -<span id="L9007" class="LineNr"> 9007 </span> <span class="subxComment"># if slice-empty?(word-slice) continue</span> -<span id="L9008" class="LineNr"> 9008 </span> (<a href='../072slice.subx.html#L9'>slice-empty?</a> %edx) <span class="subxComment"># => eax</span> -<span id="L9009" class="LineNr"> 9009 </span> 3d/compare-eax-and 0/imm32 -<span id="L9010" class="LineNr"> 9010 </span> 0f 85/jump-if-!= <span class="Constant">loop</span>/disp32 -<span id="L9011" class="LineNr"> 9011 </span> <span class="subxComment"># if slice-equal?(word-slice, "}") break</span> -<span id="L9012" class="LineNr"> 9012 </span> (<a href='../072slice.subx.html#L120'>slice-equal?</a> %edx <span class="Constant">"}"</span>) -<span id="L9013" class="LineNr"> 9013 </span> 3d/compare-eax-and 0/imm32 -<span id="L9014" class="LineNr"> 9014 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L9015" class="LineNr"> 9015 </span><span class="Constant">$populate-mu-type:parse-element</span>: -<span id="L9016" class="LineNr"> 9016 </span> <span class="subxComment"># v = parse-var-with-type(word-slice, first-line)</span> -<span id="L9017" class="LineNr"> 9017 </span> <span class="subxComment"># must do this first to strip the trailing ':' from word-slice before</span> -<span id="L9018" class="LineNr"> 9018 </span> <span class="subxComment"># using it in find-or-create-typeinfo-fields below</span> -<span id="L9019" class="LineNr"> 9019 </span> <span class="subxComment"># TODO: clean up that mutation in parse-var-with-type</span> -<span id="L9020" class="LineNr"> 9020 </span> (<a href='mu.subx.html#L5746'>parse-var-with-type</a> %edx %ecx %esi *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L9021" class="LineNr"> 9021 </span> <span class="subxComment"># var tmp/ecx</span> -<span id="L9022" class="LineNr"> 9022 </span> 51/push-ecx -<span id="L9023" class="LineNr"> 9023 </span><span class="Constant">$populate-mu-type:create-typeinfo-fields</span>: -<span id="L9024" class="LineNr"> 9024 </span> <span class="subxComment"># var r/ebx: (handle typeinfo-entry)</span> -<span id="L9025" class="LineNr"> 9025 </span> (<a href='mu.subx.html#L8882'>find-or-create-typeinfo-fields</a> %edi %edx %ebx) -<span id="L9026" class="LineNr"> 9026 </span> <span class="subxComment"># r->index = curr-index</span> -<span id="L9027" class="LineNr"> 9027 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># => eax</span> -<span id="L9028" class="LineNr"> 9028 </span> 8b/-> *(ebp-4) 1/r32/ecx -<span id="L9029" class="LineNr"> 9029 </span><span class="CommentedCode">#? (write-buffered Stderr "saving index ")</span> -<span id="L9030" class="LineNr"> 9030 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ecx)</span> -<span id="L9031" class="LineNr"> 9031 </span><span class="CommentedCode">#? (write-buffered Stderr " at ")</span> -<span id="L9032" class="LineNr"> 9032 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %edi)</span> -<span id="L9033" class="LineNr"> 9033 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L9034" class="LineNr"> 9034 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L9035" class="LineNr"> 9035 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Typeinfo-entry-index</span> -<span id="L9036" class="LineNr"> 9036 </span> <span class="subxComment"># ++curr-index</span> -<span id="L9037" class="LineNr"> 9037 </span> ff 0/subop/increment *(ebp-4) -<span id="L9038" class="LineNr"> 9038 </span><span class="Constant">$populate-mu-type:set-input-type</span>: -<span id="L9039" class="LineNr"> 9039 </span> <span class="subxComment"># r->input-var = v</span> -<span id="L9040" class="LineNr"> 9040 </span> 8b/-> *esi 1/r32/ecx -<span id="L9041" class="LineNr"> 9041 </span> 89/<- *eax 1/r32/ecx <span class="subxComment"># Typeinfo-entry-input-var</span> -<span id="L9042" class="LineNr"> 9042 </span> 8b/-> *(esi+4) 1/r32/ecx -<span id="L9043" class="LineNr"> 9043 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Typeinfo-entry-input-var</span> -<span id="L9044" class="LineNr"> 9044 </span> 59/pop-to-ecx -<span id="L9045" class="LineNr"> 9045 </span> { -<span id="L9046" class="LineNr"> 9046 </span><span class="Constant">$populate-mu-type:create-output-type</span>: -<span id="L9047" class="LineNr"> 9047 </span> <span class="subxComment"># if (r->output-var == 0) create a new var with some placeholder data</span> -<span id="L9048" class="LineNr"> 9048 </span> 81 7/subop/compare *(eax+0xc) 0/imm32 <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L9049" class="LineNr"> 9049 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9050" class="LineNr"> 9050 </span> 8d/copy-address *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L9051" class="LineNr"> 9051 </span> (<a href='mu.subx.html#L8373'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edx %eax) -<span id="L9052" class="LineNr"> 9052 </span> } -<span id="L9053" class="LineNr"> 9053 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L9054" class="LineNr"> 9054 </span> } -<span id="L9055" class="LineNr"> 9055 </span><span class="Constant">$populate-mu-type:invalidate-total-size-in-bytes</span>: -<span id="L9056" class="LineNr"> 9056 </span> <span class="subxComment"># Offsets and total size may not be accurate here since we may not yet</span> -<span id="L9057" class="LineNr"> 9057 </span> <span class="subxComment"># have encountered the element types.</span> -<span id="L9058" class="LineNr"> 9058 </span> <span class="subxComment"># We'll recompute them separately after parsing the entire program.</span> -<span id="L9059" class="LineNr"> 9059 </span> c7 0/subop/copy *(edi+0xc) -2/imm32/uninitialized <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9060" class="LineNr"> 9060 </span><span class="Constant">$populate-mu-type:validate</span>: -<span id="L9061" class="LineNr"> 9061 </span> (<a href='mu.subx.html#L9089'>check-input-vars</a> *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L9062" class="LineNr"> 9062 </span><span class="Constant">$populate-mu-type:end</span>: -<span id="L9063" class="LineNr"> 9063 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L9064" class="LineNr"> 9064 </span> 81 0/subop/add %esp 0x224/imm32 -<span id="L9065" class="LineNr"> 9065 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9066" class="LineNr"> 9066 </span> 5f/pop-to-edi -<span id="L9067" class="LineNr"> 9067 </span> 5e/pop-to-esi -<span id="L9068" class="LineNr"> 9068 </span> 5b/pop-to-ebx -<span id="L9069" class="LineNr"> 9069 </span> 5a/pop-to-edx -<span id="L9070" class="LineNr"> 9070 </span> 59/pop-to-ecx -<span id="L9071" class="LineNr"> 9071 </span> 58/pop-to-eax -<span id="L9072" class="LineNr"> 9072 </span> <span class="subxComment"># reclaim curr-index</span> -<span id="L9073" class="LineNr"> 9073 </span> 81 0/subop/add %esp 4/imm32 -<span id="L9074" class="LineNr"> 9074 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9075" class="LineNr"> 9075 </span> 89/<- %esp 5/r32/ebp -<span id="L9076" class="LineNr"> 9076 </span> 5d/pop-to-ebp -<span id="L9077" class="LineNr"> 9077 </span> c3/return -<span id="L9078" class="LineNr"> 9078 </span> -<span id="L9079" class="LineNr"> 9079 </span><span class="Constant">$populate-mu-type:abort</span>: -<span id="L9080" class="LineNr"> 9080 </span> <span class="subxComment"># error("unexpected top-level command: " word-slice "\n")</span> -<span id="L9081" class="LineNr"> 9081 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"incomplete type definition '"</span>) -<span id="L9082" class="LineNr"> 9082 </span> (<a href='mu.subx.html#L9153'>type-name</a> *edi) <span class="subxComment"># Typeinfo-id => eax</span> -<span id="L9083" class="LineNr"> 9083 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9084" class="LineNr"> 9084 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"\n"</span>) -<span id="L9085" class="LineNr"> 9085 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L9086" class="LineNr"> 9086 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L9087" class="LineNr"> 9087 </span> <span class="subxComment"># never gets here</span> -<span id="L9088" class="LineNr"> 9088 </span> -<span id="L9089" class="LineNr"> 9089 </span><span class="subxFunction">check-input-vars</span>: <span class="subxComment"># t: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9090" class="LineNr"> 9090 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9091" class="LineNr"> 9091 </span> 55/push-ebp -<span id="L9092" class="LineNr"> 9092 </span> 89/<- %ebp 4/r32/esp -<span id="L9093" class="LineNr"> 9093 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9094" class="LineNr"> 9094 </span> 50/push-eax -<span id="L9095" class="LineNr"> 9095 </span> 51/push-ecx -<span id="L9096" class="LineNr"> 9096 </span> 52/push-edx -<span id="L9097" class="LineNr"> 9097 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(t->fields)</span> -<span id="L9098" class="LineNr"> 9098 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L9099" class="LineNr"> 9099 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> -<span id="L9100" class="LineNr"> 9100 </span> 89/<- %ecx 0/r32/eax -<span id="L9101" class="LineNr"> 9101 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> -<span id="L9102" class="LineNr"> 9102 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> -<span id="L9103" class="LineNr"> 9103 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> -<span id="L9104" class="LineNr"> 9104 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx -<span id="L9105" class="LineNr"> 9105 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> -<span id="L9106" class="LineNr"> 9106 </span> 8d/copy-address *(ecx+edx) 2/r32/edx -<span id="L9107" class="LineNr"> 9107 </span> { -<span id="L9108" class="LineNr"> 9108 </span><span class="Constant">$check-input-vars:loop</span>: -<span id="L9109" class="LineNr"> 9109 </span> <span class="subxComment"># if (curr >= max) break</span> -<span id="L9110" class="LineNr"> 9110 </span> 39/compare %ecx 2/r32/edx -<span id="L9111" class="LineNr"> 9111 </span> 73/jump-if-addr>= <span class="Constant">break</span>/disp8 -<span id="L9112" class="LineNr"> 9112 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> -<span id="L9113" class="LineNr"> 9113 </span> <span class="subxComment"># var t2/eax: (addr typeinfo-entry) = lookup(curr->value)</span> -<span id="L9114" class="LineNr"> 9114 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> -<span id="L9115" class="LineNr"> 9115 </span> <span class="subxComment"># if (t2->input-var == null) raise an error</span> -<span id="L9116" class="LineNr"> 9116 </span> 8b/-> *eax 0/r32/eax <span class="subxComment"># Typeinfo-entry-input-var</span> -<span id="L9117" class="LineNr"> 9117 </span> 3d/compare-eax-and 0/imm32/null -<span id="L9118" class="LineNr"> 9118 </span> 0f 84/jump-if-= $check-input-vars:abort/disp32 -<span id="L9119" class="LineNr"> 9119 </span> <span class="subxComment"># curr += row-size</span> -<span id="L9120" class="LineNr"> 9120 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> -<span id="L9121" class="LineNr"> 9121 </span> <span class="subxComment">#</span> -<span id="L9122" class="LineNr"> 9122 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9123" class="LineNr"> 9123 </span> } -<span id="L9124" class="LineNr"> 9124 </span><span class="Constant">$check-input-vars:end</span>: -<span id="L9125" class="LineNr"> 9125 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9126" class="LineNr"> 9126 </span> 5a/pop-to-edx -<span id="L9127" class="LineNr"> 9127 </span> 59/pop-to-ecx -<span id="L9128" class="LineNr"> 9128 </span> 58/pop-to-eax -<span id="L9129" class="LineNr"> 9129 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9130" class="LineNr"> 9130 </span> 89/<- %esp 5/r32/ebp -<span id="L9131" class="LineNr"> 9131 </span> 5d/pop-to-ebp -<span id="L9132" class="LineNr"> 9132 </span> c3/return -<span id="L9133" class="LineNr"> 9133 </span> -<span id="L9134" class="LineNr"> 9134 </span><span class="Constant">$check-input-vars:abort</span>: -<span id="L9135" class="LineNr"> 9135 </span> <span class="subxComment"># error("type " type " has no member called '" curr->name "'\n")</span> -<span id="L9136" class="LineNr"> 9136 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"type '"</span>) -<span id="L9137" class="LineNr"> 9137 </span> <span class="subxS1Comment"># . var tmp/edx: int = t->id << 2</span> -<span id="L9138" class="LineNr"> 9138 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L9139" class="LineNr"> 9139 </span> 8b/-> *eax 2/r32/edx <span class="subxComment"># Typeinfo-id</span> -<span id="L9140" class="LineNr"> 9140 </span> c1/shift 4/subop/left %edx 2/imm8 -<span id="L9141" class="LineNr"> 9141 </span> <span class="subxS1Comment"># . var a/edx: (addr array byte) = Type-id->data[tmp]</span> -<span id="L9142" class="LineNr"> 9142 </span> b8/copy-to-eax <span class="SpecialChar"><a href='mu.subx.html#L380'>Type-id</a></span>/imm32 -<span id="L9143" class="LineNr"> 9143 </span> 8b/-> *(eax+edx+0xc) 2/r32/edx -<span id="L9144" class="LineNr"> 9144 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %edx) -<span id="L9145" class="LineNr"> 9145 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has no member called '"</span>) -<span id="L9146" class="LineNr"> 9146 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> -<span id="L9147" class="LineNr"> 9147 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) -<span id="L9148" class="LineNr"> 9148 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"'\n"</span>) -<span id="L9149" class="LineNr"> 9149 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) -<span id="L9150" class="LineNr"> 9150 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) -<span id="L9151" class="LineNr"> 9151 </span> <span class="subxComment"># never gets here</span> -<span id="L9152" class="LineNr"> 9152 </span> -<span id="L9153" class="LineNr"> 9153 </span><span class="subxFunction">type-name</span>: <span class="subxComment"># index: int -> result/eax: (addr array byte)</span> -<span id="L9154" class="LineNr"> 9154 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9155" class="LineNr"> 9155 </span> 55/push-ebp -<span id="L9156" class="LineNr"> 9156 </span> 89/<- %ebp 4/r32/esp -<span id="L9157" class="LineNr"> 9157 </span> <span class="subxComment">#</span> -<span id="L9158" class="LineNr"> 9158 </span> (index <span class="SpecialChar"><a href='mu.subx.html#L380'>Type-id</a></span> *(ebp+8)) -<span id="L9159" class="LineNr"> 9159 </span><span class="Constant">$type-name:end</span>: -<span id="L9160" class="LineNr"> 9160 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9161" class="LineNr"> 9161 </span> 89/<- %esp 5/r32/ebp -<span id="L9162" class="LineNr"> 9162 </span> 5d/pop-to-ebp -<span id="L9163" class="LineNr"> 9163 </span> c3/return -<span id="L9164" class="LineNr"> 9164 </span> -<span id="L9165" class="LineNr"> 9165 </span><span class="subxFunction">index</span>: <span class="subxComment"># arr: (addr stream (handle array byte)), index: int -> result/eax: (addr array byte)</span> -<span id="L9166" class="LineNr"> 9166 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9167" class="LineNr"> 9167 </span> 55/push-ebp -<span id="L9168" class="LineNr"> 9168 </span> 89/<- %ebp 4/r32/esp -<span id="L9169" class="LineNr"> 9169 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9170" class="LineNr"> 9170 </span> 56/push-esi -<span id="L9171" class="LineNr"> 9171 </span> <span class="subxComment"># TODO: bounds-check index</span> -<span id="L9172" class="LineNr"> 9172 </span> <span class="subxComment"># esi = arr</span> -<span id="L9173" class="LineNr"> 9173 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9174" class="LineNr"> 9174 </span> <span class="subxComment"># eax = index</span> -<span id="L9175" class="LineNr"> 9175 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L9176" class="LineNr"> 9176 </span> <span class="subxComment"># eax = *(arr + 12 + index)</span> -<span id="L9177" class="LineNr"> 9177 </span> 8b/-> *(esi+eax+0xc) 0/r32/eax -<span id="L9178" class="LineNr"> 9178 </span><span class="Constant">$index:end</span>: -<span id="L9179" class="LineNr"> 9179 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9180" class="LineNr"> 9180 </span> 5e/pop-to-esi -<span id="L9181" class="LineNr"> 9181 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9182" class="LineNr"> 9182 </span> 89/<- %esp 5/r32/ebp -<span id="L9183" class="LineNr"> 9183 </span> 5d/pop-to-ebp -<span id="L9184" class="LineNr"> 9184 </span> c3/return -<span id="L9185" class="LineNr"> 9185 </span> -<span id="L9186" class="LineNr"> 9186 </span><span class="subxComment">#######################################################</span> -<span id="L9187" class="LineNr"> 9187 </span><span class="subxComment"># Compute type sizes</span> -<span id="L9188" class="LineNr"> 9188 </span><span class="subxComment">#######################################################</span> -<span id="L9189" class="LineNr"> 9189 </span> -<span id="L9190" class="LineNr"> 9190 </span><span class="subxComment"># Compute the sizes of all user-defined types.</span> -<span id="L9191" class="LineNr"> 9191 </span><span class="subxComment"># We'll need the sizes of their elements, which may be other user-defined</span> -<span id="L9192" class="LineNr"> 9192 </span><span class="subxComment"># types, which we will compute as needed.</span> -<span id="L9193" class="LineNr"> 9193 </span> -<span id="L9194" class="LineNr"> 9194 </span><span class="subxComment"># Initially, all user-defined types have their sizes set to -2 (invalid)</span> -<span id="L9195" class="LineNr"> 9195 </span><span class="subxFunction">populate-mu-type-sizes</span>: <span class="subxComment"># err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L8722" class="LineNr"> 8722 </span> 81 7/subop/compare *(eax+8) 0/imm32 <span class="subxComment"># Tree-right</span> +<span id="L8723" class="LineNr"> 8723 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8724" class="LineNr"> 8724 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L8725" class="LineNr"> 8725 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L8726" class="LineNr"> 8726 </span> } +<span id="L8727" class="LineNr"> 8727 </span> 8b/-> *(eax+4) 0/r32/eax <span class="subxComment"># Tree-value</span> +<span id="L8728" class="LineNr"> 8728 </span><span class="Constant">$container-type:end</span>: +<span id="L8729" class="LineNr"> 8729 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8730" class="LineNr"> 8730 </span> 89/<- %esp 5/r32/ebp +<span id="L8731" class="LineNr"> 8731 </span> 5d/pop-to-ebp +<span id="L8732" class="LineNr"> 8732 </span> c3/return +<span id="L8733" class="LineNr"> 8733 </span> +<span id="L8734" class="LineNr"> 8734 </span><span class="subxFunction">find-or-create-typeinfo</span>: <span class="subxComment"># t: type-id, out: (addr handle typeinfo)</span> +<span id="L8735" class="LineNr"> 8735 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8736" class="LineNr"> 8736 </span> 55/push-ebp +<span id="L8737" class="LineNr"> 8737 </span> 89/<- %ebp 4/r32/esp +<span id="L8738" class="LineNr"> 8738 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8739" class="LineNr"> 8739 </span> 50/push-eax +<span id="L8740" class="LineNr"> 8740 </span> 51/push-ecx +<span id="L8741" class="LineNr"> 8741 </span> 52/push-edx +<span id="L8742" class="LineNr"> 8742 </span> 57/push-edi +<span id="L8743" class="LineNr"> 8743 </span> <span class="subxComment"># edi = out</span> +<span id="L8744" class="LineNr"> 8744 </span> 8b/-> *(ebp+0xc) 7/r32/edi +<span id="L8745" class="LineNr"> 8745 </span> <span class="subxComment"># var fields/ecx: (handle table (handle array byte) (handle typeinfo-entry))</span> +<span id="L8746" class="LineNr"> 8746 </span> 68/push 0/imm32 +<span id="L8747" class="LineNr"> 8747 </span> 68/push 0/imm32 +<span id="L8748" class="LineNr"> 8748 </span> 89/<- %ecx 4/r32/esp +<span id="L8749" class="LineNr"> 8749 </span> <span class="subxComment"># find-typeinfo(t, out)</span> +<span id="L8750" class="LineNr"> 8750 </span> (<a href='mu.subx.html#L8801'>find-typeinfo</a> *(ebp+8) %edi) +<span id="L8751" class="LineNr"> 8751 </span> { +<span id="L8752" class="LineNr"> 8752 </span> <span class="subxComment"># if (*out != 0) break</span> +<span id="L8753" class="LineNr"> 8753 </span> 81 7/subop/compare *edi 0/imm32 +<span id="L8754" class="LineNr"> 8754 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L8755" class="LineNr"> 8755 </span><span class="Constant">$find-or-create-typeinfo:create</span>: +<span id="L8756" class="LineNr"> 8756 </span> <span class="subxComment"># *out = allocate</span> +<span id="L8757" class="LineNr"> 8757 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L419'>Typeinfo-size</a></span> %edi) +<span id="L8758" class="LineNr"> 8758 </span> <span class="subxComment"># var tmp/eax: (addr typeinfo) = lookup(*out)</span> +<span id="L8759" class="LineNr"> 8759 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> +<span id="L8760" class="LineNr"> 8760 </span><span class="CommentedCode">#? (write-buffered Stderr "created typeinfo at ")</span> +<span id="L8761" class="LineNr"> 8761 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L8762" class="LineNr"> 8762 </span><span class="CommentedCode">#? (write-buffered Stderr " for type-id ")</span> +<span id="L8763" class="LineNr"> 8763 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> +<span id="L8764" class="LineNr"> 8764 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8765" class="LineNr"> 8765 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8766" class="LineNr"> 8766 </span> <span class="subxComment"># tmp->id = t</span> +<span id="L8767" class="LineNr"> 8767 </span> 8b/-> *(ebp+8) 2/r32/edx +<span id="L8768" class="LineNr"> 8768 </span> 89/<- *eax 2/r32/edx <span class="subxComment"># Typeinfo-id</span> +<span id="L8769" class="LineNr"> 8769 </span> <span class="subxComment"># tmp->fields = new table</span> +<span id="L8770" class="LineNr"> 8770 </span> <span class="subxS1Comment"># . fields = new table</span> +<span id="L8771" class="LineNr"> 8771 </span> (<a href='../070new-stream.subx.html#L8'>new-stream</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> 0x40 *<span class="SpecialChar"><a href='mu.subx.html#L424'>Typeinfo-fields-row-size</a></span> %ecx) +<span id="L8772" class="LineNr"> 8772 </span> <span class="subxS1Comment"># . tmp->fields = fields</span> +<span id="L8773" class="LineNr"> 8773 </span> 8b/-> *ecx 2/r32/edx +<span id="L8774" class="LineNr"> 8774 </span> 89/<- *(eax+4) 2/r32/edx <span class="subxComment"># Typeinfo-fields</span> +<span id="L8775" class="LineNr"> 8775 </span> 8b/-> *(ecx+4) 2/r32/edx +<span id="L8776" class="LineNr"> 8776 </span> 89/<- *(eax+8) 2/r32/edx <span class="subxComment"># Typeinfo-fields</span> +<span id="L8777" class="LineNr"> 8777 </span> <span class="subxComment"># tmp->next = Program->types</span> +<span id="L8778" class="LineNr"> 8778 </span> 8b/-> *_Program-types 1/r32/ecx +<span id="L8779" class="LineNr"> 8779 </span> 89/<- *(eax+0x10) 1/r32/ecx <span class="subxComment"># Typeinfo-next</span> +<span id="L8780" class="LineNr"> 8780 </span> 8b/-> *_Program-types->payload 1/r32/ecx +<span id="L8781" class="LineNr"> 8781 </span> 89/<- *(eax+0x14) 1/r32/ecx <span class="subxComment"># Typeinfo-next</span> +<span id="L8782" class="LineNr"> 8782 </span> <span class="subxComment"># Program->types = out</span> +<span id="L8783" class="LineNr"> 8783 </span> 8b/-> *edi 1/r32/ecx +<span id="L8784" class="LineNr"> 8784 </span> 89/<- *_Program-types 1/r32/ecx +<span id="L8785" class="LineNr"> 8785 </span> 8b/-> *(edi+4) 1/r32/ecx +<span id="L8786" class="LineNr"> 8786 </span> 89/<- *_Program-types->payload 1/r32/ecx +<span id="L8787" class="LineNr"> 8787 </span> } +<span id="L8788" class="LineNr"> 8788 </span><span class="Constant">$find-or-create-typeinfo:end</span>: +<span id="L8789" class="LineNr"> 8789 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8790" class="LineNr"> 8790 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8791" class="LineNr"> 8791 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8792" class="LineNr"> 8792 </span> 5f/pop-to-edi +<span id="L8793" class="LineNr"> 8793 </span> 5a/pop-to-edx +<span id="L8794" class="LineNr"> 8794 </span> 59/pop-to-ecx +<span id="L8795" class="LineNr"> 8795 </span> 58/pop-to-eax +<span id="L8796" class="LineNr"> 8796 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8797" class="LineNr"> 8797 </span> 89/<- %esp 5/r32/ebp +<span id="L8798" class="LineNr"> 8798 </span> 5d/pop-to-ebp +<span id="L8799" class="LineNr"> 8799 </span> c3/return +<span id="L8800" class="LineNr"> 8800 </span> +<span id="L8801" class="LineNr"> 8801 </span><span class="subxFunction">find-typeinfo</span>: <span class="subxComment"># t: type-id, out: (addr handle typeinfo)</span> +<span id="L8802" class="LineNr"> 8802 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8803" class="LineNr"> 8803 </span> 55/push-ebp +<span id="L8804" class="LineNr"> 8804 </span> 89/<- %ebp 4/r32/esp +<span id="L8805" class="LineNr"> 8805 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8806" class="LineNr"> 8806 </span> 50/push-eax +<span id="L8807" class="LineNr"> 8807 </span> 51/push-ecx +<span id="L8808" class="LineNr"> 8808 </span> 52/push-edx +<span id="L8809" class="LineNr"> 8809 </span> 57/push-edi +<span id="L8810" class="LineNr"> 8810 </span> <span class="subxComment"># ecx = t</span> +<span id="L8811" class="LineNr"> 8811 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L8812" class="LineNr"> 8812 </span> <span class="subxComment"># edi = out</span> +<span id="L8813" class="LineNr"> 8813 </span> 8b/-> *(ebp+0xc) 7/r32/edi +<span id="L8814" class="LineNr"> 8814 </span> <span class="subxComment"># *out = Program->types</span> +<span id="L8815" class="LineNr"> 8815 </span> 8b/-> *_Program-types 0/r32/eax +<span id="L8816" class="LineNr"> 8816 </span> 89/<- *edi 0/r32/eax +<span id="L8817" class="LineNr"> 8817 </span> 8b/-> *_Program-types->payload 0/r32/eax +<span id="L8818" class="LineNr"> 8818 </span> 89/<- *(edi+4) 0/r32/eax +<span id="L8819" class="LineNr"> 8819 </span> { +<span id="L8820" class="LineNr"> 8820 </span> <span class="subxComment"># if (*out == 0) break</span> +<span id="L8821" class="LineNr"> 8821 </span> 81 7/subop/compare *edi 0/imm32 +<span id="L8822" class="LineNr"> 8822 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8823" class="LineNr"> 8823 </span> <span class="subxComment"># var tmp/eax: (addr typeinfo) = lookup(*out)</span> +<span id="L8824" class="LineNr"> 8824 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> +<span id="L8825" class="LineNr"> 8825 </span> <span class="subxComment"># if (tmp->id == t) break</span> +<span id="L8826" class="LineNr"> 8826 </span> 39/compare *eax 1/r32/ecx <span class="subxComment"># Typeinfo-id</span> +<span id="L8827" class="LineNr"> 8827 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L8828" class="LineNr"> 8828 </span> <span class="subxComment"># *out = tmp->next</span> +<span id="L8829" class="LineNr"> 8829 </span> 8b/-> *(eax+0x10) 2/r32/edx <span class="subxComment"># Typeinfo-next</span> +<span id="L8830" class="LineNr"> 8830 </span> 89/<- *edi 2/r32/edx +<span id="L8831" class="LineNr"> 8831 </span> 8b/-> *(eax+0x14) 2/r32/edx <span class="subxComment"># Typeinfo-next</span> +<span id="L8832" class="LineNr"> 8832 </span> 89/<- *(edi+4) 2/r32/edx +<span id="L8833" class="LineNr"> 8833 </span> <span class="subxComment">#</span> +<span id="L8834" class="LineNr"> 8834 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L8835" class="LineNr"> 8835 </span> } +<span id="L8836" class="LineNr"> 8836 </span><span class="Constant">$find-typeinfo:end</span>: +<span id="L8837" class="LineNr"> 8837 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8838" class="LineNr"> 8838 </span> 5f/pop-to-edi +<span id="L8839" class="LineNr"> 8839 </span> 5a/pop-to-edx +<span id="L8840" class="LineNr"> 8840 </span> 59/pop-to-ecx +<span id="L8841" class="LineNr"> 8841 </span> 58/pop-to-eax +<span id="L8842" class="LineNr"> 8842 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8843" class="LineNr"> 8843 </span> 89/<- %esp 5/r32/ebp +<span id="L8844" class="LineNr"> 8844 </span> 5d/pop-to-ebp +<span id="L8845" class="LineNr"> 8845 </span> c3/return +<span id="L8846" class="LineNr"> 8846 </span> +<span id="L8847" class="LineNr"> 8847 </span><span class="subxFunction">find-or-create-typeinfo-output-var</span>: <span class="subxComment"># T: (addr typeinfo), f: (addr slice), out: (addr handle var)</span> +<span id="L8848" class="LineNr"> 8848 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8849" class="LineNr"> 8849 </span> 55/push-ebp +<span id="L8850" class="LineNr"> 8850 </span> 89/<- %ebp 4/r32/esp +<span id="L8851" class="LineNr"> 8851 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8852" class="LineNr"> 8852 </span> 50/push-eax +<span id="L8853" class="LineNr"> 8853 </span> 52/push-edx +<span id="L8854" class="LineNr"> 8854 </span> 57/push-edi +<span id="L8855" class="LineNr"> 8855 </span> <span class="subxComment"># var dest/edi: (handle typeinfo-entry)</span> +<span id="L8856" class="LineNr"> 8856 </span> 68/push 0/imm32 +<span id="L8857" class="LineNr"> 8857 </span> 68/push 0/imm32 +<span id="L8858" class="LineNr"> 8858 </span> 89/<- %edi 4/r32/esp +<span id="L8859" class="LineNr"> 8859 </span> <span class="subxComment"># find-or-create-typeinfo-fields(T, f, dest)</span> +<span id="L8860" class="LineNr"> 8860 </span> (<a href='mu.subx.html#L8912'>find-or-create-typeinfo-fields</a> *(ebp+8) *(ebp+0xc) %edi) +<span id="L8861" class="LineNr"> 8861 </span> <span class="subxComment"># var dest-addr/edi: (addr typeinfo-entry) = lookup(dest)</span> +<span id="L8862" class="LineNr"> 8862 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># => eax</span> +<span id="L8863" class="LineNr"> 8863 </span> 89/<- %edi 0/r32/eax +<span id="L8864" class="LineNr"> 8864 </span> <span class="subxComment"># if dest-addr->output-var doesn't exist, create it</span> +<span id="L8865" class="LineNr"> 8865 </span> { +<span id="L8866" class="LineNr"> 8866 </span> 81 7/subop/compare *(edi+0xc) 0/imm32 <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L8867" class="LineNr"> 8867 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L8868" class="LineNr"> 8868 </span> <span class="subxComment"># dest-addr->output-var = new var(dummy name, type, -1 offset)</span> +<span id="L8869" class="LineNr"> 8869 </span> <span class="subxS1Comment"># . var name/eax: (handle array byte) = "field"</span> +<span id="L8870" class="LineNr"> 8870 </span> 68/push 0/imm32 +<span id="L8871" class="LineNr"> 8871 </span> 68/push 0/imm32 +<span id="L8872" class="LineNr"> 8872 </span> 89/<- %eax 4/r32/esp +<span id="L8873" class="LineNr"> 8873 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"field"</span> %eax) +<span id="L8874" class="LineNr"> 8874 </span> <span class="subxS1Comment"># . new var</span> +<span id="L8875" class="LineNr"> 8875 </span> 8d/copy-address *(edi+0xc) 2/r32/edx +<span id="L8876" class="LineNr"> 8876 </span> (<a href='mu.subx.html#L8318'>new-var</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *eax *(eax+4) %edx) +<span id="L8877" class="LineNr"> 8877 </span> <span class="subxS1Comment"># . reclaim name</span> +<span id="L8878" class="LineNr"> 8878 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8879" class="LineNr"> 8879 </span> <span class="subxComment"># var result/edx: (addr var) = lookup(dest-addr->output-var)</span> +<span id="L8880" class="LineNr"> 8880 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0xc) *(edi+0x10)) <span class="subxComment"># => eax</span> +<span id="L8881" class="LineNr"> 8881 </span> 89/<- %edx 0/r32/eax +<span id="L8882" class="LineNr"> 8882 </span> <span class="subxComment"># result->type = new constant type</span> +<span id="L8883" class="LineNr"> 8883 </span> 8d/copy-address *(edx+8) 0/r32/eax <span class="subxComment"># Var-type</span> +<span id="L8884" class="LineNr"> 8884 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L374'>Tree-size</a></span> %eax) +<span id="L8885" class="LineNr"> 8885 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># => eax</span> +<span id="L8886" class="LineNr"> 8886 </span> c7 0/subop/copy *eax 1/imm32/true <span class="subxComment"># Tree-is-atom</span> +<span id="L8887" class="LineNr"> 8887 </span> c7 0/subop/copy *(eax+4) 6/imm32/constant <span class="subxComment"># Tree-value</span> +<span id="L8888" class="LineNr"> 8888 </span> c7 0/subop/copy *(eax+8) 0/imm32 <span class="subxComment"># Tree-left</span> +<span id="L8889" class="LineNr"> 8889 </span> c7 0/subop/copy *(eax+0xc) 0/imm32 <span class="subxComment"># Tree-right</span> +<span id="L8890" class="LineNr"> 8890 </span> c7 0/subop/copy *(eax+0x10) 0/imm32 <span class="subxComment"># Tree-right</span> +<span id="L8891" class="LineNr"> 8891 </span> <span class="subxComment"># result->offset isn't filled out yet</span> +<span id="L8892" class="LineNr"> 8892 </span> c7 0/subop/copy *(edx+0x14) -1/imm32/uninitialized <span class="subxComment"># Var-offset</span> +<span id="L8893" class="LineNr"> 8893 </span> } +<span id="L8894" class="LineNr"> 8894 </span> <span class="subxComment"># out = dest-addr->output-var</span> +<span id="L8895" class="LineNr"> 8895 </span> 8b/-> *(ebp+0x10) 2/r32/edx +<span id="L8896" class="LineNr"> 8896 </span> 8b/-> *(edi+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L8897" class="LineNr"> 8897 </span> 89/<- *edx 0/r32/eax +<span id="L8898" class="LineNr"> 8898 </span> 8b/-> *(edi+0x10) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L8899" class="LineNr"> 8899 </span> 89/<- *(edx+4) 0/r32/eax +<span id="L8900" class="LineNr"> 8900 </span><span class="Constant">$find-or-create-typeinfo-output-var:end</span>: +<span id="L8901" class="LineNr"> 8901 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L8902" class="LineNr"> 8902 </span> 81 0/subop/add %esp 8/imm32 +<span id="L8903" class="LineNr"> 8903 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8904" class="LineNr"> 8904 </span> 5f/pop-to-edi +<span id="L8905" class="LineNr"> 8905 </span> 5a/pop-to-edx +<span id="L8906" class="LineNr"> 8906 </span> 58/pop-to-eax +<span id="L8907" class="LineNr"> 8907 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8908" class="LineNr"> 8908 </span> 89/<- %esp 5/r32/ebp +<span id="L8909" class="LineNr"> 8909 </span> 5d/pop-to-ebp +<span id="L8910" class="LineNr"> 8910 </span> c3/return +<span id="L8911" class="LineNr"> 8911 </span> +<span id="L8912" class="LineNr"> 8912 </span><span class="subxFunction">find-or-create-typeinfo-fields</span>: <span class="subxComment"># T: (addr typeinfo), f: (addr slice), out: (addr handle typeinfo-entry)</span> +<span id="L8913" class="LineNr"> 8913 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8914" class="LineNr"> 8914 </span> 55/push-ebp +<span id="L8915" class="LineNr"> 8915 </span> 89/<- %ebp 4/r32/esp +<span id="L8916" class="LineNr"> 8916 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8917" class="LineNr"> 8917 </span> 50/push-eax +<span id="L8918" class="LineNr"> 8918 </span> 56/push-esi +<span id="L8919" class="LineNr"> 8919 </span> 57/push-edi +<span id="L8920" class="LineNr"> 8920 </span> <span class="subxComment"># eax = lookup(T->fields)</span> +<span id="L8921" class="LineNr"> 8921 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L8922" class="LineNr"> 8922 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> +<span id="L8923" class="LineNr"> 8923 </span> <span class="subxComment"># edi = out</span> +<span id="L8924" class="LineNr"> 8924 </span> 8b/-> *(ebp+0x10) 7/r32/edi +<span id="L8925" class="LineNr"> 8925 </span> <span class="subxComment"># var src/esi: (addr handle typeinfo-entry) = get-or-insert-slice(T->fields, f)</span> +<span id="L8926" class="LineNr"> 8926 </span> (<a href='../081table.subx.html#L1022'>get-or-insert-slice</a> %eax *(ebp+0xc) *<span class="SpecialChar"><a href='mu.subx.html#L424'>Typeinfo-fields-row-size</a></span> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span>) <span class="subxComment"># => eax</span> +<span id="L8927" class="LineNr"> 8927 </span> 89/<- %esi 0/r32/eax +<span id="L8928" class="LineNr"> 8928 </span> <span class="subxComment"># if src doesn't exist, allocate it</span> +<span id="L8929" class="LineNr"> 8929 </span> { +<span id="L8930" class="LineNr"> 8930 </span> 81 7/subop/compare *esi 0/imm32 +<span id="L8931" class="LineNr"> 8931 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L8932" class="LineNr"> 8932 </span> (<a href='../069allocate.subx.html#L66'>allocate</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> *<span class="SpecialChar"><a href='mu.subx.html#L440'>Typeinfo-entry-size</a></span> %esi) +<span id="L8933" class="LineNr"> 8933 </span><span class="CommentedCode">#? (write-buffered Stderr "handle at ")</span> +<span id="L8934" class="LineNr"> 8934 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %esi)</span> +<span id="L8935" class="LineNr"> 8935 </span><span class="CommentedCode">#? (write-buffered Stderr ": ")</span> +<span id="L8936" class="LineNr"> 8936 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *esi)</span> +<span id="L8937" class="LineNr"> 8937 </span><span class="CommentedCode">#? (write-buffered Stderr " ")</span> +<span id="L8938" class="LineNr"> 8938 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(esi+4))</span> +<span id="L8939" class="LineNr"> 8939 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8940" class="LineNr"> 8940 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8941" class="LineNr"> 8941 </span><span class="CommentedCode">#? (lookup *esi *(esi+4))</span> +<span id="L8942" class="LineNr"> 8942 </span><span class="CommentedCode">#? (write-buffered Stderr "created typeinfo fields at ")</span> +<span id="L8943" class="LineNr"> 8943 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %esi)</span> +<span id="L8944" class="LineNr"> 8944 </span><span class="CommentedCode">#? (write-buffered Stderr " for ")</span> +<span id="L8945" class="LineNr"> 8945 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> +<span id="L8946" class="LineNr"> 8946 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L8947" class="LineNr"> 8947 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L8948" class="LineNr"> 8948 </span> } +<span id="L8949" class="LineNr"> 8949 </span> <span class="subxComment"># *out = src</span> +<span id="L8950" class="LineNr"> 8950 </span> <span class="subxS1Comment"># . *edi = *src</span> +<span id="L8951" class="LineNr"> 8951 </span> 8b/-> *esi 0/r32/eax +<span id="L8952" class="LineNr"> 8952 </span> 89/<- *edi 0/r32/eax +<span id="L8953" class="LineNr"> 8953 </span> 8b/-> *(esi+4) 0/r32/eax +<span id="L8954" class="LineNr"> 8954 </span> 89/<- *(edi+4) 0/r32/eax +<span id="L8955" class="LineNr"> 8955 </span><span class="Constant">$find-or-create-typeinfo-fields:end</span>: +<span id="L8956" class="LineNr"> 8956 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L8957" class="LineNr"> 8957 </span> 5f/pop-to-edi +<span id="L8958" class="LineNr"> 8958 </span> 5e/pop-to-esi +<span id="L8959" class="LineNr"> 8959 </span> 58/pop-to-eax +<span id="L8960" class="LineNr"> 8960 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L8961" class="LineNr"> 8961 </span> 89/<- %esp 5/r32/ebp +<span id="L8962" class="LineNr"> 8962 </span> 5d/pop-to-ebp +<span id="L8963" class="LineNr"> 8963 </span> c3/return +<span id="L8964" class="LineNr"> 8964 </span> +<span id="L8965" class="LineNr"> 8965 </span><span class="subxFunction">populate-mu-type</span>: <span class="subxComment"># in: (addr stream byte), t: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L8966" class="LineNr"> 8966 </span> <span class="subxComment"># pseudocode:</span> +<span id="L8967" class="LineNr"> 8967 </span> <span class="subxComment"># var line: (stream byte 512)</span> +<span id="L8968" class="LineNr"> 8968 </span> <span class="subxComment"># curr-index = 0</span> +<span id="L8969" class="LineNr"> 8969 </span> <span class="subxComment"># while true</span> +<span id="L8970" class="LineNr"> 8970 </span> <span class="subxComment"># clear-stream(line)</span> +<span id="L8971" class="LineNr"> 8971 </span> <span class="subxComment"># read-line-buffered(in, line)</span> +<span id="L8972" class="LineNr"> 8972 </span> <span class="subxComment"># if line->write == 0</span> +<span id="L8973" class="LineNr"> 8973 </span> <span class="subxComment"># abort</span> +<span id="L8974" class="LineNr"> 8974 </span> <span class="subxComment"># word-slice = next-mu-token(line)</span> +<span id="L8975" class="LineNr"> 8975 </span> <span class="subxComment"># if slice-empty?(word-slice) # end of line</span> +<span id="L8976" class="LineNr"> 8976 </span> <span class="subxComment"># continue</span> +<span id="L8977" class="LineNr"> 8977 </span> <span class="subxComment"># if slice-equal?(word-slice, "}")</span> +<span id="L8978" class="LineNr"> 8978 </span> <span class="subxComment"># break</span> +<span id="L8979" class="LineNr"> 8979 </span> <span class="subxComment"># var v: (handle var) = parse-var-with-type(word-slice, line)</span> +<span id="L8980" class="LineNr"> 8980 </span> <span class="subxComment"># var r: (handle typeinfo-fields) = find-or-create-typeinfo-fields(t, word-slice/v->name)</span> +<span id="L8981" class="LineNr"> 8981 </span> <span class="subxComment"># TODO: ensure that r->first is null</span> +<span id="L8982" class="LineNr"> 8982 </span> <span class="subxComment"># r->index = curr-index</span> +<span id="L8983" class="LineNr"> 8983 </span> <span class="subxComment"># curr-index++</span> +<span id="L8984" class="LineNr"> 8984 </span> <span class="subxComment"># r->input-var = v</span> +<span id="L8985" class="LineNr"> 8985 </span> <span class="subxComment"># if r->output-var == 0</span> +<span id="L8986" class="LineNr"> 8986 </span> <span class="subxComment"># r->output-var = new literal</span> +<span id="L8987" class="LineNr"> 8987 </span> <span class="subxComment"># TODO: ensure nothing else in line</span> +<span id="L8988" class="LineNr"> 8988 </span> <span class="subxComment"># t->total-size-in-bytes = -2 (not yet initialized)</span> +<span id="L8989" class="LineNr"> 8989 </span> <span class="subxComment"># check-input-vars(t, err, ed)</span> +<span id="L8990" class="LineNr"> 8990 </span> <span class="subxComment">#</span> +<span id="L8991" class="LineNr"> 8991 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L8992" class="LineNr"> 8992 </span> 55/push-ebp +<span id="L8993" class="LineNr"> 8993 </span> 89/<- %ebp 4/r32/esp +<span id="L8994" class="LineNr"> 8994 </span> <span class="subxComment"># var curr-index: int at *(ebp-4)</span> +<span id="L8995" class="LineNr"> 8995 </span> 68/push 0/imm32 +<span id="L8996" class="LineNr"> 8996 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L8997" class="LineNr"> 8997 </span> 50/push-eax +<span id="L8998" class="LineNr"> 8998 </span> 51/push-ecx +<span id="L8999" class="LineNr"> 8999 </span> 52/push-edx +<span id="L9000" class="LineNr"> 9000 </span> 53/push-ebx +<span id="L9001" class="LineNr"> 9001 </span> 56/push-esi +<span id="L9002" class="LineNr"> 9002 </span> 57/push-edi +<span id="L9003" class="LineNr"> 9003 </span> <span class="subxComment"># edi = t</span> +<span id="L9004" class="LineNr"> 9004 </span> 8b/-> *(ebp+0xc) 7/r32/edi +<span id="L9005" class="LineNr"> 9005 </span> <span class="subxComment"># var line/ecx: (stream byte 512)</span> +<span id="L9006" class="LineNr"> 9006 </span> 81 5/subop/subtract %esp 0x200/imm32 +<span id="L9007" class="LineNr"> 9007 </span> 68/push 0x200/imm32/size +<span id="L9008" class="LineNr"> 9008 </span> 68/push 0/imm32/read +<span id="L9009" class="LineNr"> 9009 </span> 68/push 0/imm32/write +<span id="L9010" class="LineNr"> 9010 </span> 89/<- %ecx 4/r32/esp +<span id="L9011" class="LineNr"> 9011 </span> <span class="subxComment"># var word-slice/edx: slice</span> +<span id="L9012" class="LineNr"> 9012 </span> 68/push 0/imm32/end +<span id="L9013" class="LineNr"> 9013 </span> 68/push 0/imm32/start +<span id="L9014" class="LineNr"> 9014 </span> 89/<- %edx 4/r32/esp +<span id="L9015" class="LineNr"> 9015 </span> <span class="subxComment"># var v/esi: (handle var)</span> +<span id="L9016" class="LineNr"> 9016 </span> 68/push 0/imm32 +<span id="L9017" class="LineNr"> 9017 </span> 68/push 0/imm32 +<span id="L9018" class="LineNr"> 9018 </span> 89/<- %esi 4/r32/esp +<span id="L9019" class="LineNr"> 9019 </span> <span class="subxComment"># var r/ebx: (handle typeinfo-entry)</span> +<span id="L9020" class="LineNr"> 9020 </span> 68/push 0/imm32 +<span id="L9021" class="LineNr"> 9021 </span> 68/push 0/imm32 +<span id="L9022" class="LineNr"> 9022 </span> 89/<- %ebx 4/r32/esp +<span id="L9023" class="LineNr"> 9023 </span> { +<span id="L9024" class="LineNr"> 9024 </span><span class="Constant">$populate-mu-type:line-loop</span>: +<span id="L9025" class="LineNr"> 9025 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> %ecx) +<span id="L9026" class="LineNr"> 9026 </span> (<a href='../071read-line.subx.html#L9'>read-line-buffered</a> *(ebp+8) %ecx) +<span id="L9027" class="LineNr"> 9027 </span> <span class="subxComment"># if (line->write == 0) abort</span> +<span id="L9028" class="LineNr"> 9028 </span> 81 7/subop/compare *ecx 0/imm32 +<span id="L9029" class="LineNr"> 9029 </span> 0f 84/jump-if-= $populate-mu-type:abort/disp32 +<span id="L9030" class="Folded"> 9030 </span><span class="Folded">+-- 6 lines: #? # dump line ------------------------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L9036" class="LineNr"> 9036 </span> (<a href='mu.subx.html#L6008'>next-mu-token</a> %ecx %edx) +<span id="L9037" class="LineNr"> 9037 </span> <span class="subxComment"># if slice-empty?(word-slice) continue</span> +<span id="L9038" class="LineNr"> 9038 </span> (<a href='../072slice.subx.html#L9'>slice-empty?</a> %edx) <span class="subxComment"># => eax</span> +<span id="L9039" class="LineNr"> 9039 </span> 3d/compare-eax-and 0/imm32 +<span id="L9040" class="LineNr"> 9040 </span> 0f 85/jump-if-!= <span class="Constant">loop</span>/disp32 +<span id="L9041" class="LineNr"> 9041 </span> <span class="subxComment"># if slice-equal?(word-slice, "}") break</span> +<span id="L9042" class="LineNr"> 9042 </span> (<a href='../072slice.subx.html#L120'>slice-equal?</a> %edx <span class="Constant">"}"</span>) +<span id="L9043" class="LineNr"> 9043 </span> 3d/compare-eax-and 0/imm32 +<span id="L9044" class="LineNr"> 9044 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L9045" class="LineNr"> 9045 </span><span class="Constant">$populate-mu-type:parse-element</span>: +<span id="L9046" class="LineNr"> 9046 </span> <span class="subxComment"># v = parse-var-with-type(word-slice, first-line)</span> +<span id="L9047" class="LineNr"> 9047 </span> <span class="subxComment"># must do this first to strip the trailing ':' from word-slice before</span> +<span id="L9048" class="LineNr"> 9048 </span> <span class="subxComment"># using it in find-or-create-typeinfo-fields below</span> +<span id="L9049" class="LineNr"> 9049 </span> <span class="subxComment"># TODO: clean up that mutation in parse-var-with-type</span> +<span id="L9050" class="LineNr"> 9050 </span> (<a href='mu.subx.html#L5746'>parse-var-with-type</a> %edx %ecx %esi *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L9051" class="LineNr"> 9051 </span> <span class="subxComment"># var tmp/ecx</span> +<span id="L9052" class="LineNr"> 9052 </span> 51/push-ecx +<span id="L9053" class="LineNr"> 9053 </span><span class="Constant">$populate-mu-type:create-typeinfo-fields</span>: +<span id="L9054" class="LineNr"> 9054 </span> <span class="subxComment"># var r/ebx: (handle typeinfo-entry)</span> +<span id="L9055" class="LineNr"> 9055 </span> (<a href='mu.subx.html#L8912'>find-or-create-typeinfo-fields</a> %edi %edx %ebx) +<span id="L9056" class="LineNr"> 9056 </span> <span class="subxComment"># r->index = curr-index</span> +<span id="L9057" class="LineNr"> 9057 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># => eax</span> +<span id="L9058" class="LineNr"> 9058 </span> 8b/-> *(ebp-4) 1/r32/ecx +<span id="L9059" class="LineNr"> 9059 </span><span class="CommentedCode">#? (write-buffered Stderr "saving index ")</span> +<span id="L9060" class="LineNr"> 9060 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ecx)</span> +<span id="L9061" class="LineNr"> 9061 </span><span class="CommentedCode">#? (write-buffered Stderr " at ")</span> +<span id="L9062" class="LineNr"> 9062 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %edi)</span> +<span id="L9063" class="LineNr"> 9063 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L9064" class="LineNr"> 9064 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L9065" class="LineNr"> 9065 </span> 89/<- *(eax+8) 1/r32/ecx <span class="subxComment"># Typeinfo-entry-index</span> +<span id="L9066" class="LineNr"> 9066 </span> <span class="subxComment"># ++curr-index</span> +<span id="L9067" class="LineNr"> 9067 </span> ff 0/subop/increment *(ebp-4) +<span id="L9068" class="LineNr"> 9068 </span><span class="Constant">$populate-mu-type:set-input-type</span>: +<span id="L9069" class="LineNr"> 9069 </span> <span class="subxComment"># r->input-var = v</span> +<span id="L9070" class="LineNr"> 9070 </span> 8b/-> *esi 1/r32/ecx +<span id="L9071" class="LineNr"> 9071 </span> 89/<- *eax 1/r32/ecx <span class="subxComment"># Typeinfo-entry-input-var</span> +<span id="L9072" class="LineNr"> 9072 </span> 8b/-> *(esi+4) 1/r32/ecx +<span id="L9073" class="LineNr"> 9073 </span> 89/<- *(eax+4) 1/r32/ecx <span class="subxComment"># Typeinfo-entry-input-var</span> +<span id="L9074" class="LineNr"> 9074 </span> 59/pop-to-ecx +<span id="L9075" class="LineNr"> 9075 </span> { +<span id="L9076" class="LineNr"> 9076 </span><span class="Constant">$populate-mu-type:create-output-type</span>: +<span id="L9077" class="LineNr"> 9077 </span> <span class="subxComment"># if (r->output-var == 0) create a new var with some placeholder data</span> +<span id="L9078" class="LineNr"> 9078 </span> 81 7/subop/compare *(eax+0xc) 0/imm32 <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L9079" class="LineNr"> 9079 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9080" class="LineNr"> 9080 </span> 8d/copy-address *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L9081" class="LineNr"> 9081 </span> (<a href='mu.subx.html#L8403'>new-literal</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> %edx %eax) +<span id="L9082" class="LineNr"> 9082 </span> } +<span id="L9083" class="LineNr"> 9083 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L9084" class="LineNr"> 9084 </span> } +<span id="L9085" class="LineNr"> 9085 </span><span class="Constant">$populate-mu-type:invalidate-total-size-in-bytes</span>: +<span id="L9086" class="LineNr"> 9086 </span> <span class="subxComment"># Offsets and total size may not be accurate here since we may not yet</span> +<span id="L9087" class="LineNr"> 9087 </span> <span class="subxComment"># have encountered the element types.</span> +<span id="L9088" class="LineNr"> 9088 </span> <span class="subxComment"># We'll recompute them separately after parsing the entire program.</span> +<span id="L9089" class="LineNr"> 9089 </span> c7 0/subop/copy *(edi+0xc) -2/imm32/uninitialized <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9090" class="LineNr"> 9090 </span><span class="Constant">$populate-mu-type:validate</span>: +<span id="L9091" class="LineNr"> 9091 </span> (<a href='mu.subx.html#L9119'>check-input-vars</a> *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L9092" class="LineNr"> 9092 </span><span class="Constant">$populate-mu-type:end</span>: +<span id="L9093" class="LineNr"> 9093 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L9094" class="LineNr"> 9094 </span> 81 0/subop/add %esp 0x224/imm32 +<span id="L9095" class="LineNr"> 9095 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9096" class="LineNr"> 9096 </span> 5f/pop-to-edi +<span id="L9097" class="LineNr"> 9097 </span> 5e/pop-to-esi +<span id="L9098" class="LineNr"> 9098 </span> 5b/pop-to-ebx +<span id="L9099" class="LineNr"> 9099 </span> 5a/pop-to-edx +<span id="L9100" class="LineNr"> 9100 </span> 59/pop-to-ecx +<span id="L9101" class="LineNr"> 9101 </span> 58/pop-to-eax +<span id="L9102" class="LineNr"> 9102 </span> <span class="subxComment"># reclaim curr-index</span> +<span id="L9103" class="LineNr"> 9103 </span> 81 0/subop/add %esp 4/imm32 +<span id="L9104" class="LineNr"> 9104 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9105" class="LineNr"> 9105 </span> 89/<- %esp 5/r32/ebp +<span id="L9106" class="LineNr"> 9106 </span> 5d/pop-to-ebp +<span id="L9107" class="LineNr"> 9107 </span> c3/return +<span id="L9108" class="LineNr"> 9108 </span> +<span id="L9109" class="LineNr"> 9109 </span><span class="Constant">$populate-mu-type:abort</span>: +<span id="L9110" class="LineNr"> 9110 </span> <span class="subxComment"># error("unexpected top-level command: " word-slice "\n")</span> +<span id="L9111" class="LineNr"> 9111 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"incomplete type definition '"</span>) +<span id="L9112" class="LineNr"> 9112 </span> (<a href='mu.subx.html#L9183'>type-name</a> *edi) <span class="subxComment"># Typeinfo-id => eax</span> +<span id="L9113" class="LineNr"> 9113 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9114" class="LineNr"> 9114 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"\n"</span>) +<span id="L9115" class="LineNr"> 9115 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L9116" class="LineNr"> 9116 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L9117" class="LineNr"> 9117 </span> <span class="subxComment"># never gets here</span> +<span id="L9118" class="LineNr"> 9118 </span> +<span id="L9119" class="LineNr"> 9119 </span><span class="subxFunction">check-input-vars</span>: <span class="subxComment"># t: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9120" class="LineNr"> 9120 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9121" class="LineNr"> 9121 </span> 55/push-ebp +<span id="L9122" class="LineNr"> 9122 </span> 89/<- %ebp 4/r32/esp +<span id="L9123" class="LineNr"> 9123 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9124" class="LineNr"> 9124 </span> 50/push-eax +<span id="L9125" class="LineNr"> 9125 </span> 51/push-ecx +<span id="L9126" class="LineNr"> 9126 </span> 52/push-edx +<span id="L9127" class="LineNr"> 9127 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(t->fields)</span> +<span id="L9128" class="LineNr"> 9128 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L9129" class="LineNr"> 9129 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> +<span id="L9130" class="LineNr"> 9130 </span> 89/<- %ecx 0/r32/eax +<span id="L9131" class="LineNr"> 9131 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> +<span id="L9132" class="LineNr"> 9132 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> +<span id="L9133" class="LineNr"> 9133 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> +<span id="L9134" class="LineNr"> 9134 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx +<span id="L9135" class="LineNr"> 9135 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> +<span id="L9136" class="LineNr"> 9136 </span> 8d/copy-address *(ecx+edx) 2/r32/edx +<span id="L9137" class="LineNr"> 9137 </span> { +<span id="L9138" class="LineNr"> 9138 </span><span class="Constant">$check-input-vars:loop</span>: +<span id="L9139" class="LineNr"> 9139 </span> <span class="subxComment"># if (curr >= max) break</span> +<span id="L9140" class="LineNr"> 9140 </span> 39/compare %ecx 2/r32/edx +<span id="L9141" class="LineNr"> 9141 </span> 73/jump-if-addr>= <span class="Constant">break</span>/disp8 +<span id="L9142" class="LineNr"> 9142 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> +<span id="L9143" class="LineNr"> 9143 </span> <span class="subxComment"># var t2/eax: (addr typeinfo-entry) = lookup(curr->value)</span> +<span id="L9144" class="LineNr"> 9144 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> +<span id="L9145" class="LineNr"> 9145 </span> <span class="subxComment"># if (t2->input-var == null) raise an error</span> +<span id="L9146" class="LineNr"> 9146 </span> 8b/-> *eax 0/r32/eax <span class="subxComment"># Typeinfo-entry-input-var</span> +<span id="L9147" class="LineNr"> 9147 </span> 3d/compare-eax-and 0/imm32/null +<span id="L9148" class="LineNr"> 9148 </span> 0f 84/jump-if-= $check-input-vars:abort/disp32 +<span id="L9149" class="LineNr"> 9149 </span> <span class="subxComment"># curr += row-size</span> +<span id="L9150" class="LineNr"> 9150 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> +<span id="L9151" class="LineNr"> 9151 </span> <span class="subxComment">#</span> +<span id="L9152" class="LineNr"> 9152 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9153" class="LineNr"> 9153 </span> } +<span id="L9154" class="LineNr"> 9154 </span><span class="Constant">$check-input-vars:end</span>: +<span id="L9155" class="LineNr"> 9155 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9156" class="LineNr"> 9156 </span> 5a/pop-to-edx +<span id="L9157" class="LineNr"> 9157 </span> 59/pop-to-ecx +<span id="L9158" class="LineNr"> 9158 </span> 58/pop-to-eax +<span id="L9159" class="LineNr"> 9159 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9160" class="LineNr"> 9160 </span> 89/<- %esp 5/r32/ebp +<span id="L9161" class="LineNr"> 9161 </span> 5d/pop-to-ebp +<span id="L9162" class="LineNr"> 9162 </span> c3/return +<span id="L9163" class="LineNr"> 9163 </span> +<span id="L9164" class="LineNr"> 9164 </span><span class="Constant">$check-input-vars:abort</span>: +<span id="L9165" class="LineNr"> 9165 </span> <span class="subxComment"># error("type " type " has no member called '" curr->name "'\n")</span> +<span id="L9166" class="LineNr"> 9166 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"type '"</span>) +<span id="L9167" class="LineNr"> 9167 </span> <span class="subxS1Comment"># . var tmp/edx: int = t->id << 2</span> +<span id="L9168" class="LineNr"> 9168 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L9169" class="LineNr"> 9169 </span> 8b/-> *eax 2/r32/edx <span class="subxComment"># Typeinfo-id</span> +<span id="L9170" class="LineNr"> 9170 </span> c1/shift 4/subop/left %edx 2/imm8 +<span id="L9171" class="LineNr"> 9171 </span> <span class="subxS1Comment"># . var a/edx: (addr array byte) = Type-id->data[tmp]</span> +<span id="L9172" class="LineNr"> 9172 </span> b8/copy-to-eax <span class="SpecialChar"><a href='mu.subx.html#L380'>Type-id</a></span>/imm32 +<span id="L9173" class="LineNr"> 9173 </span> 8b/-> *(eax+edx+0xc) 2/r32/edx +<span id="L9174" class="LineNr"> 9174 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %edx) +<span id="L9175" class="LineNr"> 9175 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has no member called '"</span>) +<span id="L9176" class="LineNr"> 9176 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> +<span id="L9177" class="LineNr"> 9177 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) +<span id="L9178" class="LineNr"> 9178 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"'\n"</span>) +<span id="L9179" class="LineNr"> 9179 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) +<span id="L9180" class="LineNr"> 9180 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) +<span id="L9181" class="LineNr"> 9181 </span> <span class="subxComment"># never gets here</span> +<span id="L9182" class="LineNr"> 9182 </span> +<span id="L9183" class="LineNr"> 9183 </span><span class="subxFunction">type-name</span>: <span class="subxComment"># index: int -> result/eax: (addr array byte)</span> +<span id="L9184" class="LineNr"> 9184 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9185" class="LineNr"> 9185 </span> 55/push-ebp +<span id="L9186" class="LineNr"> 9186 </span> 89/<- %ebp 4/r32/esp +<span id="L9187" class="LineNr"> 9187 </span> <span class="subxComment">#</span> +<span id="L9188" class="LineNr"> 9188 </span> (index <span class="SpecialChar"><a href='mu.subx.html#L380'>Type-id</a></span> *(ebp+8)) +<span id="L9189" class="LineNr"> 9189 </span><span class="Constant">$type-name:end</span>: +<span id="L9190" class="LineNr"> 9190 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9191" class="LineNr"> 9191 </span> 89/<- %esp 5/r32/ebp +<span id="L9192" class="LineNr"> 9192 </span> 5d/pop-to-ebp +<span id="L9193" class="LineNr"> 9193 </span> c3/return +<span id="L9194" class="LineNr"> 9194 </span> +<span id="L9195" class="LineNr"> 9195 </span><span class="subxFunction">index</span>: <span class="subxComment"># arr: (addr stream (handle array byte)), index: int -> result/eax: (addr array byte)</span> <span id="L9196" class="LineNr"> 9196 </span> <span class="subxS1Comment"># . prologue</span> <span id="L9197" class="LineNr"> 9197 </span> 55/push-ebp <span id="L9198" class="LineNr"> 9198 </span> 89/<- %ebp 4/r32/esp -<span id="L9199" class="LineNr"> 9199 </span><span class="Constant">$populate-mu-type-sizes:total-sizes</span>: -<span id="L9200" class="LineNr"> 9200 </span> <span class="subxComment"># var curr/eax: (addr typeinfo) = lookup(Program->types)</span> -<span id="L9201" class="LineNr"> 9201 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> -<span id="L9202" class="LineNr"> 9202 </span> { -<span id="L9203" class="LineNr"> 9203 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L9204" class="LineNr"> 9204 </span> 3d/compare-eax-and 0/imm32/null -<span id="L9205" class="LineNr"> 9205 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9206" class="LineNr"> 9206 </span> (<a href='mu.subx.html#L9232'>populate-mu-type-sizes-in-type</a> %eax *(ebp+8) *(ebp+0xc)) -<span id="L9207" class="LineNr"> 9207 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L9208" class="LineNr"> 9208 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> -<span id="L9209" class="LineNr"> 9209 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9210" class="LineNr"> 9210 </span> } -<span id="L9211" class="LineNr"> 9211 </span><span class="Constant">$populate-mu-type-sizes:offsets</span>: -<span id="L9212" class="LineNr"> 9212 </span> <span class="subxComment"># curr = *Program->types</span> -<span id="L9213" class="LineNr"> 9213 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> -<span id="L9214" class="LineNr"> 9214 </span> { -<span id="L9215" class="LineNr"> 9215 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L9216" class="LineNr"> 9216 </span> 3d/compare-eax-and 0/imm32/null -<span id="L9217" class="LineNr"> 9217 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9218" class="LineNr"> 9218 </span> (<a href='mu.subx.html#L9385'>populate-mu-type-offsets</a> %eax *(ebp+8) *(ebp+0xc)) -<span id="L9219" class="LineNr"> 9219 </span> <span class="subxComment"># curr = curr->next</span> -<span id="L9220" class="LineNr"> 9220 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> -<span id="L9221" class="LineNr"> 9221 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9222" class="LineNr"> 9222 </span> } -<span id="L9223" class="LineNr"> 9223 </span><span class="Constant">$populate-mu-type-sizes:end</span>: -<span id="L9224" class="LineNr"> 9224 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9225" class="LineNr"> 9225 </span> 89/<- %esp 5/r32/ebp -<span id="L9226" class="LineNr"> 9226 </span> 5d/pop-to-ebp -<span id="L9227" class="LineNr"> 9227 </span> c3/return -<span id="L9228" class="LineNr"> 9228 </span> -<span id="L9229" class="LineNr"> 9229 </span><span class="subxComment"># compute sizes of all fields, recursing as necessary</span> -<span id="L9230" class="LineNr"> 9230 </span><span class="subxComment"># sum up all their sizes to arrive at total size</span> -<span id="L9231" class="LineNr"> 9231 </span><span class="subxComment"># fields may be out of order, but that doesn't affect the answer</span> -<span id="L9232" class="LineNr"> 9232 </span><span class="subxFunction">populate-mu-type-sizes-in-type</span>: <span class="subxComment"># T: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9233" class="LineNr"> 9233 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9234" class="LineNr"> 9234 </span> 55/push-ebp -<span id="L9235" class="LineNr"> 9235 </span> 89/<- %ebp 4/r32/esp -<span id="L9236" class="LineNr"> 9236 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9237" class="LineNr"> 9237 </span> 50/push-eax -<span id="L9238" class="LineNr"> 9238 </span> 51/push-ecx -<span id="L9239" class="LineNr"> 9239 </span> 52/push-edx -<span id="L9240" class="LineNr"> 9240 </span> 56/push-esi -<span id="L9241" class="LineNr"> 9241 </span> 57/push-edi -<span id="L9242" class="LineNr"> 9242 </span> <span class="subxComment"># esi = T</span> -<span id="L9243" class="LineNr"> 9243 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9244" class="LineNr"> 9244 </span> <span class="subxComment"># if T is already computed, return</span> -<span id="L9245" class="LineNr"> 9245 </span> 81 7/subop/compare *(esi+0xc) 0/imm32 <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9246" class="LineNr"> 9246 </span> 0f 8d/jump-if->= $populate-mu-type-sizes-in-type:end/disp32 -<span id="L9247" class="LineNr"> 9247 </span> <span class="subxComment"># if T is being computed, abort</span> -<span id="L9248" class="LineNr"> 9248 </span> 81 7/subop/compare *(esi+0xc) -1/imm32/being-computed <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9249" class="LineNr"> 9249 </span> 0f 84/jump-if-= $populate-mu-type-sizes-in-type:abort/disp32 -<span id="L9250" class="LineNr"> 9250 </span> <span class="subxComment"># tag T (-2 to -1) to avoid infinite recursion</span> -<span id="L9251" class="LineNr"> 9251 </span> c7 0/subop/copy *(esi+0xc) -1/imm32/being-computed <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9252" class="LineNr"> 9252 </span> <span class="subxComment"># var total-size/edi: int = 0</span> -<span id="L9253" class="LineNr"> 9253 </span> bf/copy-to-edi 0/imm32 -<span id="L9254" class="LineNr"> 9254 </span> <span class="subxH1Comment"># - for every field, if it's a user-defined type, compute its size</span> -<span id="L9255" class="LineNr"> 9255 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(T->fields)</span> -<span id="L9256" class="LineNr"> 9256 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> -<span id="L9257" class="LineNr"> 9257 </span> 89/<- %ecx 0/r32/eax -<span id="L9258" class="LineNr"> 9258 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> -<span id="L9259" class="LineNr"> 9259 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> -<span id="L9260" class="LineNr"> 9260 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> -<span id="L9261" class="LineNr"> 9261 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx -<span id="L9262" class="LineNr"> 9262 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> -<span id="L9263" class="LineNr"> 9263 </span> 8d/copy-address *(ecx+edx) 2/r32/edx -<span id="L9264" class="LineNr"> 9264 </span> { -<span id="L9265" class="LineNr"> 9265 </span><span class="Constant">$populate-mu-type-sizes-in-type:loop</span>: -<span id="L9266" class="LineNr"> 9266 </span> <span class="subxComment"># if (curr >= max) break</span> -<span id="L9267" class="LineNr"> 9267 </span> 39/compare %ecx 2/r32/edx -<span id="L9268" class="LineNr"> 9268 </span> 73/jump-if-addr>= <span class="Constant">break</span>/disp8 -<span id="L9269" class="LineNr"> 9269 </span> <span class="subxComment"># var t/eax: (addr typeinfo-entry) = lookup(curr->value)</span> -<span id="L9270" class="LineNr"> 9270 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> -<span id="L9271" class="LineNr"> 9271 </span> <span class="subxComment"># compute size of t->input-var</span> -<span id="L9272" class="LineNr"> 9272 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Typeinfo-entry-input-var Typeinfo-entry-input-var => eax</span> -<span id="L9273" class="LineNr"> 9273 </span> (<a href='mu.subx.html#L9303'>compute-size-of-var</a> %eax) <span class="subxComment"># => eax</span> -<span id="L9274" class="LineNr"> 9274 </span> <span class="subxComment"># result += eax</span> -<span id="L9275" class="LineNr"> 9275 </span> 01/add-to %edi 0/r32/eax -<span id="L9276" class="LineNr"> 9276 </span> <span class="subxComment"># curr += row-size</span> -<span id="L9277" class="LineNr"> 9277 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> -<span id="L9278" class="LineNr"> 9278 </span> <span class="subxComment">#</span> -<span id="L9279" class="LineNr"> 9279 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9280" class="LineNr"> 9280 </span> } -<span id="L9281" class="LineNr"> 9281 </span> <span class="subxH1Comment"># - save result</span> -<span id="L9282" class="LineNr"> 9282 </span> 89/<- *(esi+0xc) 7/r32/edi <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9283" class="LineNr"> 9283 </span><span class="Constant">$populate-mu-type-sizes-in-type:end</span>: -<span id="L9284" class="LineNr"> 9284 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9285" class="LineNr"> 9285 </span> 5f/pop-to-edi -<span id="L9286" class="LineNr"> 9286 </span> 5e/pop-to-esi -<span id="L9287" class="LineNr"> 9287 </span> 5a/pop-to-edx -<span id="L9288" class="LineNr"> 9288 </span> 59/pop-to-ecx -<span id="L9289" class="LineNr"> 9289 </span> 58/pop-to-eax -<span id="L9290" class="LineNr"> 9290 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9291" class="LineNr"> 9291 </span> 89/<- %esp 5/r32/ebp -<span id="L9292" class="LineNr"> 9292 </span> 5d/pop-to-ebp -<span id="L9293" class="LineNr"> 9293 </span> c3/return -<span id="L9294" class="LineNr"> 9294 </span> -<span id="L9295" class="LineNr"> 9295 </span><span class="Constant">$populate-mu-type-sizes-in-type:abort</span>: -<span id="L9296" class="LineNr"> 9296 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"cycle in type definitions\n"</span>) -<span id="L9297" class="LineNr"> 9297 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) -<span id="L9298" class="LineNr"> 9298 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) -<span id="L9299" class="LineNr"> 9299 </span> <span class="subxComment"># never gets here</span> -<span id="L9300" class="LineNr"> 9300 </span> -<span id="L9301" class="LineNr"> 9301 </span><span class="subxComment"># Analogous to size-of, except we need to compute what size-of can just read</span> -<span id="L9302" class="LineNr"> 9302 </span><span class="subxComment"># off the right data structures.</span> -<span id="L9303" class="LineNr"> 9303 </span><span class="subxFunction">compute-size-of-var</span>: <span class="subxComment"># in: (addr var) -> result/eax: int</span> -<span id="L9304" class="LineNr"> 9304 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9305" class="LineNr"> 9305 </span> 55/push-ebp -<span id="L9306" class="LineNr"> 9306 </span> 89/<- %ebp 4/r32/esp -<span id="L9307" class="LineNr"> 9307 </span> <span class="subxS1Comment"># . push registers</span> -<span id="L9308" class="LineNr"> 9308 </span> 51/push-ecx -<span id="L9309" class="LineNr"> 9309 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> -<span id="L9310" class="LineNr"> 9310 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L9311" class="LineNr"> 9311 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L9312" class="LineNr"> 9312 </span> 89/<- %ecx 0/r32/eax -<span id="L9313" class="LineNr"> 9313 </span> <span class="subxComment"># if (t->is-atom == false) t = lookup(t->left)</span> -<span id="L9314" class="LineNr"> 9314 </span> { -<span id="L9315" class="LineNr"> 9315 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L9316" class="LineNr"> 9316 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9317" class="LineNr"> 9317 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L9318" class="LineNr"> 9318 </span> 89/<- %ecx 0/r32/eax -<span id="L9319" class="LineNr"> 9319 </span> } -<span id="L9320" class="LineNr"> 9320 </span> <span class="subxComment"># TODO: ensure t is an atom</span> -<span id="L9321" class="LineNr"> 9321 </span> (<a href='mu.subx.html#L9330'>compute-size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> -<span id="L9322" class="LineNr"> 9322 </span><span class="Constant">$compute-size-of-var:end</span>: -<span id="L9323" class="LineNr"> 9323 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9324" class="LineNr"> 9324 </span> 59/pop-to-ecx -<span id="L9325" class="LineNr"> 9325 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9326" class="LineNr"> 9326 </span> 89/<- %esp 5/r32/ebp -<span id="L9327" class="LineNr"> 9327 </span> 5d/pop-to-ebp -<span id="L9328" class="LineNr"> 9328 </span> c3/return -<span id="L9329" class="LineNr"> 9329 </span> -<span id="L9330" class="LineNr"> 9330 </span><span class="subxFunction">compute-size-of-type-id</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> -<span id="L9331" class="LineNr"> 9331 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9332" class="LineNr"> 9332 </span> 55/push-ebp -<span id="L9333" class="LineNr"> 9333 </span> 89/<- %ebp 4/r32/esp -<span id="L9334" class="LineNr"> 9334 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9335" class="LineNr"> 9335 </span> 51/push-ecx -<span id="L9336" class="LineNr"> 9336 </span> <span class="subxComment"># var out/ecx: (handle typeinfo)</span> -<span id="L9337" class="LineNr"> 9337 </span> 68/push 0/imm32 -<span id="L9338" class="LineNr"> 9338 </span> 68/push 0/imm32 -<span id="L9339" class="LineNr"> 9339 </span> 89/<- %ecx 4/r32/esp -<span id="L9340" class="LineNr"> 9340 </span> <span class="subxComment"># eax = t</span> -<span id="L9341" class="LineNr"> 9341 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L9342" class="LineNr"> 9342 </span> <span class="subxComment"># if t is a literal, return 0</span> -<span id="L9343" class="LineNr"> 9343 </span> 3d/compare-eax-and 0/imm32/literal -<span id="L9344" class="LineNr"> 9344 </span> 0f 84/jump-if-= $compute-size-of-type-id:end/disp32 <span class="subxComment"># eax changes type from type-id to int</span> -<span id="L9345" class="LineNr"> 9345 </span> <span class="subxComment"># if t is a byte, return 4 (because we don't really support non-multiples of 4)</span> -<span id="L9346" class="LineNr"> 9346 </span> 3d/compare-eax-and 8/imm32/byte -<span id="L9347" class="LineNr"> 9347 </span> { -<span id="L9348" class="LineNr"> 9348 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9349" class="LineNr"> 9349 </span> b8/copy-to-eax 4/imm32 -<span id="L9350" class="LineNr"> 9350 </span> eb/jump $compute-size-of-type-id:end/disp8 -<span id="L9351" class="LineNr"> 9351 </span> } -<span id="L9352" class="LineNr"> 9352 </span> <span class="subxComment"># if t is a handle, return 8</span> -<span id="L9353" class="LineNr"> 9353 </span> 3d/compare-eax-and 4/imm32/handle -<span id="L9354" class="LineNr"> 9354 </span> { -<span id="L9355" class="LineNr"> 9355 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9356" class="LineNr"> 9356 </span> b8/copy-to-eax 8/imm32 -<span id="L9357" class="LineNr"> 9357 </span> eb/jump $compute-size-of-type-id:end/disp8 <span class="subxComment"># eax changes type from type-id to int</span> -<span id="L9358" class="LineNr"> 9358 </span> } -<span id="L9359" class="LineNr"> 9359 </span> <span class="subxComment"># if t is a user-defined type, compute its size</span> -<span id="L9360" class="LineNr"> 9360 </span> <span class="subxComment"># TODO: support non-atom type</span> -<span id="L9361" class="LineNr"> 9361 </span> (<a href='mu.subx.html#L8771'>find-typeinfo</a> %eax %ecx) -<span id="L9362" class="LineNr"> 9362 </span> { -<span id="L9363" class="LineNr"> 9363 </span> 81 7/subop/compare *ecx 0/imm32 -<span id="L9364" class="LineNr"> 9364 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9365" class="LineNr"> 9365 </span><span class="Constant">$compute-size-of-type-id:user-defined</span>: -<span id="L9366" class="LineNr"> 9366 </span> (<a href='mu.subx.html#L9195'>populate-mu-type-sizes</a> %eax) -<span id="L9367" class="LineNr"> 9367 </span> 8b/-> *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L9368" class="LineNr"> 9368 </span> eb/jump $compute-size-of-type-id:end/disp8 -<span id="L9369" class="LineNr"> 9369 </span> } -<span id="L9370" class="LineNr"> 9370 </span> <span class="subxComment"># otherwise return the word size</span> -<span id="L9371" class="LineNr"> 9371 </span> b8/copy-to-eax 4/imm32 -<span id="L9372" class="LineNr"> 9372 </span><span class="Constant">$compute-size-of-type-id:end</span>: -<span id="L9373" class="LineNr"> 9373 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L9374" class="LineNr"> 9374 </span> 81 0/subop/add %esp 8/imm32 -<span id="L9375" class="LineNr"> 9375 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9376" class="LineNr"> 9376 </span> 59/pop-to-ecx -<span id="L9377" class="LineNr"> 9377 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9378" class="LineNr"> 9378 </span> 89/<- %esp 5/r32/ebp -<span id="L9379" class="LineNr"> 9379 </span> 5d/pop-to-ebp -<span id="L9380" class="LineNr"> 9380 </span> c3/return -<span id="L9381" class="LineNr"> 9381 </span> -<span id="L9382" class="LineNr"> 9382 </span><span class="subxComment"># at this point we have total sizes for all user-defined types</span> -<span id="L9383" class="LineNr"> 9383 </span><span class="subxComment"># compute offsets for each element</span> -<span id="L9384" class="LineNr"> 9384 </span><span class="subxComment"># complication: fields may be out of order</span> -<span id="L9385" class="LineNr"> 9385 </span><span class="subxFunction">populate-mu-type-offsets</span>: <span class="subxComment"># in: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9386" class="LineNr"> 9386 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9387" class="LineNr"> 9387 </span> 55/push-ebp -<span id="L9388" class="LineNr"> 9388 </span> 89/<- %ebp 4/r32/esp -<span id="L9389" class="LineNr"> 9389 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9390" class="LineNr"> 9390 </span> 50/push-eax -<span id="L9391" class="LineNr"> 9391 </span> 51/push-ecx -<span id="L9392" class="LineNr"> 9392 </span> 52/push-edx -<span id="L9393" class="LineNr"> 9393 </span> 53/push-ebx -<span id="L9394" class="LineNr"> 9394 </span> 56/push-esi -<span id="L9395" class="LineNr"> 9395 </span> 57/push-edi -<span id="L9396" class="LineNr"> 9396 </span><span class="CommentedCode">#? (dump-typeinfos "aaa\n")</span> -<span id="L9397" class="LineNr"> 9397 </span> <span class="subxComment"># var curr-offset/edi: int = 0</span> -<span id="L9398" class="LineNr"> 9398 </span> bf/copy-to-edi 0/imm32 -<span id="L9399" class="LineNr"> 9399 </span> <span class="subxComment"># var table/ecx: (addr table string_key (handle typeinfo-entry)) = lookup(in->fields)</span> -<span id="L9400" class="LineNr"> 9400 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L9401" class="LineNr"> 9401 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> -<span id="L9402" class="LineNr"> 9402 </span> 89/<- %ecx 0/r32/eax -<span id="L9403" class="LineNr"> 9403 </span> <span class="subxComment"># var num-elems/edx: int = table->write / Typeinfo-fields-row-size</span> -<span id="L9404" class="LineNr"> 9404 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> -<span id="L9405" class="LineNr"> 9405 </span> c1 5/subop/shift-right-logical %edx 4/imm8 -<span id="L9406" class="LineNr"> 9406 </span> <span class="subxComment"># var i/ebx: int = 0</span> -<span id="L9407" class="LineNr"> 9407 </span> bb/copy-to-ebx 0/imm32 -<span id="L9408" class="LineNr"> 9408 </span> { -<span id="L9409" class="LineNr"> 9409 </span><span class="Constant">$populate-mu-type-offsets:loop</span>: -<span id="L9410" class="LineNr"> 9410 </span> 39/compare %ebx 2/r32/edx -<span id="L9411" class="LineNr"> 9411 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 -<span id="L9412" class="LineNr"> 9412 </span><span class="CommentedCode">#? (write-buffered Stderr "looking up index ")</span> -<span id="L9413" class="LineNr"> 9413 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> -<span id="L9414" class="LineNr"> 9414 </span><span class="CommentedCode">#? (write-buffered Stderr " in ")</span> -<span id="L9415" class="LineNr"> 9415 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> -<span id="L9416" class="LineNr"> 9416 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L9417" class="LineNr"> 9417 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L9418" class="LineNr"> 9418 </span> <span class="subxComment"># var v/esi: (addr typeinfo-entry)</span> -<span id="L9419" class="LineNr"> 9419 </span> (<a href='mu.subx.html#L9446'>locate-typeinfo-entry-with-index</a> %ecx %ebx *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L9420" class="LineNr"> 9420 </span> 89/<- %esi 0/r32/eax -<span id="L9421" class="LineNr"> 9421 </span> <span class="subxComment"># v->output-var->offset = curr-offset</span> -<span id="L9422" class="LineNr"> 9422 </span> <span class="subxS1Comment"># . eax: (addr var)</span> -<span id="L9423" class="LineNr"> 9423 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Typeinfo-entry-output-var Typeinfo-entry-output-var => eax</span> -<span id="L9424" class="LineNr"> 9424 </span> 89/<- *(eax+0x14) 7/r32/edi <span class="subxComment"># Var-offset</span> -<span id="L9425" class="LineNr"> 9425 </span> <span class="subxComment"># curr-offset += size-of(v->input-var)</span> -<span id="L9426" class="LineNr"> 9426 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># Typeinfo-entry-input-var Typeinfo-entry-input-var => eax</span> -<span id="L9427" class="LineNr"> 9427 </span> (<a href='mu.subx.html#L10128'>size-of</a> %eax) <span class="subxComment"># => eax</span> -<span id="L9428" class="LineNr"> 9428 </span> 01/add-to %edi 0/r32/eax -<span id="L9429" class="LineNr"> 9429 </span> <span class="subxComment"># ++i</span> -<span id="L9430" class="LineNr"> 9430 </span> 43/increment-ebx -<span id="L9431" class="LineNr"> 9431 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9432" class="LineNr"> 9432 </span> } -<span id="L9433" class="LineNr"> 9433 </span><span class="Constant">$populate-mu-type-offsets:end</span>: -<span id="L9434" class="LineNr"> 9434 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9435" class="LineNr"> 9435 </span> 5f/pop-to-edi -<span id="L9436" class="LineNr"> 9436 </span> 5e/pop-to-esi -<span id="L9437" class="LineNr"> 9437 </span> 5b/pop-to-ebx -<span id="L9438" class="LineNr"> 9438 </span> 5a/pop-to-edx -<span id="L9439" class="LineNr"> 9439 </span> 59/pop-to-ecx -<span id="L9440" class="LineNr"> 9440 </span> 58/pop-to-eax -<span id="L9441" class="LineNr"> 9441 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9442" class="LineNr"> 9442 </span> 89/<- %esp 5/r32/ebp -<span id="L9443" class="LineNr"> 9443 </span> 5d/pop-to-ebp -<span id="L9444" class="LineNr"> 9444 </span> c3/return -<span id="L9445" class="LineNr"> 9445 </span> -<span id="L9446" class="LineNr"> 9446 </span><span class="subxFunction">locate-typeinfo-entry-with-index</span>: <span class="subxComment"># table: (addr table (handle array byte) (handle typeinfo-entry)), idx: int, err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: (addr typeinfo-entry)</span> -<span id="L9447" class="LineNr"> 9447 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9448" class="LineNr"> 9448 </span> 55/push-ebp -<span id="L9449" class="LineNr"> 9449 </span> 89/<- %ebp 4/r32/esp -<span id="L9450" class="LineNr"> 9450 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9451" class="LineNr"> 9451 </span> 51/push-ecx -<span id="L9452" class="LineNr"> 9452 </span> 52/push-edx -<span id="L9453" class="LineNr"> 9453 </span> 53/push-ebx -<span id="L9454" class="LineNr"> 9454 </span> 56/push-esi -<span id="L9455" class="LineNr"> 9455 </span> 57/push-edi -<span id="L9456" class="LineNr"> 9456 </span> <span class="subxComment"># esi = table</span> -<span id="L9457" class="LineNr"> 9457 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9458" class="LineNr"> 9458 </span> <span class="subxComment"># var curr/ecx: (addr row (handle array byte) (handle typeinfo-entry)) = table->data</span> -<span id="L9459" class="LineNr"> 9459 </span> 8d/copy-address *(esi+0xc) 1/r32/ecx -<span id="L9460" class="LineNr"> 9460 </span> <span class="subxComment"># var max/edx: (addr byte) = &table->data[table->write]</span> -<span id="L9461" class="LineNr"> 9461 </span> 8b/-> *esi 2/r32/edx -<span id="L9462" class="LineNr"> 9462 </span> 8d/copy-address *(ecx+edx) 2/r32/edx -<span id="L9463" class="LineNr"> 9463 </span> { -<span id="L9464" class="LineNr"> 9464 </span><span class="Constant">$locate-typeinfo-entry-with-index:loop</span>: -<span id="L9465" class="LineNr"> 9465 </span> 39/compare %ecx 2/r32/edx -<span id="L9466" class="LineNr"> 9466 </span> 73/jump-if-addr>= $locate-typeinfo-entry-with-index:abort/disp8 -<span id="L9467" class="LineNr"> 9467 </span> <span class="subxComment"># var v/eax: (addr typeinfo-entry)</span> -<span id="L9468" class="LineNr"> 9468 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> -<span id="L9469" class="LineNr"> 9469 </span> <span class="subxComment"># if (v->index == idx) return v</span> -<span id="L9470" class="LineNr"> 9470 </span> 8b/-> *(eax+8) 3/r32/ebx <span class="subxComment"># Typeinfo-entry-index</span> -<span id="L9471" class="LineNr"> 9471 </span><span class="CommentedCode">#? (write-buffered Stderr "comparing ")</span> -<span id="L9472" class="LineNr"> 9472 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> -<span id="L9473" class="LineNr"> 9473 </span><span class="CommentedCode">#? (write-buffered Stderr " and ")</span> -<span id="L9474" class="LineNr"> 9474 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+0xc))</span> -<span id="L9475" class="LineNr"> 9475 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L9476" class="LineNr"> 9476 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L9477" class="LineNr"> 9477 </span> 39/compare *(ebp+0xc) 3/r32/ebx -<span id="L9478" class="LineNr"> 9478 </span> 74/jump-if-= $locate-typeinfo-entry-with-index:end/disp8 -<span id="L9479" class="LineNr"> 9479 </span> <span class="subxComment"># curr += Typeinfo-entry-size</span> -<span id="L9480" class="LineNr"> 9480 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-entry-size</span> -<span id="L9481" class="LineNr"> 9481 </span> <span class="subxComment">#</span> -<span id="L9482" class="LineNr"> 9482 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9483" class="LineNr"> 9483 </span> } -<span id="L9484" class="LineNr"> 9484 </span> <span class="subxComment"># return 0</span> -<span id="L9485" class="LineNr"> 9485 </span> b8/copy-to-eax 0/imm32 -<span id="L9486" class="LineNr"> 9486 </span><span class="Constant">$locate-typeinfo-entry-with-index:end</span>: -<span id="L9487" class="LineNr"> 9487 </span><span class="CommentedCode">#? (write-buffered Stderr "returning ")</span> -<span id="L9488" class="LineNr"> 9488 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L9489" class="LineNr"> 9489 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L9490" class="LineNr"> 9490 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L9491" class="LineNr"> 9491 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9492" class="LineNr"> 9492 </span> 5f/pop-to-edi -<span id="L9493" class="LineNr"> 9493 </span> 5e/pop-to-esi -<span id="L9494" class="LineNr"> 9494 </span> 5b/pop-to-ebx -<span id="L9495" class="LineNr"> 9495 </span> 5a/pop-to-edx -<span id="L9496" class="LineNr"> 9496 </span> 59/pop-to-ecx -<span id="L9497" class="LineNr"> 9497 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9498" class="LineNr"> 9498 </span> 89/<- %esp 5/r32/ebp -<span id="L9499" class="LineNr"> 9499 </span> 5d/pop-to-ebp -<span id="L9500" class="LineNr"> 9500 </span> c3/return -<span id="L9501" class="LineNr"> 9501 </span> -<span id="L9502" class="LineNr"> 9502 </span><span class="Constant">$locate-typeinfo-entry-with-index:abort</span>: -<span id="L9503" class="LineNr"> 9503 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"overflowing typeinfo-entry->index "</span>) -<span id="L9504" class="LineNr"> 9504 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0x10) %ecx) -<span id="L9505" class="LineNr"> 9505 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"\n"</span>) -<span id="L9506" class="LineNr"> 9506 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L9507" class="LineNr"> 9507 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L9508" class="LineNr"> 9508 </span> <span class="subxComment"># never gets here</span> -<span id="L9509" class="LineNr"> 9509 </span> -<span id="L9510" class="LineNr"> 9510 </span><span class="subxFunction">dump-typeinfos</span>: <span class="subxComment"># hdr: (addr array byte)</span> -<span id="L9511" class="LineNr"> 9511 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9512" class="LineNr"> 9512 </span> 55/push-ebp -<span id="L9513" class="LineNr"> 9513 </span> 89/<- %ebp 4/r32/esp -<span id="L9514" class="LineNr"> 9514 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9515" class="LineNr"> 9515 </span> 50/push-eax -<span id="L9516" class="LineNr"> 9516 </span> <span class="subxComment">#</span> -<span id="L9517" class="LineNr"> 9517 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) -<span id="L9518" class="LineNr"> 9518 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9519" class="LineNr"> 9519 </span> <span class="subxComment"># var curr/eax: (addr typeinfo) = lookup(Program->types)</span> -<span id="L9520" class="LineNr"> 9520 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> -<span id="L9521" class="LineNr"> 9521 </span> { -<span id="L9522" class="LineNr"> 9522 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L9523" class="LineNr"> 9523 </span> 3d/compare-eax-and 0/imm32 -<span id="L9524" class="LineNr"> 9524 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9525" class="LineNr"> 9525 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"---\n"</span>) -<span id="L9526" class="LineNr"> 9526 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9527" class="LineNr"> 9527 </span> (<a href='mu.subx.html#L9540'>dump-typeinfo</a> %eax) -<span id="L9528" class="LineNr"> 9528 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L9529" class="LineNr"> 9529 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> -<span id="L9530" class="LineNr"> 9530 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L9531" class="LineNr"> 9531 </span> } -<span id="L9532" class="LineNr"> 9532 </span><span class="Constant">$dump-typeinfos:end</span>: -<span id="L9533" class="LineNr"> 9533 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9534" class="LineNr"> 9534 </span> 58/pop-to-eax -<span id="L9535" class="LineNr"> 9535 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9536" class="LineNr"> 9536 </span> 89/<- %esp 5/r32/ebp -<span id="L9537" class="LineNr"> 9537 </span> 5d/pop-to-ebp -<span id="L9538" class="LineNr"> 9538 </span> c3/return +<span id="L9199" class="LineNr"> 9199 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9200" class="LineNr"> 9200 </span> 56/push-esi +<span id="L9201" class="LineNr"> 9201 </span> <span class="subxComment"># TODO: bounds-check index</span> +<span id="L9202" class="LineNr"> 9202 </span> <span class="subxComment"># esi = arr</span> +<span id="L9203" class="LineNr"> 9203 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9204" class="LineNr"> 9204 </span> <span class="subxComment"># eax = index</span> +<span id="L9205" class="LineNr"> 9205 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L9206" class="LineNr"> 9206 </span> <span class="subxComment"># eax = *(arr + 12 + index)</span> +<span id="L9207" class="LineNr"> 9207 </span> 8b/-> *(esi+eax+0xc) 0/r32/eax +<span id="L9208" class="LineNr"> 9208 </span><span class="Constant">$index:end</span>: +<span id="L9209" class="LineNr"> 9209 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9210" class="LineNr"> 9210 </span> 5e/pop-to-esi +<span id="L9211" class="LineNr"> 9211 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9212" class="LineNr"> 9212 </span> 89/<- %esp 5/r32/ebp +<span id="L9213" class="LineNr"> 9213 </span> 5d/pop-to-ebp +<span id="L9214" class="LineNr"> 9214 </span> c3/return +<span id="L9215" class="LineNr"> 9215 </span> +<span id="L9216" class="LineNr"> 9216 </span><span class="subxComment">#######################################################</span> +<span id="L9217" class="LineNr"> 9217 </span><span class="subxComment"># Compute type sizes</span> +<span id="L9218" class="LineNr"> 9218 </span><span class="subxComment">#######################################################</span> +<span id="L9219" class="LineNr"> 9219 </span> +<span id="L9220" class="LineNr"> 9220 </span><span class="subxComment"># Compute the sizes of all user-defined types.</span> +<span id="L9221" class="LineNr"> 9221 </span><span class="subxComment"># We'll need the sizes of their elements, which may be other user-defined</span> +<span id="L9222" class="LineNr"> 9222 </span><span class="subxComment"># types, which we will compute as needed.</span> +<span id="L9223" class="LineNr"> 9223 </span> +<span id="L9224" class="LineNr"> 9224 </span><span class="subxComment"># Initially, all user-defined types have their sizes set to -2 (invalid)</span> +<span id="L9225" class="LineNr"> 9225 </span><span class="subxFunction">populate-mu-type-sizes</span>: <span class="subxComment"># err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9226" class="LineNr"> 9226 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9227" class="LineNr"> 9227 </span> 55/push-ebp +<span id="L9228" class="LineNr"> 9228 </span> 89/<- %ebp 4/r32/esp +<span id="L9229" class="LineNr"> 9229 </span><span class="Constant">$populate-mu-type-sizes:total-sizes</span>: +<span id="L9230" class="LineNr"> 9230 </span> <span class="subxComment"># var curr/eax: (addr typeinfo) = lookup(Program->types)</span> +<span id="L9231" class="LineNr"> 9231 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> +<span id="L9232" class="LineNr"> 9232 </span> { +<span id="L9233" class="LineNr"> 9233 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L9234" class="LineNr"> 9234 </span> 3d/compare-eax-and 0/imm32/null +<span id="L9235" class="LineNr"> 9235 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9236" class="LineNr"> 9236 </span> (<a href='mu.subx.html#L9262'>populate-mu-type-sizes-in-type</a> %eax *(ebp+8) *(ebp+0xc)) +<span id="L9237" class="LineNr"> 9237 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L9238" class="LineNr"> 9238 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> +<span id="L9239" class="LineNr"> 9239 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9240" class="LineNr"> 9240 </span> } +<span id="L9241" class="LineNr"> 9241 </span><span class="Constant">$populate-mu-type-sizes:offsets</span>: +<span id="L9242" class="LineNr"> 9242 </span> <span class="subxComment"># curr = *Program->types</span> +<span id="L9243" class="LineNr"> 9243 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> +<span id="L9244" class="LineNr"> 9244 </span> { +<span id="L9245" class="LineNr"> 9245 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L9246" class="LineNr"> 9246 </span> 3d/compare-eax-and 0/imm32/null +<span id="L9247" class="LineNr"> 9247 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9248" class="LineNr"> 9248 </span> (<a href='mu.subx.html#L9415'>populate-mu-type-offsets</a> %eax *(ebp+8) *(ebp+0xc)) +<span id="L9249" class="LineNr"> 9249 </span> <span class="subxComment"># curr = curr->next</span> +<span id="L9250" class="LineNr"> 9250 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> +<span id="L9251" class="LineNr"> 9251 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9252" class="LineNr"> 9252 </span> } +<span id="L9253" class="LineNr"> 9253 </span><span class="Constant">$populate-mu-type-sizes:end</span>: +<span id="L9254" class="LineNr"> 9254 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9255" class="LineNr"> 9255 </span> 89/<- %esp 5/r32/ebp +<span id="L9256" class="LineNr"> 9256 </span> 5d/pop-to-ebp +<span id="L9257" class="LineNr"> 9257 </span> c3/return +<span id="L9258" class="LineNr"> 9258 </span> +<span id="L9259" class="LineNr"> 9259 </span><span class="subxComment"># compute sizes of all fields, recursing as necessary</span> +<span id="L9260" class="LineNr"> 9260 </span><span class="subxComment"># sum up all their sizes to arrive at total size</span> +<span id="L9261" class="LineNr"> 9261 </span><span class="subxComment"># fields may be out of order, but that doesn't affect the answer</span> +<span id="L9262" class="LineNr"> 9262 </span><span class="subxFunction">populate-mu-type-sizes-in-type</span>: <span class="subxComment"># T: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9263" class="LineNr"> 9263 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9264" class="LineNr"> 9264 </span> 55/push-ebp +<span id="L9265" class="LineNr"> 9265 </span> 89/<- %ebp 4/r32/esp +<span id="L9266" class="LineNr"> 9266 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9267" class="LineNr"> 9267 </span> 50/push-eax +<span id="L9268" class="LineNr"> 9268 </span> 51/push-ecx +<span id="L9269" class="LineNr"> 9269 </span> 52/push-edx +<span id="L9270" class="LineNr"> 9270 </span> 56/push-esi +<span id="L9271" class="LineNr"> 9271 </span> 57/push-edi +<span id="L9272" class="LineNr"> 9272 </span> <span class="subxComment"># esi = T</span> +<span id="L9273" class="LineNr"> 9273 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9274" class="LineNr"> 9274 </span> <span class="subxComment"># if T is already computed, return</span> +<span id="L9275" class="LineNr"> 9275 </span> 81 7/subop/compare *(esi+0xc) 0/imm32 <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9276" class="LineNr"> 9276 </span> 0f 8d/jump-if->= $populate-mu-type-sizes-in-type:end/disp32 +<span id="L9277" class="LineNr"> 9277 </span> <span class="subxComment"># if T is being computed, abort</span> +<span id="L9278" class="LineNr"> 9278 </span> 81 7/subop/compare *(esi+0xc) -1/imm32/being-computed <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9279" class="LineNr"> 9279 </span> 0f 84/jump-if-= $populate-mu-type-sizes-in-type:abort/disp32 +<span id="L9280" class="LineNr"> 9280 </span> <span class="subxComment"># tag T (-2 to -1) to avoid infinite recursion</span> +<span id="L9281" class="LineNr"> 9281 </span> c7 0/subop/copy *(esi+0xc) -1/imm32/being-computed <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9282" class="LineNr"> 9282 </span> <span class="subxComment"># var total-size/edi: int = 0</span> +<span id="L9283" class="LineNr"> 9283 </span> bf/copy-to-edi 0/imm32 +<span id="L9284" class="LineNr"> 9284 </span> <span class="subxH1Comment"># - for every field, if it's a user-defined type, compute its size</span> +<span id="L9285" class="LineNr"> 9285 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(T->fields)</span> +<span id="L9286" class="LineNr"> 9286 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> +<span id="L9287" class="LineNr"> 9287 </span> 89/<- %ecx 0/r32/eax +<span id="L9288" class="LineNr"> 9288 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> +<span id="L9289" class="LineNr"> 9289 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> +<span id="L9290" class="LineNr"> 9290 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> +<span id="L9291" class="LineNr"> 9291 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx +<span id="L9292" class="LineNr"> 9292 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> +<span id="L9293" class="LineNr"> 9293 </span> 8d/copy-address *(ecx+edx) 2/r32/edx +<span id="L9294" class="LineNr"> 9294 </span> { +<span id="L9295" class="LineNr"> 9295 </span><span class="Constant">$populate-mu-type-sizes-in-type:loop</span>: +<span id="L9296" class="LineNr"> 9296 </span> <span class="subxComment"># if (curr >= max) break</span> +<span id="L9297" class="LineNr"> 9297 </span> 39/compare %ecx 2/r32/edx +<span id="L9298" class="LineNr"> 9298 </span> 73/jump-if-addr>= <span class="Constant">break</span>/disp8 +<span id="L9299" class="LineNr"> 9299 </span> <span class="subxComment"># var t/eax: (addr typeinfo-entry) = lookup(curr->value)</span> +<span id="L9300" class="LineNr"> 9300 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> +<span id="L9301" class="LineNr"> 9301 </span> <span class="subxComment"># compute size of t->input-var</span> +<span id="L9302" class="LineNr"> 9302 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Typeinfo-entry-input-var Typeinfo-entry-input-var => eax</span> +<span id="L9303" class="LineNr"> 9303 </span> (<a href='mu.subx.html#L9333'>compute-size-of-var</a> %eax) <span class="subxComment"># => eax</span> +<span id="L9304" class="LineNr"> 9304 </span> <span class="subxComment"># result += eax</span> +<span id="L9305" class="LineNr"> 9305 </span> 01/add-to %edi 0/r32/eax +<span id="L9306" class="LineNr"> 9306 </span> <span class="subxComment"># curr += row-size</span> +<span id="L9307" class="LineNr"> 9307 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> +<span id="L9308" class="LineNr"> 9308 </span> <span class="subxComment">#</span> +<span id="L9309" class="LineNr"> 9309 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9310" class="LineNr"> 9310 </span> } +<span id="L9311" class="LineNr"> 9311 </span> <span class="subxH1Comment"># - save result</span> +<span id="L9312" class="LineNr"> 9312 </span> 89/<- *(esi+0xc) 7/r32/edi <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9313" class="LineNr"> 9313 </span><span class="Constant">$populate-mu-type-sizes-in-type:end</span>: +<span id="L9314" class="LineNr"> 9314 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9315" class="LineNr"> 9315 </span> 5f/pop-to-edi +<span id="L9316" class="LineNr"> 9316 </span> 5e/pop-to-esi +<span id="L9317" class="LineNr"> 9317 </span> 5a/pop-to-edx +<span id="L9318" class="LineNr"> 9318 </span> 59/pop-to-ecx +<span id="L9319" class="LineNr"> 9319 </span> 58/pop-to-eax +<span id="L9320" class="LineNr"> 9320 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9321" class="LineNr"> 9321 </span> 89/<- %esp 5/r32/ebp +<span id="L9322" class="LineNr"> 9322 </span> 5d/pop-to-ebp +<span id="L9323" class="LineNr"> 9323 </span> c3/return +<span id="L9324" class="LineNr"> 9324 </span> +<span id="L9325" class="LineNr"> 9325 </span><span class="Constant">$populate-mu-type-sizes-in-type:abort</span>: +<span id="L9326" class="LineNr"> 9326 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"cycle in type definitions\n"</span>) +<span id="L9327" class="LineNr"> 9327 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) +<span id="L9328" class="LineNr"> 9328 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) +<span id="L9329" class="LineNr"> 9329 </span> <span class="subxComment"># never gets here</span> +<span id="L9330" class="LineNr"> 9330 </span> +<span id="L9331" class="LineNr"> 9331 </span><span class="subxComment"># Analogous to size-of, except we need to compute what size-of can just read</span> +<span id="L9332" class="LineNr"> 9332 </span><span class="subxComment"># off the right data structures.</span> +<span id="L9333" class="LineNr"> 9333 </span><span class="subxFunction">compute-size-of-var</span>: <span class="subxComment"># in: (addr var) -> result/eax: int</span> +<span id="L9334" class="LineNr"> 9334 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9335" class="LineNr"> 9335 </span> 55/push-ebp +<span id="L9336" class="LineNr"> 9336 </span> 89/<- %ebp 4/r32/esp +<span id="L9337" class="LineNr"> 9337 </span> <span class="subxS1Comment"># . push registers</span> +<span id="L9338" class="LineNr"> 9338 </span> 51/push-ecx +<span id="L9339" class="LineNr"> 9339 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> +<span id="L9340" class="LineNr"> 9340 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L9341" class="LineNr"> 9341 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L9342" class="LineNr"> 9342 </span> 89/<- %ecx 0/r32/eax +<span id="L9343" class="LineNr"> 9343 </span> <span class="subxComment"># if (t->is-atom == false) t = lookup(t->left)</span> +<span id="L9344" class="LineNr"> 9344 </span> { +<span id="L9345" class="LineNr"> 9345 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L9346" class="LineNr"> 9346 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9347" class="LineNr"> 9347 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L9348" class="LineNr"> 9348 </span> 89/<- %ecx 0/r32/eax +<span id="L9349" class="LineNr"> 9349 </span> } +<span id="L9350" class="LineNr"> 9350 </span> <span class="subxComment"># TODO: ensure t is an atom</span> +<span id="L9351" class="LineNr"> 9351 </span> (<a href='mu.subx.html#L9360'>compute-size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> +<span id="L9352" class="LineNr"> 9352 </span><span class="Constant">$compute-size-of-var:end</span>: +<span id="L9353" class="LineNr"> 9353 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9354" class="LineNr"> 9354 </span> 59/pop-to-ecx +<span id="L9355" class="LineNr"> 9355 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9356" class="LineNr"> 9356 </span> 89/<- %esp 5/r32/ebp +<span id="L9357" class="LineNr"> 9357 </span> 5d/pop-to-ebp +<span id="L9358" class="LineNr"> 9358 </span> c3/return +<span id="L9359" class="LineNr"> 9359 </span> +<span id="L9360" class="LineNr"> 9360 </span><span class="subxFunction">compute-size-of-type-id</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> +<span id="L9361" class="LineNr"> 9361 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9362" class="LineNr"> 9362 </span> 55/push-ebp +<span id="L9363" class="LineNr"> 9363 </span> 89/<- %ebp 4/r32/esp +<span id="L9364" class="LineNr"> 9364 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9365" class="LineNr"> 9365 </span> 51/push-ecx +<span id="L9366" class="LineNr"> 9366 </span> <span class="subxComment"># var out/ecx: (handle typeinfo)</span> +<span id="L9367" class="LineNr"> 9367 </span> 68/push 0/imm32 +<span id="L9368" class="LineNr"> 9368 </span> 68/push 0/imm32 +<span id="L9369" class="LineNr"> 9369 </span> 89/<- %ecx 4/r32/esp +<span id="L9370" class="LineNr"> 9370 </span> <span class="subxComment"># eax = t</span> +<span id="L9371" class="LineNr"> 9371 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L9372" class="LineNr"> 9372 </span> <span class="subxComment"># if t is a literal, return 0</span> +<span id="L9373" class="LineNr"> 9373 </span> 3d/compare-eax-and 0/imm32/literal +<span id="L9374" class="LineNr"> 9374 </span> 0f 84/jump-if-= $compute-size-of-type-id:end/disp32 <span class="subxComment"># eax changes type from type-id to int</span> +<span id="L9375" class="LineNr"> 9375 </span> <span class="subxComment"># if t is a byte, return 4 (because we don't really support non-multiples of 4)</span> +<span id="L9376" class="LineNr"> 9376 </span> 3d/compare-eax-and 8/imm32/byte +<span id="L9377" class="LineNr"> 9377 </span> { +<span id="L9378" class="LineNr"> 9378 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9379" class="LineNr"> 9379 </span> b8/copy-to-eax 4/imm32 +<span id="L9380" class="LineNr"> 9380 </span> eb/jump $compute-size-of-type-id:end/disp8 +<span id="L9381" class="LineNr"> 9381 </span> } +<span id="L9382" class="LineNr"> 9382 </span> <span class="subxComment"># if t is a handle, return 8</span> +<span id="L9383" class="LineNr"> 9383 </span> 3d/compare-eax-and 4/imm32/handle +<span id="L9384" class="LineNr"> 9384 </span> { +<span id="L9385" class="LineNr"> 9385 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9386" class="LineNr"> 9386 </span> b8/copy-to-eax 8/imm32 +<span id="L9387" class="LineNr"> 9387 </span> eb/jump $compute-size-of-type-id:end/disp8 <span class="subxComment"># eax changes type from type-id to int</span> +<span id="L9388" class="LineNr"> 9388 </span> } +<span id="L9389" class="LineNr"> 9389 </span> <span class="subxComment"># if t is a user-defined type, compute its size</span> +<span id="L9390" class="LineNr"> 9390 </span> <span class="subxComment"># TODO: support non-atom type</span> +<span id="L9391" class="LineNr"> 9391 </span> (<a href='mu.subx.html#L8801'>find-typeinfo</a> %eax %ecx) +<span id="L9392" class="LineNr"> 9392 </span> { +<span id="L9393" class="LineNr"> 9393 </span> 81 7/subop/compare *ecx 0/imm32 +<span id="L9394" class="LineNr"> 9394 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9395" class="LineNr"> 9395 </span><span class="Constant">$compute-size-of-type-id:user-defined</span>: +<span id="L9396" class="LineNr"> 9396 </span> (<a href='mu.subx.html#L9225'>populate-mu-type-sizes</a> %eax) +<span id="L9397" class="LineNr"> 9397 </span> 8b/-> *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L9398" class="LineNr"> 9398 </span> eb/jump $compute-size-of-type-id:end/disp8 +<span id="L9399" class="LineNr"> 9399 </span> } +<span id="L9400" class="LineNr"> 9400 </span> <span class="subxComment"># otherwise return the word size</span> +<span id="L9401" class="LineNr"> 9401 </span> b8/copy-to-eax 4/imm32 +<span id="L9402" class="LineNr"> 9402 </span><span class="Constant">$compute-size-of-type-id:end</span>: +<span id="L9403" class="LineNr"> 9403 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L9404" class="LineNr"> 9404 </span> 81 0/subop/add %esp 8/imm32 +<span id="L9405" class="LineNr"> 9405 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9406" class="LineNr"> 9406 </span> 59/pop-to-ecx +<span id="L9407" class="LineNr"> 9407 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9408" class="LineNr"> 9408 </span> 89/<- %esp 5/r32/ebp +<span id="L9409" class="LineNr"> 9409 </span> 5d/pop-to-ebp +<span id="L9410" class="LineNr"> 9410 </span> c3/return +<span id="L9411" class="LineNr"> 9411 </span> +<span id="L9412" class="LineNr"> 9412 </span><span class="subxComment"># at this point we have total sizes for all user-defined types</span> +<span id="L9413" class="LineNr"> 9413 </span><span class="subxComment"># compute offsets for each element</span> +<span id="L9414" class="LineNr"> 9414 </span><span class="subxComment"># complication: fields may be out of order</span> +<span id="L9415" class="LineNr"> 9415 </span><span class="subxFunction">populate-mu-type-offsets</span>: <span class="subxComment"># in: (addr typeinfo), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9416" class="LineNr"> 9416 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9417" class="LineNr"> 9417 </span> 55/push-ebp +<span id="L9418" class="LineNr"> 9418 </span> 89/<- %ebp 4/r32/esp +<span id="L9419" class="LineNr"> 9419 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9420" class="LineNr"> 9420 </span> 50/push-eax +<span id="L9421" class="LineNr"> 9421 </span> 51/push-ecx +<span id="L9422" class="LineNr"> 9422 </span> 52/push-edx +<span id="L9423" class="LineNr"> 9423 </span> 53/push-ebx +<span id="L9424" class="LineNr"> 9424 </span> 56/push-esi +<span id="L9425" class="LineNr"> 9425 </span> 57/push-edi +<span id="L9426" class="LineNr"> 9426 </span><span class="CommentedCode">#? (dump-typeinfos "aaa\n")</span> +<span id="L9427" class="LineNr"> 9427 </span> <span class="subxComment"># var curr-offset/edi: int = 0</span> +<span id="L9428" class="LineNr"> 9428 </span> bf/copy-to-edi 0/imm32 +<span id="L9429" class="LineNr"> 9429 </span> <span class="subxComment"># var table/ecx: (addr table string_key (handle typeinfo-entry)) = lookup(in->fields)</span> +<span id="L9430" class="LineNr"> 9430 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L9431" class="LineNr"> 9431 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> +<span id="L9432" class="LineNr"> 9432 </span> 89/<- %ecx 0/r32/eax +<span id="L9433" class="LineNr"> 9433 </span> <span class="subxComment"># var num-elems/edx: int = table->write / Typeinfo-fields-row-size</span> +<span id="L9434" class="LineNr"> 9434 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> +<span id="L9435" class="LineNr"> 9435 </span> c1 5/subop/shift-right-logical %edx 4/imm8 +<span id="L9436" class="LineNr"> 9436 </span> <span class="subxComment"># var i/ebx: int = 0</span> +<span id="L9437" class="LineNr"> 9437 </span> bb/copy-to-ebx 0/imm32 +<span id="L9438" class="LineNr"> 9438 </span> { +<span id="L9439" class="LineNr"> 9439 </span><span class="Constant">$populate-mu-type-offsets:loop</span>: +<span id="L9440" class="LineNr"> 9440 </span> 39/compare %ebx 2/r32/edx +<span id="L9441" class="LineNr"> 9441 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 +<span id="L9442" class="LineNr"> 9442 </span><span class="CommentedCode">#? (write-buffered Stderr "looking up index ")</span> +<span id="L9443" class="LineNr"> 9443 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> +<span id="L9444" class="LineNr"> 9444 </span><span class="CommentedCode">#? (write-buffered Stderr " in ")</span> +<span id="L9445" class="LineNr"> 9445 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+8))</span> +<span id="L9446" class="LineNr"> 9446 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L9447" class="LineNr"> 9447 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L9448" class="LineNr"> 9448 </span> <span class="subxComment"># var v/esi: (addr typeinfo-entry)</span> +<span id="L9449" class="LineNr"> 9449 </span> (<a href='mu.subx.html#L9476'>locate-typeinfo-entry-with-index</a> %ecx %ebx *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L9450" class="LineNr"> 9450 </span> 89/<- %esi 0/r32/eax +<span id="L9451" class="LineNr"> 9451 </span> <span class="subxComment"># v->output-var->offset = curr-offset</span> +<span id="L9452" class="LineNr"> 9452 </span> <span class="subxS1Comment"># . eax: (addr var)</span> +<span id="L9453" class="LineNr"> 9453 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Typeinfo-entry-output-var Typeinfo-entry-output-var => eax</span> +<span id="L9454" class="LineNr"> 9454 </span> 89/<- *(eax+0x14) 7/r32/edi <span class="subxComment"># Var-offset</span> +<span id="L9455" class="LineNr"> 9455 </span> <span class="subxComment"># curr-offset += size-of(v->input-var)</span> +<span id="L9456" class="LineNr"> 9456 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># Typeinfo-entry-input-var Typeinfo-entry-input-var => eax</span> +<span id="L9457" class="LineNr"> 9457 </span> (<a href='mu.subx.html#L10158'>size-of</a> %eax) <span class="subxComment"># => eax</span> +<span id="L9458" class="LineNr"> 9458 </span> 01/add-to %edi 0/r32/eax +<span id="L9459" class="LineNr"> 9459 </span> <span class="subxComment"># ++i</span> +<span id="L9460" class="LineNr"> 9460 </span> 43/increment-ebx +<span id="L9461" class="LineNr"> 9461 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9462" class="LineNr"> 9462 </span> } +<span id="L9463" class="LineNr"> 9463 </span><span class="Constant">$populate-mu-type-offsets:end</span>: +<span id="L9464" class="LineNr"> 9464 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9465" class="LineNr"> 9465 </span> 5f/pop-to-edi +<span id="L9466" class="LineNr"> 9466 </span> 5e/pop-to-esi +<span id="L9467" class="LineNr"> 9467 </span> 5b/pop-to-ebx +<span id="L9468" class="LineNr"> 9468 </span> 5a/pop-to-edx +<span id="L9469" class="LineNr"> 9469 </span> 59/pop-to-ecx +<span id="L9470" class="LineNr"> 9470 </span> 58/pop-to-eax +<span id="L9471" class="LineNr"> 9471 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9472" class="LineNr"> 9472 </span> 89/<- %esp 5/r32/ebp +<span id="L9473" class="LineNr"> 9473 </span> 5d/pop-to-ebp +<span id="L9474" class="LineNr"> 9474 </span> c3/return +<span id="L9475" class="LineNr"> 9475 </span> +<span id="L9476" class="LineNr"> 9476 </span><span class="subxFunction">locate-typeinfo-entry-with-index</span>: <span class="subxComment"># table: (addr table (handle array byte) (handle typeinfo-entry)), idx: int, err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: (addr typeinfo-entry)</span> +<span id="L9477" class="LineNr"> 9477 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9478" class="LineNr"> 9478 </span> 55/push-ebp +<span id="L9479" class="LineNr"> 9479 </span> 89/<- %ebp 4/r32/esp +<span id="L9480" class="LineNr"> 9480 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9481" class="LineNr"> 9481 </span> 51/push-ecx +<span id="L9482" class="LineNr"> 9482 </span> 52/push-edx +<span id="L9483" class="LineNr"> 9483 </span> 53/push-ebx +<span id="L9484" class="LineNr"> 9484 </span> 56/push-esi +<span id="L9485" class="LineNr"> 9485 </span> 57/push-edi +<span id="L9486" class="LineNr"> 9486 </span> <span class="subxComment"># esi = table</span> +<span id="L9487" class="LineNr"> 9487 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9488" class="LineNr"> 9488 </span> <span class="subxComment"># var curr/ecx: (addr row (handle array byte) (handle typeinfo-entry)) = table->data</span> +<span id="L9489" class="LineNr"> 9489 </span> 8d/copy-address *(esi+0xc) 1/r32/ecx +<span id="L9490" class="LineNr"> 9490 </span> <span class="subxComment"># var max/edx: (addr byte) = &table->data[table->write]</span> +<span id="L9491" class="LineNr"> 9491 </span> 8b/-> *esi 2/r32/edx +<span id="L9492" class="LineNr"> 9492 </span> 8d/copy-address *(ecx+edx) 2/r32/edx +<span id="L9493" class="LineNr"> 9493 </span> { +<span id="L9494" class="LineNr"> 9494 </span><span class="Constant">$locate-typeinfo-entry-with-index:loop</span>: +<span id="L9495" class="LineNr"> 9495 </span> 39/compare %ecx 2/r32/edx +<span id="L9496" class="LineNr"> 9496 </span> 73/jump-if-addr>= $locate-typeinfo-entry-with-index:abort/disp8 +<span id="L9497" class="LineNr"> 9497 </span> <span class="subxComment"># var v/eax: (addr typeinfo-entry)</span> +<span id="L9498" class="LineNr"> 9498 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># => eax</span> +<span id="L9499" class="LineNr"> 9499 </span> <span class="subxComment"># if (v->index == idx) return v</span> +<span id="L9500" class="LineNr"> 9500 </span> 8b/-> *(eax+8) 3/r32/ebx <span class="subxComment"># Typeinfo-entry-index</span> +<span id="L9501" class="LineNr"> 9501 </span><span class="CommentedCode">#? (write-buffered Stderr "comparing ")</span> +<span id="L9502" class="LineNr"> 9502 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> +<span id="L9503" class="LineNr"> 9503 </span><span class="CommentedCode">#? (write-buffered Stderr " and ")</span> +<span id="L9504" class="LineNr"> 9504 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ebp+0xc))</span> +<span id="L9505" class="LineNr"> 9505 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L9506" class="LineNr"> 9506 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L9507" class="LineNr"> 9507 </span> 39/compare *(ebp+0xc) 3/r32/ebx +<span id="L9508" class="LineNr"> 9508 </span> 74/jump-if-= $locate-typeinfo-entry-with-index:end/disp8 +<span id="L9509" class="LineNr"> 9509 </span> <span class="subxComment"># curr += Typeinfo-entry-size</span> +<span id="L9510" class="LineNr"> 9510 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-entry-size</span> +<span id="L9511" class="LineNr"> 9511 </span> <span class="subxComment">#</span> +<span id="L9512" class="LineNr"> 9512 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9513" class="LineNr"> 9513 </span> } +<span id="L9514" class="LineNr"> 9514 </span> <span class="subxComment"># return 0</span> +<span id="L9515" class="LineNr"> 9515 </span> b8/copy-to-eax 0/imm32 +<span id="L9516" class="LineNr"> 9516 </span><span class="Constant">$locate-typeinfo-entry-with-index:end</span>: +<span id="L9517" class="LineNr"> 9517 </span><span class="CommentedCode">#? (write-buffered Stderr "returning ")</span> +<span id="L9518" class="LineNr"> 9518 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L9519" class="LineNr"> 9519 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L9520" class="LineNr"> 9520 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L9521" class="LineNr"> 9521 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9522" class="LineNr"> 9522 </span> 5f/pop-to-edi +<span id="L9523" class="LineNr"> 9523 </span> 5e/pop-to-esi +<span id="L9524" class="LineNr"> 9524 </span> 5b/pop-to-ebx +<span id="L9525" class="LineNr"> 9525 </span> 5a/pop-to-edx +<span id="L9526" class="LineNr"> 9526 </span> 59/pop-to-ecx +<span id="L9527" class="LineNr"> 9527 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9528" class="LineNr"> 9528 </span> 89/<- %esp 5/r32/ebp +<span id="L9529" class="LineNr"> 9529 </span> 5d/pop-to-ebp +<span id="L9530" class="LineNr"> 9530 </span> c3/return +<span id="L9531" class="LineNr"> 9531 </span> +<span id="L9532" class="LineNr"> 9532 </span><span class="Constant">$locate-typeinfo-entry-with-index:abort</span>: +<span id="L9533" class="LineNr"> 9533 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"overflowing typeinfo-entry->index "</span>) +<span id="L9534" class="LineNr"> 9534 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0x10) %ecx) +<span id="L9535" class="LineNr"> 9535 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"\n"</span>) +<span id="L9536" class="LineNr"> 9536 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L9537" class="LineNr"> 9537 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L9538" class="LineNr"> 9538 </span> <span class="subxComment"># never gets here</span> <span id="L9539" class="LineNr"> 9539 </span> -<span id="L9540" class="LineNr"> 9540 </span><span class="subxFunction">dump-typeinfo</span>: <span class="subxComment"># in: (addr typeinfo)</span> +<span id="L9540" class="LineNr"> 9540 </span><span class="subxFunction">dump-typeinfos</span>: <span class="subxComment"># hdr: (addr array byte)</span> <span id="L9541" class="LineNr"> 9541 </span> <span class="subxS1Comment"># . prologue</span> <span id="L9542" class="LineNr"> 9542 </span> 55/push-ebp <span id="L9543" class="LineNr"> 9543 </span> 89/<- %ebp 4/r32/esp <span id="L9544" class="LineNr"> 9544 </span> <span class="subxS1Comment"># . save registers</span> <span id="L9545" class="LineNr"> 9545 </span> 50/push-eax -<span id="L9546" class="LineNr"> 9546 </span> 51/push-ecx -<span id="L9547" class="LineNr"> 9547 </span> 52/push-edx -<span id="L9548" class="LineNr"> 9548 </span> 53/push-ebx -<span id="L9549" class="LineNr"> 9549 </span> 56/push-esi -<span id="L9550" class="LineNr"> 9550 </span> 57/push-edi -<span id="L9551" class="LineNr"> 9551 </span> <span class="subxComment"># esi = in</span> -<span id="L9552" class="LineNr"> 9552 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9553" class="LineNr"> 9553 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(T->fields)</span> -<span id="L9554" class="LineNr"> 9554 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> -<span id="L9555" class="LineNr"> 9555 </span> 89/<- %ecx 0/r32/eax -<span id="L9556" class="LineNr"> 9556 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"id:"</span>) -<span id="L9557" class="LineNr"> 9557 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *esi) -<span id="L9558" class="LineNr"> 9558 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"\n"</span>) -<span id="L9559" class="LineNr"> 9559 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"fields @ "</span>) -<span id="L9560" class="LineNr"> 9560 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %ecx) -<span id="L9561" class="LineNr"> 9561 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9562" class="LineNr"> 9562 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9563" class="LineNr"> 9563 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../057write.subx.html#L24'>write</a>: "</span>) -<span id="L9564" class="LineNr"> 9564 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ecx) -<span id="L9565" class="LineNr"> 9565 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9566" class="LineNr"> 9566 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9567" class="LineNr"> 9567 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../060read.subx.html#L48'>read</a>: "</span>) -<span id="L9568" class="LineNr"> 9568 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+4)) -<span id="L9569" class="LineNr"> 9569 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9570" class="LineNr"> 9570 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9571" class="LineNr"> 9571 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../106size.subx.html#L5'>size</a>: "</span>) -<span id="L9572" class="LineNr"> 9572 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+8)) -<span id="L9573" class="LineNr"> 9573 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9574" class="LineNr"> 9574 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9575" class="LineNr"> 9575 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> -<span id="L9576" class="LineNr"> 9576 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> -<span id="L9577" class="LineNr"> 9577 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> -<span id="L9578" class="LineNr"> 9578 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx -<span id="L9579" class="LineNr"> 9579 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> -<span id="L9580" class="LineNr"> 9580 </span> 8d/copy-address *(ecx+edx) 2/r32/edx -<span id="L9581" class="LineNr"> 9581 </span> { -<span id="L9582" class="LineNr"> 9582 </span><span class="Constant">$dump-typeinfo:loop</span>: -<span id="L9583" class="LineNr"> 9583 </span> <span class="subxComment"># if (curr >= max) break</span> -<span id="L9584" class="LineNr"> 9584 </span> 39/compare %ecx 2/r32/edx -<span id="L9585" class="LineNr"> 9585 </span> 0f 83/jump-if-addr>= <span class="Constant">break</span>/disp32 -<span id="L9586" class="LineNr"> 9586 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" row:\n"</span>) -<span id="L9587" class="LineNr"> 9587 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" key: "</span>) -<span id="L9588" class="LineNr"> 9588 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ecx) -<span id="L9589" class="LineNr"> 9589 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) -<span id="L9590" class="LineNr"> 9590 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+4)) -<span id="L9591" class="LineNr"> 9591 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" = '"</span>) -<span id="L9592" class="LineNr"> 9592 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) -<span id="L9593" class="LineNr"> 9593 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9594" class="LineNr"> 9594 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"' @ "</span>) -<span id="L9595" class="LineNr"> 9595 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9596" class="LineNr"> 9596 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9597" class="LineNr"> 9597 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9598" class="LineNr"> 9598 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" value: "</span>) -<span id="L9599" class="LineNr"> 9599 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+8)) -<span id="L9600" class="LineNr"> 9600 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) -<span id="L9601" class="LineNr"> 9601 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+0xc)) -<span id="L9602" class="LineNr"> 9602 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" = typeinfo-entry@"</span>) -<span id="L9603" class="LineNr"> 9603 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) -<span id="L9604" class="LineNr"> 9604 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9605" class="LineNr"> 9605 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9606" class="LineNr"> 9606 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9607" class="LineNr"> 9607 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" input var@"</span>) -<span id="L9608" class="LineNr"> 9608 </span> (<a href='mu.subx.html#L9636'>dump-var</a> 5 %eax) -<span id="L9609" class="LineNr"> 9609 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) -<span id="L9610" class="LineNr"> 9610 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" index: "</span>) -<span id="L9611" class="LineNr"> 9611 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(eax+8)) -<span id="L9612" class="LineNr"> 9612 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9613" class="LineNr"> 9613 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9614" class="LineNr"> 9614 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" output var@"</span>) -<span id="L9615" class="LineNr"> 9615 </span> 8d/copy-address *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> -<span id="L9616" class="LineNr"> 9616 </span> (<a href='mu.subx.html#L9636'>dump-var</a> 5 %eax) -<span id="L9617" class="LineNr"> 9617 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9618" class="LineNr"> 9618 </span> <span class="subxComment"># curr += row-size</span> -<span id="L9619" class="LineNr"> 9619 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> -<span id="L9620" class="LineNr"> 9620 </span> <span class="subxComment">#</span> -<span id="L9621" class="LineNr"> 9621 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L9622" class="LineNr"> 9622 </span> } -<span id="L9623" class="LineNr"> 9623 </span><span class="Constant">$dump-typeinfo:end</span>: -<span id="L9624" class="LineNr"> 9624 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9625" class="LineNr"> 9625 </span> 5f/pop-to-edi -<span id="L9626" class="LineNr"> 9626 </span> 5e/pop-to-esi -<span id="L9627" class="LineNr"> 9627 </span> 5b/pop-to-ebx -<span id="L9628" class="LineNr"> 9628 </span> 5a/pop-to-edx -<span id="L9629" class="LineNr"> 9629 </span> 59/pop-to-ecx -<span id="L9630" class="LineNr"> 9630 </span> 58/pop-to-eax -<span id="L9631" class="LineNr"> 9631 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9632" class="LineNr"> 9632 </span> 89/<- %esp 5/r32/ebp -<span id="L9633" class="LineNr"> 9633 </span> 5d/pop-to-ebp -<span id="L9634" class="LineNr"> 9634 </span> c3/return -<span id="L9635" class="LineNr"> 9635 </span> -<span id="L9636" class="LineNr"> 9636 </span><span class="subxFunction">dump-var</span>: <span class="subxComment"># indent: int, v: (addr handle var)</span> -<span id="L9637" class="LineNr"> 9637 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9638" class="LineNr"> 9638 </span> 55/push-ebp -<span id="L9639" class="LineNr"> 9639 </span> 89/<- %ebp 4/r32/esp -<span id="L9640" class="LineNr"> 9640 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9641" class="LineNr"> 9641 </span> 50/push-eax -<span id="L9642" class="LineNr"> 9642 </span> 53/push-ebx -<span id="L9643" class="LineNr"> 9643 </span> <span class="subxComment"># eax = v</span> -<span id="L9644" class="LineNr"> 9644 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L9645" class="LineNr"> 9645 </span> <span class="subxComment">#</span> -<span id="L9646" class="LineNr"> 9646 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *eax) -<span id="L9647" class="LineNr"> 9647 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) -<span id="L9648" class="LineNr"> 9648 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(eax+4)) -<span id="L9649" class="LineNr"> 9649 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) -<span id="L9650" class="LineNr"> 9650 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) -<span id="L9651" class="LineNr"> 9651 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9652" class="LineNr"> 9652 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9653" class="LineNr"> 9653 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9654" class="LineNr"> 9654 </span> { -<span id="L9655" class="LineNr"> 9655 </span> 3d/compare-eax-and 0/imm32 -<span id="L9656" class="LineNr"> 9656 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9657" class="LineNr"> 9657 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) -<span id="L9658" class="LineNr"> 9658 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"name: "</span>) -<span id="L9659" class="LineNr"> 9659 </span> 89/<- %ebx 0/r32/eax -<span id="L9660" class="LineNr"> 9660 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ebx) <span class="subxComment"># Var-name</span> -<span id="L9661" class="LineNr"> 9661 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) -<span id="L9662" class="LineNr"> 9662 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+4)) <span class="subxComment"># Var-name</span> -<span id="L9663" class="LineNr"> 9663 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) -<span id="L9664" class="LineNr"> 9664 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name</span> -<span id="L9665" class="LineNr"> 9665 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9666" class="LineNr"> 9666 </span> { -<span id="L9667" class="LineNr"> 9667 </span> 3d/compare-eax-and 0/imm32 -<span id="L9668" class="LineNr"> 9668 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9669" class="LineNr"> 9669 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L9670" class="LineNr"> 9670 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9671" class="LineNr"> 9671 </span> } -<span id="L9672" class="LineNr"> 9672 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9673" class="LineNr"> 9673 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9674" class="LineNr"> 9674 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) -<span id="L9675" class="LineNr"> 9675 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"block depth: "</span>) -<span id="L9676" class="LineNr"> 9676 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x10)) <span class="subxComment"># Var-block-depth</span> -<span id="L9677" class="LineNr"> 9677 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9678" class="LineNr"> 9678 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9679" class="LineNr"> 9679 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) -<span id="L9680" class="LineNr"> 9680 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"stack offset: "</span>) -<span id="L9681" class="LineNr"> 9681 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x14)) <span class="subxComment"># Var-offset</span> -<span id="L9682" class="LineNr"> 9682 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9683" class="LineNr"> 9683 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9684" class="LineNr"> 9684 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) -<span id="L9685" class="LineNr"> 9685 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"reg: "</span>) -<span id="L9686" class="LineNr"> 9686 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x18)) <span class="subxComment"># Var-register</span> -<span id="L9687" class="LineNr"> 9687 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) -<span id="L9688" class="LineNr"> 9688 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x1c)) <span class="subxComment"># Var-register</span> -<span id="L9689" class="LineNr"> 9689 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) -<span id="L9690" class="LineNr"> 9690 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9691" class="LineNr"> 9691 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register</span> -<span id="L9692" class="LineNr"> 9692 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9693" class="LineNr"> 9693 </span> { -<span id="L9694" class="LineNr"> 9694 </span> 3d/compare-eax-and 0/imm32 -<span id="L9695" class="LineNr"> 9695 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9696" class="LineNr"> 9696 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L9697" class="LineNr"> 9697 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) -<span id="L9698" class="LineNr"> 9698 </span> } -<span id="L9699" class="LineNr"> 9699 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L9700" class="LineNr"> 9700 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) -<span id="L9701" class="LineNr"> 9701 </span> } -<span id="L9702" class="LineNr"> 9702 </span><span class="Constant">$dump-var:end</span>: -<span id="L9703" class="LineNr"> 9703 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9704" class="LineNr"> 9704 </span> 5b/pop-to-ebx -<span id="L9705" class="LineNr"> 9705 </span> 58/pop-to-eax -<span id="L9706" class="LineNr"> 9706 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9707" class="LineNr"> 9707 </span> 89/<- %esp 5/r32/ebp -<span id="L9708" class="LineNr"> 9708 </span> 5d/pop-to-ebp -<span id="L9709" class="LineNr"> 9709 </span> c3/return -<span id="L9710" class="LineNr"> 9710 </span> -<span id="L9711" class="LineNr"> 9711 </span><span class="subxComment">#######################################################</span> -<span id="L9712" class="LineNr"> 9712 </span><span class="subxComment"># Type-checking</span> -<span id="L9713" class="LineNr"> 9713 </span><span class="subxComment">#######################################################</span> -<span id="L9714" class="LineNr"> 9714 </span> -<span id="L9715" class="LineNr"> 9715 </span><span class="subxFunction">check-mu-types</span>: <span class="subxComment"># err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9716" class="LineNr"> 9716 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9717" class="LineNr"> 9717 </span> 55/push-ebp -<span id="L9718" class="LineNr"> 9718 </span> 89/<- %ebp 4/r32/esp -<span id="L9719" class="LineNr"> 9719 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9720" class="LineNr"> 9720 </span> 50/push-eax -<span id="L9721" class="LineNr"> 9721 </span> <span class="subxComment"># var curr/eax: (addr function) = *Program->functions</span> -<span id="L9722" class="LineNr"> 9722 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> -<span id="L9723" class="LineNr"> 9723 </span> { -<span id="L9724" class="LineNr"> 9724 </span><span class="Constant">$check-mu-types:loop</span>: -<span id="L9725" class="LineNr"> 9725 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L9726" class="LineNr"> 9726 </span> 3d/compare-eax-and 0/imm32 -<span id="L9727" class="LineNr"> 9727 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9728" class="LineNr"> 9728 </span> (<a href='mu.subx.html#L9741'>check-mu-function</a> %eax *(ebp+8) *(ebp+0xc)) -<span id="L9729" class="LineNr"> 9729 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L9730" class="LineNr"> 9730 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x20) *(eax+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> -<span id="L9731" class="LineNr"> 9731 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L9732" class="LineNr"> 9732 </span> } -<span id="L9733" class="LineNr"> 9733 </span><span class="Constant">$check-mu-types:end</span>: -<span id="L9734" class="LineNr"> 9734 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9546" class="LineNr"> 9546 </span> <span class="subxComment">#</span> +<span id="L9547" class="LineNr"> 9547 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) +<span id="L9548" class="LineNr"> 9548 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9549" class="LineNr"> 9549 </span> <span class="subxComment"># var curr/eax: (addr typeinfo) = lookup(Program->types)</span> +<span id="L9550" class="LineNr"> 9550 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-types *_Program-types->payload) <span class="subxComment"># => eax</span> +<span id="L9551" class="LineNr"> 9551 </span> { +<span id="L9552" class="LineNr"> 9552 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L9553" class="LineNr"> 9553 </span> 3d/compare-eax-and 0/imm32 +<span id="L9554" class="LineNr"> 9554 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9555" class="LineNr"> 9555 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"---\n"</span>) +<span id="L9556" class="LineNr"> 9556 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9557" class="LineNr"> 9557 </span> (<a href='mu.subx.html#L9570'>dump-typeinfo</a> %eax) +<span id="L9558" class="LineNr"> 9558 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L9559" class="LineNr"> 9559 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x10) *(eax+0x14)) <span class="subxComment"># Typeinfo-next Typeinfo-next => eax</span> +<span id="L9560" class="LineNr"> 9560 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L9561" class="LineNr"> 9561 </span> } +<span id="L9562" class="LineNr"> 9562 </span><span class="Constant">$dump-typeinfos:end</span>: +<span id="L9563" class="LineNr"> 9563 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9564" class="LineNr"> 9564 </span> 58/pop-to-eax +<span id="L9565" class="LineNr"> 9565 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9566" class="LineNr"> 9566 </span> 89/<- %esp 5/r32/ebp +<span id="L9567" class="LineNr"> 9567 </span> 5d/pop-to-ebp +<span id="L9568" class="LineNr"> 9568 </span> c3/return +<span id="L9569" class="LineNr"> 9569 </span> +<span id="L9570" class="LineNr"> 9570 </span><span class="subxFunction">dump-typeinfo</span>: <span class="subxComment"># in: (addr typeinfo)</span> +<span id="L9571" class="LineNr"> 9571 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9572" class="LineNr"> 9572 </span> 55/push-ebp +<span id="L9573" class="LineNr"> 9573 </span> 89/<- %ebp 4/r32/esp +<span id="L9574" class="LineNr"> 9574 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9575" class="LineNr"> 9575 </span> 50/push-eax +<span id="L9576" class="LineNr"> 9576 </span> 51/push-ecx +<span id="L9577" class="LineNr"> 9577 </span> 52/push-edx +<span id="L9578" class="LineNr"> 9578 </span> 53/push-ebx +<span id="L9579" class="LineNr"> 9579 </span> 56/push-esi +<span id="L9580" class="LineNr"> 9580 </span> 57/push-edi +<span id="L9581" class="LineNr"> 9581 </span> <span class="subxComment"># esi = in</span> +<span id="L9582" class="LineNr"> 9582 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9583" class="LineNr"> 9583 </span> <span class="subxComment"># var table/ecx: (addr table (handle array byte) (handle typeinfo-entry)) = lookup(T->fields)</span> +<span id="L9584" class="LineNr"> 9584 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Typeinfo-fields Typeinfo-fields => eax</span> +<span id="L9585" class="LineNr"> 9585 </span> 89/<- %ecx 0/r32/eax +<span id="L9586" class="LineNr"> 9586 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"id:"</span>) +<span id="L9587" class="LineNr"> 9587 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *esi) +<span id="L9588" class="LineNr"> 9588 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"\n"</span>) +<span id="L9589" class="LineNr"> 9589 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"fields @ "</span>) +<span id="L9590" class="LineNr"> 9590 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %ecx) +<span id="L9591" class="LineNr"> 9591 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9592" class="LineNr"> 9592 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9593" class="LineNr"> 9593 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../057write.subx.html#L24'>write</a>: "</span>) +<span id="L9594" class="LineNr"> 9594 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ecx) +<span id="L9595" class="LineNr"> 9595 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9596" class="LineNr"> 9596 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9597" class="LineNr"> 9597 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../060read.subx.html#L48'>read</a>: "</span>) +<span id="L9598" class="LineNr"> 9598 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+4)) +<span id="L9599" class="LineNr"> 9599 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9600" class="LineNr"> 9600 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9601" class="LineNr"> 9601 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" <a href='../106size.subx.html#L5'>size</a>: "</span>) +<span id="L9602" class="LineNr"> 9602 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+8)) +<span id="L9603" class="LineNr"> 9603 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9604" class="LineNr"> 9604 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9605" class="LineNr"> 9605 </span> <span class="subxComment"># var table-size/edx: int = table->write</span> +<span id="L9606" class="LineNr"> 9606 </span> 8b/-> *ecx 2/r32/edx <span class="subxComment"># stream-write</span> +<span id="L9607" class="LineNr"> 9607 </span> <span class="subxComment"># var curr/ecx: (addr table_row) = table->data</span> +<span id="L9608" class="LineNr"> 9608 </span> 8d/copy-address *(ecx+0xc) 1/r32/ecx +<span id="L9609" class="LineNr"> 9609 </span> <span class="subxComment"># var max/edx: (addr table_row) = table->data + table->write</span> +<span id="L9610" class="LineNr"> 9610 </span> 8d/copy-address *(ecx+edx) 2/r32/edx +<span id="L9611" class="LineNr"> 9611 </span> { +<span id="L9612" class="LineNr"> 9612 </span><span class="Constant">$dump-typeinfo:loop</span>: +<span id="L9613" class="LineNr"> 9613 </span> <span class="subxComment"># if (curr >= max) break</span> +<span id="L9614" class="LineNr"> 9614 </span> 39/compare %ecx 2/r32/edx +<span id="L9615" class="LineNr"> 9615 </span> 0f 83/jump-if-addr>= <span class="Constant">break</span>/disp32 +<span id="L9616" class="LineNr"> 9616 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" row:\n"</span>) +<span id="L9617" class="LineNr"> 9617 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" key: "</span>) +<span id="L9618" class="LineNr"> 9618 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ecx) +<span id="L9619" class="LineNr"> 9619 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) +<span id="L9620" class="LineNr"> 9620 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+4)) +<span id="L9621" class="LineNr"> 9621 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" = '"</span>) +<span id="L9622" class="LineNr"> 9622 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) +<span id="L9623" class="LineNr"> 9623 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9624" class="LineNr"> 9624 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"' @ "</span>) +<span id="L9625" class="LineNr"> 9625 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9626" class="LineNr"> 9626 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9627" class="LineNr"> 9627 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9628" class="LineNr"> 9628 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" value: "</span>) +<span id="L9629" class="LineNr"> 9629 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+8)) +<span id="L9630" class="LineNr"> 9630 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) +<span id="L9631" class="LineNr"> 9631 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ecx+0xc)) +<span id="L9632" class="LineNr"> 9632 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" = typeinfo-entry@"</span>) +<span id="L9633" class="LineNr"> 9633 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) +<span id="L9634" class="LineNr"> 9634 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9635" class="LineNr"> 9635 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9636" class="LineNr"> 9636 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9637" class="LineNr"> 9637 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" input var@"</span>) +<span id="L9638" class="LineNr"> 9638 </span> (<a href='mu.subx.html#L9666'>dump-var</a> 5 %eax) +<span id="L9639" class="LineNr"> 9639 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) +<span id="L9640" class="LineNr"> 9640 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" index: "</span>) +<span id="L9641" class="LineNr"> 9641 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(eax+8)) +<span id="L9642" class="LineNr"> 9642 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9643" class="LineNr"> 9643 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9644" class="LineNr"> 9644 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">" output var@"</span>) +<span id="L9645" class="LineNr"> 9645 </span> 8d/copy-address *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-entry-output-var</span> +<span id="L9646" class="LineNr"> 9646 </span> (<a href='mu.subx.html#L9666'>dump-var</a> 5 %eax) +<span id="L9647" class="LineNr"> 9647 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9648" class="LineNr"> 9648 </span> <span class="subxComment"># curr += row-size</span> +<span id="L9649" class="LineNr"> 9649 </span> 81 0/subop/add %ecx 0x10/imm32 <span class="subxComment"># Typeinfo-fields-row-size</span> +<span id="L9650" class="LineNr"> 9650 </span> <span class="subxComment">#</span> +<span id="L9651" class="LineNr"> 9651 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L9652" class="LineNr"> 9652 </span> } +<span id="L9653" class="LineNr"> 9653 </span><span class="Constant">$dump-typeinfo:end</span>: +<span id="L9654" class="LineNr"> 9654 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9655" class="LineNr"> 9655 </span> 5f/pop-to-edi +<span id="L9656" class="LineNr"> 9656 </span> 5e/pop-to-esi +<span id="L9657" class="LineNr"> 9657 </span> 5b/pop-to-ebx +<span id="L9658" class="LineNr"> 9658 </span> 5a/pop-to-edx +<span id="L9659" class="LineNr"> 9659 </span> 59/pop-to-ecx +<span id="L9660" class="LineNr"> 9660 </span> 58/pop-to-eax +<span id="L9661" class="LineNr"> 9661 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9662" class="LineNr"> 9662 </span> 89/<- %esp 5/r32/ebp +<span id="L9663" class="LineNr"> 9663 </span> 5d/pop-to-ebp +<span id="L9664" class="LineNr"> 9664 </span> c3/return +<span id="L9665" class="LineNr"> 9665 </span> +<span id="L9666" class="LineNr"> 9666 </span><span class="subxFunction">dump-var</span>: <span class="subxComment"># indent: int, v: (addr handle var)</span> +<span id="L9667" class="LineNr"> 9667 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9668" class="LineNr"> 9668 </span> 55/push-ebp +<span id="L9669" class="LineNr"> 9669 </span> 89/<- %ebp 4/r32/esp +<span id="L9670" class="LineNr"> 9670 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9671" class="LineNr"> 9671 </span> 50/push-eax +<span id="L9672" class="LineNr"> 9672 </span> 53/push-ebx +<span id="L9673" class="LineNr"> 9673 </span> <span class="subxComment"># eax = v</span> +<span id="L9674" class="LineNr"> 9674 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L9675" class="LineNr"> 9675 </span> <span class="subxComment">#</span> +<span id="L9676" class="LineNr"> 9676 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *eax) +<span id="L9677" class="LineNr"> 9677 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) +<span id="L9678" class="LineNr"> 9678 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(eax+4)) +<span id="L9679" class="LineNr"> 9679 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) +<span id="L9680" class="LineNr"> 9680 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) +<span id="L9681" class="LineNr"> 9681 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9682" class="LineNr"> 9682 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9683" class="LineNr"> 9683 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9684" class="LineNr"> 9684 </span> { +<span id="L9685" class="LineNr"> 9685 </span> 3d/compare-eax-and 0/imm32 +<span id="L9686" class="LineNr"> 9686 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9687" class="LineNr"> 9687 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) +<span id="L9688" class="LineNr"> 9688 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"name: "</span>) +<span id="L9689" class="LineNr"> 9689 </span> 89/<- %ebx 0/r32/eax +<span id="L9690" class="LineNr"> 9690 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *ebx) <span class="subxComment"># Var-name</span> +<span id="L9691" class="LineNr"> 9691 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) +<span id="L9692" class="LineNr"> 9692 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+4)) <span class="subxComment"># Var-name</span> +<span id="L9693" class="LineNr"> 9693 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) +<span id="L9694" class="LineNr"> 9694 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name</span> +<span id="L9695" class="LineNr"> 9695 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9696" class="LineNr"> 9696 </span> { +<span id="L9697" class="LineNr"> 9697 </span> 3d/compare-eax-and 0/imm32 +<span id="L9698" class="LineNr"> 9698 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9699" class="LineNr"> 9699 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L9700" class="LineNr"> 9700 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9701" class="LineNr"> 9701 </span> } +<span id="L9702" class="LineNr"> 9702 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9703" class="LineNr"> 9703 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9704" class="LineNr"> 9704 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) +<span id="L9705" class="LineNr"> 9705 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"block depth: "</span>) +<span id="L9706" class="LineNr"> 9706 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x10)) <span class="subxComment"># Var-block-depth</span> +<span id="L9707" class="LineNr"> 9707 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9708" class="LineNr"> 9708 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9709" class="LineNr"> 9709 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) +<span id="L9710" class="LineNr"> 9710 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"stack offset: "</span>) +<span id="L9711" class="LineNr"> 9711 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x14)) <span class="subxComment"># Var-offset</span> +<span id="L9712" class="LineNr"> 9712 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9713" class="LineNr"> 9713 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9714" class="LineNr"> 9714 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebp+8)) +<span id="L9715" class="LineNr"> 9715 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"reg: "</span>) +<span id="L9716" class="LineNr"> 9716 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x18)) <span class="subxComment"># Var-register</span> +<span id="L9717" class="LineNr"> 9717 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">","</span>) +<span id="L9718" class="LineNr"> 9718 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> *(ebx+0x1c)) <span class="subxComment"># Var-register</span> +<span id="L9719" class="LineNr"> 9719 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="Constant">"->"</span>) +<span id="L9720" class="LineNr"> 9720 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9721" class="LineNr"> 9721 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register</span> +<span id="L9722" class="LineNr"> 9722 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9723" class="LineNr"> 9723 </span> { +<span id="L9724" class="LineNr"> 9724 </span> 3d/compare-eax-and 0/imm32 +<span id="L9725" class="LineNr"> 9725 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9726" class="LineNr"> 9726 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L9727" class="LineNr"> 9727 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> %eax) +<span id="L9728" class="LineNr"> 9728 </span> } +<span id="L9729" class="LineNr"> 9729 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L9730" class="LineNr"> 9730 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span>) +<span id="L9731" class="LineNr"> 9731 </span> } +<span id="L9732" class="LineNr"> 9732 </span><span class="Constant">$dump-var:end</span>: +<span id="L9733" class="LineNr"> 9733 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9734" class="LineNr"> 9734 </span> 5b/pop-to-ebx <span id="L9735" class="LineNr"> 9735 </span> 58/pop-to-eax <span id="L9736" class="LineNr"> 9736 </span> <span class="subxS1Comment"># . epilogue</span> <span id="L9737" class="LineNr"> 9737 </span> 89/<- %esp 5/r32/ebp <span id="L9738" class="LineNr"> 9738 </span> 5d/pop-to-ebp <span id="L9739" class="LineNr"> 9739 </span> c3/return <span id="L9740" class="LineNr"> 9740 </span> -<span id="L9741" class="LineNr"> 9741 </span><span class="subxFunction">check-mu-function</span>: <span class="subxComment"># fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9742" class="LineNr"> 9742 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9743" class="LineNr"> 9743 </span> 55/push-ebp -<span id="L9744" class="LineNr"> 9744 </span> 89/<- %ebp 4/r32/esp -<span id="L9745" class="LineNr"> 9745 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9746" class="LineNr"> 9746 </span> 50/push-eax -<span id="L9747" class="LineNr"> 9747 </span> <span class="subxComment"># eax = f</span> -<span id="L9748" class="LineNr"> 9748 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L9749" class="LineNr"> 9749 </span> <span class="subxComment"># TODO: anything to check in header?</span> -<span id="L9750" class="LineNr"> 9750 </span> <span class="subxComment"># var body/eax: (addr block) = lookup(f->body)</span> -<span id="L9751" class="LineNr"> 9751 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Function-body Function-body => eax</span> -<span id="L9752" class="LineNr"> 9752 </span> (<a href='mu.subx.html#L9761'>check-mu-block</a> %eax *(ebp+8) *(ebp+0xc) *(ebp+0x10)) -<span id="L9753" class="LineNr"> 9753 </span><span class="Constant">$check-mu-function:end</span>: -<span id="L9754" class="LineNr"> 9754 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9755" class="LineNr"> 9755 </span> 58/pop-to-eax -<span id="L9756" class="LineNr"> 9756 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9757" class="LineNr"> 9757 </span> 89/<- %esp 5/r32/ebp -<span id="L9758" class="LineNr"> 9758 </span> 5d/pop-to-ebp -<span id="L9759" class="LineNr"> 9759 </span> c3/return -<span id="L9760" class="LineNr"> 9760 </span> -<span id="L9761" class="LineNr"> 9761 </span><span class="subxFunction">check-mu-block</span>: <span class="subxComment"># block: (addr block), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9762" class="LineNr"> 9762 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9763" class="LineNr"> 9763 </span> 55/push-ebp -<span id="L9764" class="LineNr"> 9764 </span> 89/<- %ebp 4/r32/esp -<span id="L9765" class="LineNr"> 9765 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9766" class="LineNr"> 9766 </span> 50/push-eax -<span id="L9767" class="LineNr"> 9767 </span> <span class="subxComment"># eax = block</span> -<span id="L9768" class="LineNr"> 9768 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L9769" class="LineNr"> 9769 </span> <span class="subxComment"># var stmts/eax: (addr list stmt) = lookup(block->statements)</span> -<span id="L9770" class="LineNr"> 9770 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> -<span id="L9771" class="LineNr"> 9771 </span> <span class="subxComment">#</span> -<span id="L9772" class="LineNr"> 9772 </span> { -<span id="L9773" class="LineNr"> 9773 </span><span class="Constant">$check-mu-block:check-empty</span>: -<span id="L9774" class="LineNr"> 9774 </span> 3d/compare-eax-and 0/imm32 -<span id="L9775" class="LineNr"> 9775 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9776" class="LineNr"> 9776 </span> <span class="subxComment"># emit block->statements</span> -<span id="L9777" class="LineNr"> 9777 </span> (<a href='mu.subx.html#L9787'>check-mu-stmt-list</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L9778" class="LineNr"> 9778 </span> } -<span id="L9779" class="LineNr"> 9779 </span><span class="Constant">$check-mu-block:end</span>: -<span id="L9780" class="LineNr"> 9780 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9781" class="LineNr"> 9781 </span> 58/pop-to-eax -<span id="L9782" class="LineNr"> 9782 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9783" class="LineNr"> 9783 </span> 89/<- %esp 5/r32/ebp -<span id="L9784" class="LineNr"> 9784 </span> 5d/pop-to-ebp -<span id="L9785" class="LineNr"> 9785 </span> c3/return -<span id="L9786" class="LineNr"> 9786 </span> -<span id="L9787" class="LineNr"> 9787 </span><span class="subxFunction">check-mu-stmt-list</span>: <span class="subxComment"># stmts: (addr list stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9788" class="LineNr"> 9788 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9789" class="LineNr"> 9789 </span> 55/push-ebp -<span id="L9790" class="LineNr"> 9790 </span> 89/<- %ebp 4/r32/esp -<span id="L9791" class="LineNr"> 9791 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9792" class="LineNr"> 9792 </span> 50/push-eax -<span id="L9793" class="LineNr"> 9793 </span> 56/push-esi -<span id="L9794" class="LineNr"> 9794 </span> <span class="subxComment"># esi = stmts</span> -<span id="L9795" class="LineNr"> 9795 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9796" class="LineNr"> 9796 </span> { -<span id="L9797" class="LineNr"> 9797 </span><span class="Constant">$check-mu-stmt-list:loop</span>: -<span id="L9798" class="LineNr"> 9798 </span> 81 7/subop/compare %esi 0/imm32 -<span id="L9799" class="LineNr"> 9799 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9800" class="LineNr"> 9800 </span> <span class="subxComment"># var curr-stmt/eax: (addr stmt) = lookup(stmts->value)</span> -<span id="L9801" class="LineNr"> 9801 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L9802" class="LineNr"> 9802 </span> { -<span id="L9803" class="LineNr"> 9803 </span><span class="Constant">$check-mu-stmt-list:check-for-block</span>: -<span id="L9804" class="LineNr"> 9804 </span> 81 7/subop/compare *eax 0/imm32/block <span class="subxComment"># Stmt-tag</span> -<span id="L9805" class="LineNr"> 9805 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9806" class="LineNr"> 9806 </span><span class="Constant">$check-mu-stmt-list:block</span>: -<span id="L9807" class="LineNr"> 9807 </span> (<a href='mu.subx.html#L9761'>check-mu-block</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L9808" class="LineNr"> 9808 </span> eb/jump $check-mu-stmt-list:continue/disp8 -<span id="L9809" class="LineNr"> 9809 </span> } -<span id="L9810" class="LineNr"> 9810 </span> { -<span id="L9811" class="LineNr"> 9811 </span><span class="Constant">$check-mu-stmt-list:check-for-stmt1</span>: -<span id="L9812" class="LineNr"> 9812 </span> 81 7/subop/compare *eax 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> -<span id="L9813" class="LineNr"> 9813 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L9814" class="LineNr"> 9814 </span><span class="Constant">$check-mu-stmt-list:stmt1</span>: -<span id="L9815" class="LineNr"> 9815 </span> (<a href='mu.subx.html#L9841'>check-mu-stmt</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L9816" class="LineNr"> 9816 </span> eb/jump $check-mu-stmt-list:continue/disp8 -<span id="L9817" class="LineNr"> 9817 </span> } -<span id="L9818" class="LineNr"> 9818 </span> { -<span id="L9819" class="LineNr"> 9819 </span><span class="Constant">$check-mu-stmt-list:check-for-reg-var-def</span>: -<span id="L9820" class="LineNr"> 9820 </span> 81 7/subop/compare *eax 3/imm32/reg-var-def <span class="subxComment"># Stmt-tag</span> -<span id="L9821" class="LineNr"> 9821 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L9822" class="LineNr"> 9822 </span><span class="Constant">$check-mu-stmt-list:reg-var-def</span>: -<span id="L9823" class="LineNr"> 9823 </span> (<a href='mu.subx.html#L9841'>check-mu-stmt</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L9824" class="LineNr"> 9824 </span> eb/jump $check-mu-stmt-list:continue/disp8 -<span id="L9825" class="LineNr"> 9825 </span> } -<span id="L9826" class="LineNr"> 9826 </span><span class="Constant">$check-mu-stmt-list:continue</span>: -<span id="L9827" class="LineNr"> 9827 </span> <span class="subxComment"># TODO: raise an error on unrecognized Stmt-tag</span> -<span id="L9828" class="LineNr"> 9828 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L9829" class="LineNr"> 9829 </span> 89/<- %esi 0/r32/eax -<span id="L9830" class="LineNr"> 9830 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L9831" class="LineNr"> 9831 </span> } -<span id="L9832" class="LineNr"> 9832 </span><span class="Constant">$check-mu-stmt-list:end</span>: -<span id="L9833" class="LineNr"> 9833 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L9834" class="LineNr"> 9834 </span> 5e/pop-to-esi -<span id="L9835" class="LineNr"> 9835 </span> 58/pop-to-eax -<span id="L9836" class="LineNr"> 9836 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L9837" class="LineNr"> 9837 </span> 89/<- %esp 5/r32/ebp -<span id="L9838" class="LineNr"> 9838 </span> 5d/pop-to-ebp -<span id="L9839" class="LineNr"> 9839 </span> c3/return -<span id="L9840" class="LineNr"> 9840 </span> -<span id="L9841" class="LineNr"> 9841 </span><span class="subxFunction">check-mu-stmt</span>: <span class="subxComment"># stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L9842" class="LineNr"> 9842 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L9843" class="LineNr"> 9843 </span> 55/push-ebp -<span id="L9844" class="LineNr"> 9844 </span> 89/<- %ebp 4/r32/esp -<span id="L9845" class="LineNr"> 9845 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L9846" class="LineNr"> 9846 </span> 50/push-eax -<span id="L9847" class="LineNr"> 9847 </span> 51/push-ecx -<span id="L9848" class="LineNr"> 9848 </span> 52/push-edx -<span id="L9849" class="LineNr"> 9849 </span> 53/push-ebx -<span id="L9850" class="LineNr"> 9850 </span> 56/push-esi -<span id="L9851" class="LineNr"> 9851 </span> 57/push-edi -<span id="L9852" class="LineNr"> 9852 </span> <span class="subxComment"># esi = stmt</span> -<span id="L9853" class="LineNr"> 9853 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L9854" class="LineNr"> 9854 </span> <span class="subxComment"># var f/edi: (addr function) = lookup(*Program->functions)</span> -<span id="L9855" class="LineNr"> 9855 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> -<span id="L9856" class="LineNr"> 9856 </span> (<a href='mu.subx.html#L16347'>find-matching-function</a> %eax *(ebp+8)) <span class="subxComment"># => eax</span> -<span id="L9857" class="LineNr"> 9857 </span> 89/<- %edi 0/r32/eax -<span id="L9858" class="LineNr"> 9858 </span> { -<span id="L9859" class="LineNr"> 9859 </span><span class="Constant">$check-mu-stmt:check-for-call</span>: -<span id="L9860" class="LineNr"> 9860 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L9861" class="LineNr"> 9861 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9862" class="LineNr"> 9862 </span><span class="Constant">$check-mu-stmt:is-call</span>: -<span id="L9863" class="LineNr"> 9863 </span> <span class="subxComment"># var inouts/ecx: (addr stmt-var) = lookup(stmt->inouts)</span> -<span id="L9864" class="LineNr"> 9864 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L9865" class="LineNr"> 9865 </span> 89/<- %ecx 0/r32/eax -<span id="L9866" class="LineNr"> 9866 </span> <span class="subxComment"># var expected/edx: (addr list var) = lookup(f->inouts)</span> -<span id="L9867" class="LineNr"> 9867 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># Function-inouts Function-inouts => eax</span> -<span id="L9868" class="LineNr"> 9868 </span> 89/<- %edx 0/r32/eax -<span id="L9869" class="LineNr"> 9869 </span> { -<span id="L9870" class="LineNr"> 9870 </span><span class="Constant">$check-mu-stmt:check-for-inouts</span>: -<span id="L9871" class="LineNr"> 9871 </span> <span class="subxComment"># if (inouts == 0) break</span> -<span id="L9872" class="LineNr"> 9872 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L9873" class="LineNr"> 9873 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9874" class="LineNr"> 9874 </span> <span class="subxComment"># if (expected == 0) error</span> -<span id="L9875" class="LineNr"> 9875 </span> 81 7/subop/compare %edx 0/imm32 -<span id="L9876" class="LineNr"> 9876 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9877" class="LineNr"> 9877 </span><span class="Constant">$check-mu-stmt:check-inout-type</span>: -<span id="L9878" class="LineNr"> 9878 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(inouts->value)</span> -<span id="L9879" class="LineNr"> 9879 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L9880" class="LineNr"> 9880 </span> <span class="subxComment"># var t/ebx: (addr tree type-id) = lookup(v->type)</span> -<span id="L9881" class="LineNr"> 9881 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L9882" class="LineNr"> 9882 </span> 89/<- %ebx 0/r32/eax -<span id="L9883" class="LineNr"> 9883 </span> <span class="subxComment"># if (inouts->is-deref?) t = t->right # TODO: check that t->left is an addr</span> -<span id="L9884" class="LineNr"> 9884 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L9885" class="LineNr"> 9885 </span> { -<span id="L9886" class="LineNr"> 9886 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9887" class="LineNr"> 9887 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0xc) *(ebx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L9888" class="LineNr"> 9888 </span> 89/<- %ebx 0/r32/eax -<span id="L9889" class="LineNr"> 9889 </span> <span class="subxComment"># if t->right is null, t = t->left</span> -<span id="L9890" class="LineNr"> 9890 </span> 81 7/subop/compare *(ebx+0xc) 0/imm32 <span class="subxComment"># Tree-right</span> -<span id="L9891" class="LineNr"> 9891 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L9892" class="LineNr"> 9892 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+4) *(ebx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L9893" class="LineNr"> 9893 </span> 89/<- %ebx 0/r32/eax -<span id="L9894" class="LineNr"> 9894 </span> } -<span id="L9895" class="LineNr"> 9895 </span> <span class="subxComment"># var v2/eax: (addr v) = lookup(expected->value)</span> -<span id="L9896" class="LineNr"> 9896 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L9897" class="LineNr"> 9897 </span> <span class="subxComment"># var t2/eax: (addr tree type-id) = lookup(v2->type)</span> -<span id="L9898" class="LineNr"> 9898 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L9899" class="LineNr"> 9899 </span> <span class="subxComment"># if (t != t2) error</span> -<span id="L9900" class="LineNr"> 9900 </span> (<a href='mu.subx.html#L10110'>type-match?</a> %eax %ebx) <span class="subxComment"># => eax</span> -<span id="L9901" class="LineNr"> 9901 </span> 3d/compare-eax-and 0/imm32/false -<span id="L9902" class="LineNr"> 9902 </span> { -<span id="L9903" class="LineNr"> 9903 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L9904" class="LineNr"> 9904 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L9905" class="LineNr"> 9905 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L9906" class="LineNr"> 9906 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9907" class="LineNr"> 9907 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9908" class="LineNr"> 9908 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L9909" class="LineNr"> 9909 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9910" class="LineNr"> 9910 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9911" class="LineNr"> 9911 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": type for inout '"</span>) -<span id="L9912" class="LineNr"> 9912 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L9913" class="LineNr"> 9913 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L9914" class="LineNr"> 9914 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9915" class="LineNr"> 9915 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"' is not right\n"</span>) -<span id="L9916" class="LineNr"> 9916 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L9917" class="LineNr"> 9917 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L9918" class="LineNr"> 9918 </span> } -<span id="L9919" class="LineNr"> 9919 </span><span class="Constant">$check-mu-stmt:continue-to-next-inout</span>: -<span id="L9920" class="LineNr"> 9920 </span> <span class="subxComment"># inouts = lookup(inouts->next)</span> -<span id="L9921" class="LineNr"> 9921 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L9922" class="LineNr"> 9922 </span> 89/<- %ecx 0/r32/eax -<span id="L9923" class="LineNr"> 9923 </span> <span class="subxComment"># expected = lookup(expected->next)</span> -<span id="L9924" class="LineNr"> 9924 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L9925" class="LineNr"> 9925 </span> 89/<- %edx 0/r32/eax -<span id="L9926" class="LineNr"> 9926 </span> <span class="subxComment">#</span> -<span id="L9927" class="LineNr"> 9927 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L9928" class="LineNr"> 9928 </span> } -<span id="L9929" class="LineNr"> 9929 </span><span class="Constant">$check-mu-stmt:check-inout-count</span>: -<span id="L9930" class="LineNr"> 9930 </span> <span class="subxComment"># if (inouts == expected) proceed</span> -<span id="L9931" class="LineNr"> 9931 </span> 39/compare %ecx 2/r32/edx -<span id="L9932" class="LineNr"> 9932 </span> { -<span id="L9933" class="LineNr"> 9933 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9934" class="LineNr"> 9934 </span> <span class="subxComment"># exactly one of the two is null</span> -<span id="L9935" class="LineNr"> 9935 </span> <span class="subxComment"># if (inouts == 0) error("too many inouts")</span> -<span id="L9936" class="LineNr"> 9936 </span> { -<span id="L9937" class="LineNr"> 9937 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L9938" class="LineNr"> 9938 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9939" class="LineNr"> 9939 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L9940" class="LineNr"> 9940 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L9941" class="LineNr"> 9941 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9942" class="LineNr"> 9942 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9943" class="LineNr"> 9943 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L9944" class="LineNr"> 9944 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9945" class="LineNr"> 9945 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9946" class="LineNr"> 9946 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too many inouts\n"</span>) -<span id="L9947" class="LineNr"> 9947 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L9948" class="LineNr"> 9948 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L9949" class="LineNr"> 9949 </span> } -<span id="L9950" class="LineNr"> 9950 </span> <span class="subxComment"># if (expected == 0) error("too few inouts")</span> -<span id="L9951" class="LineNr"> 9951 </span> { -<span id="L9952" class="LineNr"> 9952 </span> 81 7/subop/compare %edx 0/imm32 -<span id="L9953" class="LineNr"> 9953 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9954" class="LineNr"> 9954 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L9955" class="LineNr"> 9955 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L9956" class="LineNr"> 9956 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9957" class="LineNr"> 9957 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9958" class="LineNr"> 9958 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L9959" class="LineNr"> 9959 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L9960" class="LineNr"> 9960 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L9961" class="LineNr"> 9961 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too few inouts\n"</span>) -<span id="L9962" class="LineNr"> 9962 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L9963" class="LineNr"> 9963 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L9964" class="LineNr"> 9964 </span> } -<span id="L9965" class="LineNr"> 9965 </span> } -<span id="L9966" class="LineNr"> 9966 </span><span class="Constant">$check-mu-stmt:check-outputs</span>: -<span id="L9967" class="LineNr"> 9967 </span> <span class="subxComment"># var outputs/ecx: (addr stmt-var) = lookup(stmt->outputs)</span> -<span id="L9968" class="LineNr"> 9968 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x14) *(esi+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L9969" class="LineNr"> 9969 </span> 89/<- %ecx 0/r32/eax -<span id="L9970" class="LineNr"> 9970 </span> <span class="subxComment"># var expected/edx: (addr list var) = lookup(f->outputs)</span> -<span id="L9971" class="LineNr"> 9971 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x10) *(edi+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> -<span id="L9972" class="LineNr"> 9972 </span> 89/<- %edx 0/r32/eax -<span id="L9973" class="LineNr"> 9973 </span> { -<span id="L9974" class="LineNr"> 9974 </span><span class="Constant">$check-mu-stmt:check-for-outputs</span>: -<span id="L9975" class="LineNr"> 9975 </span> <span class="subxComment"># if (outputs == 0) break</span> -<span id="L9976" class="LineNr"> 9976 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L9977" class="LineNr"> 9977 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9978" class="LineNr"> 9978 </span> <span class="subxComment"># if (expected == 0) error</span> -<span id="L9979" class="LineNr"> 9979 </span> 81 7/subop/compare %edx 0/imm32 -<span id="L9980" class="LineNr"> 9980 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L9981" class="LineNr"> 9981 </span><span class="Constant">$check-mu-stmt:check-output-type</span>: -<span id="L9982" class="LineNr"> 9982 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(outputs->value)</span> -<span id="L9983" class="LineNr"> 9983 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L9984" class="LineNr"> 9984 </span> <span class="subxComment"># var t/ebx: (addr tree type-id) = lookup(v->type)</span> -<span id="L9985" class="LineNr"> 9985 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L9986" class="LineNr"> 9986 </span> 89/<- %ebx 0/r32/eax -<span id="L9987" class="LineNr"> 9987 </span> <span class="subxComment"># if (outputs->is-deref?) t = t->right # TODO: check that t->left is an addr</span> -<span id="L9988" class="LineNr"> 9988 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L9989" class="LineNr"> 9989 </span> { -<span id="L9990" class="LineNr"> 9990 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L9991" class="LineNr"> 9991 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0xc) *(ebx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L9992" class="LineNr"> 9992 </span> 89/<- %ebx 0/r32/eax -<span id="L9993" class="LineNr"> 9993 </span> } -<span id="L9994" class="LineNr"> 9994 </span> <span class="subxComment"># var v2/eax: (addr v) = lookup(expected->value)</span> -<span id="L9995" class="LineNr"> 9995 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L9996" class="LineNr"> 9996 </span> <span class="subxComment"># var t2/eax: (addr tree type-id) = lookup(v2->type)</span> -<span id="L9997" class="LineNr"> 9997 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L9998" class="LineNr"> 9998 </span> <span class="subxComment"># if (t != t2) error</span> -<span id="L9999" class="LineNr"> 9999 </span> (<a href='mu.subx.html#L10323'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> -<span id="L10000" class="LineNr">10000 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10001" class="LineNr">10001 </span> { -<span id="L10002" class="LineNr">10002 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L10003" class="LineNr">10003 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L10004" class="LineNr">10004 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L10005" class="LineNr">10005 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10006" class="LineNr">10006 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10007" class="LineNr">10007 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L10008" class="LineNr">10008 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10009" class="LineNr">10009 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10010" class="LineNr">10010 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": type for output '"</span>) -<span id="L10011" class="LineNr">10011 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L10012" class="LineNr">10012 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L10013" class="LineNr">10013 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10014" class="LineNr">10014 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"' is not right\n"</span>) -<span id="L10015" class="LineNr">10015 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L10016" class="LineNr">10016 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L10017" class="LineNr">10017 </span> } -<span id="L10018" class="LineNr">10018 </span><span class="Constant">$check-mu-stmt:check-output-register</span>: -<span id="L10019" class="LineNr">10019 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(outputs->value)</span> -<span id="L10020" class="LineNr">10020 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L10021" class="LineNr">10021 </span> <span class="subxComment"># var r/ebx: (addr array byte) = lookup(v->register)</span> -<span id="L10022" class="LineNr">10022 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L10023" class="LineNr">10023 </span> 89/<- %ebx 0/r32/eax +<span id="L9741" class="LineNr"> 9741 </span><span class="subxComment">#######################################################</span> +<span id="L9742" class="LineNr"> 9742 </span><span class="subxComment"># Type-checking</span> +<span id="L9743" class="LineNr"> 9743 </span><span class="subxComment">#######################################################</span> +<span id="L9744" class="LineNr"> 9744 </span> +<span id="L9745" class="LineNr"> 9745 </span><span class="subxFunction">check-mu-types</span>: <span class="subxComment"># err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9746" class="LineNr"> 9746 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9747" class="LineNr"> 9747 </span> 55/push-ebp +<span id="L9748" class="LineNr"> 9748 </span> 89/<- %ebp 4/r32/esp +<span id="L9749" class="LineNr"> 9749 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9750" class="LineNr"> 9750 </span> 50/push-eax +<span id="L9751" class="LineNr"> 9751 </span> <span class="subxComment"># var curr/eax: (addr function) = *Program->functions</span> +<span id="L9752" class="LineNr"> 9752 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> +<span id="L9753" class="LineNr"> 9753 </span> { +<span id="L9754" class="LineNr"> 9754 </span><span class="Constant">$check-mu-types:loop</span>: +<span id="L9755" class="LineNr"> 9755 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L9756" class="LineNr"> 9756 </span> 3d/compare-eax-and 0/imm32 +<span id="L9757" class="LineNr"> 9757 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9758" class="LineNr"> 9758 </span> (<a href='mu.subx.html#L9771'>check-mu-function</a> %eax *(ebp+8) *(ebp+0xc)) +<span id="L9759" class="LineNr"> 9759 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L9760" class="LineNr"> 9760 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x20) *(eax+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> +<span id="L9761" class="LineNr"> 9761 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L9762" class="LineNr"> 9762 </span> } +<span id="L9763" class="LineNr"> 9763 </span><span class="Constant">$check-mu-types:end</span>: +<span id="L9764" class="LineNr"> 9764 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9765" class="LineNr"> 9765 </span> 58/pop-to-eax +<span id="L9766" class="LineNr"> 9766 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9767" class="LineNr"> 9767 </span> 89/<- %esp 5/r32/ebp +<span id="L9768" class="LineNr"> 9768 </span> 5d/pop-to-ebp +<span id="L9769" class="LineNr"> 9769 </span> c3/return +<span id="L9770" class="LineNr"> 9770 </span> +<span id="L9771" class="LineNr"> 9771 </span><span class="subxFunction">check-mu-function</span>: <span class="subxComment"># fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9772" class="LineNr"> 9772 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9773" class="LineNr"> 9773 </span> 55/push-ebp +<span id="L9774" class="LineNr"> 9774 </span> 89/<- %ebp 4/r32/esp +<span id="L9775" class="LineNr"> 9775 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9776" class="LineNr"> 9776 </span> 50/push-eax +<span id="L9777" class="LineNr"> 9777 </span> <span class="subxComment"># eax = f</span> +<span id="L9778" class="LineNr"> 9778 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L9779" class="LineNr"> 9779 </span> <span class="subxComment"># TODO: anything to check in header?</span> +<span id="L9780" class="LineNr"> 9780 </span> <span class="subxComment"># var body/eax: (addr block) = lookup(f->body)</span> +<span id="L9781" class="LineNr"> 9781 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Function-body Function-body => eax</span> +<span id="L9782" class="LineNr"> 9782 </span> (<a href='mu.subx.html#L9791'>check-mu-block</a> %eax *(ebp+8) *(ebp+0xc) *(ebp+0x10)) +<span id="L9783" class="LineNr"> 9783 </span><span class="Constant">$check-mu-function:end</span>: +<span id="L9784" class="LineNr"> 9784 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9785" class="LineNr"> 9785 </span> 58/pop-to-eax +<span id="L9786" class="LineNr"> 9786 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9787" class="LineNr"> 9787 </span> 89/<- %esp 5/r32/ebp +<span id="L9788" class="LineNr"> 9788 </span> 5d/pop-to-ebp +<span id="L9789" class="LineNr"> 9789 </span> c3/return +<span id="L9790" class="LineNr"> 9790 </span> +<span id="L9791" class="LineNr"> 9791 </span><span class="subxFunction">check-mu-block</span>: <span class="subxComment"># block: (addr block), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9792" class="LineNr"> 9792 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9793" class="LineNr"> 9793 </span> 55/push-ebp +<span id="L9794" class="LineNr"> 9794 </span> 89/<- %ebp 4/r32/esp +<span id="L9795" class="LineNr"> 9795 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9796" class="LineNr"> 9796 </span> 50/push-eax +<span id="L9797" class="LineNr"> 9797 </span> <span class="subxComment"># eax = block</span> +<span id="L9798" class="LineNr"> 9798 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L9799" class="LineNr"> 9799 </span> <span class="subxComment"># var stmts/eax: (addr list stmt) = lookup(block->statements)</span> +<span id="L9800" class="LineNr"> 9800 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> +<span id="L9801" class="LineNr"> 9801 </span> <span class="subxComment">#</span> +<span id="L9802" class="LineNr"> 9802 </span> { +<span id="L9803" class="LineNr"> 9803 </span><span class="Constant">$check-mu-block:check-empty</span>: +<span id="L9804" class="LineNr"> 9804 </span> 3d/compare-eax-and 0/imm32 +<span id="L9805" class="LineNr"> 9805 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9806" class="LineNr"> 9806 </span> <span class="subxComment"># emit block->statements</span> +<span id="L9807" class="LineNr"> 9807 </span> (<a href='mu.subx.html#L9817'>check-mu-stmt-list</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L9808" class="LineNr"> 9808 </span> } +<span id="L9809" class="LineNr"> 9809 </span><span class="Constant">$check-mu-block:end</span>: +<span id="L9810" class="LineNr"> 9810 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9811" class="LineNr"> 9811 </span> 58/pop-to-eax +<span id="L9812" class="LineNr"> 9812 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9813" class="LineNr"> 9813 </span> 89/<- %esp 5/r32/ebp +<span id="L9814" class="LineNr"> 9814 </span> 5d/pop-to-ebp +<span id="L9815" class="LineNr"> 9815 </span> c3/return +<span id="L9816" class="LineNr"> 9816 </span> +<span id="L9817" class="LineNr"> 9817 </span><span class="subxFunction">check-mu-stmt-list</span>: <span class="subxComment"># stmts: (addr list stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9818" class="LineNr"> 9818 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9819" class="LineNr"> 9819 </span> 55/push-ebp +<span id="L9820" class="LineNr"> 9820 </span> 89/<- %ebp 4/r32/esp +<span id="L9821" class="LineNr"> 9821 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9822" class="LineNr"> 9822 </span> 50/push-eax +<span id="L9823" class="LineNr"> 9823 </span> 56/push-esi +<span id="L9824" class="LineNr"> 9824 </span> <span class="subxComment"># esi = stmts</span> +<span id="L9825" class="LineNr"> 9825 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9826" class="LineNr"> 9826 </span> { +<span id="L9827" class="LineNr"> 9827 </span><span class="Constant">$check-mu-stmt-list:loop</span>: +<span id="L9828" class="LineNr"> 9828 </span> 81 7/subop/compare %esi 0/imm32 +<span id="L9829" class="LineNr"> 9829 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9830" class="LineNr"> 9830 </span> <span class="subxComment"># var curr-stmt/eax: (addr stmt) = lookup(stmts->value)</span> +<span id="L9831" class="LineNr"> 9831 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L9832" class="LineNr"> 9832 </span> { +<span id="L9833" class="LineNr"> 9833 </span><span class="Constant">$check-mu-stmt-list:check-for-block</span>: +<span id="L9834" class="LineNr"> 9834 </span> 81 7/subop/compare *eax 0/imm32/block <span class="subxComment"># Stmt-tag</span> +<span id="L9835" class="LineNr"> 9835 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9836" class="LineNr"> 9836 </span><span class="Constant">$check-mu-stmt-list:block</span>: +<span id="L9837" class="LineNr"> 9837 </span> (<a href='mu.subx.html#L9791'>check-mu-block</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L9838" class="LineNr"> 9838 </span> eb/jump $check-mu-stmt-list:continue/disp8 +<span id="L9839" class="LineNr"> 9839 </span> } +<span id="L9840" class="LineNr"> 9840 </span> { +<span id="L9841" class="LineNr"> 9841 </span><span class="Constant">$check-mu-stmt-list:check-for-stmt1</span>: +<span id="L9842" class="LineNr"> 9842 </span> 81 7/subop/compare *eax 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> +<span id="L9843" class="LineNr"> 9843 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L9844" class="LineNr"> 9844 </span><span class="Constant">$check-mu-stmt-list:stmt1</span>: +<span id="L9845" class="LineNr"> 9845 </span> (<a href='mu.subx.html#L9871'>check-mu-stmt</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L9846" class="LineNr"> 9846 </span> eb/jump $check-mu-stmt-list:continue/disp8 +<span id="L9847" class="LineNr"> 9847 </span> } +<span id="L9848" class="LineNr"> 9848 </span> { +<span id="L9849" class="LineNr"> 9849 </span><span class="Constant">$check-mu-stmt-list:check-for-reg-var-def</span>: +<span id="L9850" class="LineNr"> 9850 </span> 81 7/subop/compare *eax 3/imm32/reg-var-def <span class="subxComment"># Stmt-tag</span> +<span id="L9851" class="LineNr"> 9851 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L9852" class="LineNr"> 9852 </span><span class="Constant">$check-mu-stmt-list:reg-var-def</span>: +<span id="L9853" class="LineNr"> 9853 </span> (<a href='mu.subx.html#L9871'>check-mu-stmt</a> %eax *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L9854" class="LineNr"> 9854 </span> eb/jump $check-mu-stmt-list:continue/disp8 +<span id="L9855" class="LineNr"> 9855 </span> } +<span id="L9856" class="LineNr"> 9856 </span><span class="Constant">$check-mu-stmt-list:continue</span>: +<span id="L9857" class="LineNr"> 9857 </span> <span class="subxComment"># TODO: raise an error on unrecognized Stmt-tag</span> +<span id="L9858" class="LineNr"> 9858 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L9859" class="LineNr"> 9859 </span> 89/<- %esi 0/r32/eax +<span id="L9860" class="LineNr"> 9860 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L9861" class="LineNr"> 9861 </span> } +<span id="L9862" class="LineNr"> 9862 </span><span class="Constant">$check-mu-stmt-list:end</span>: +<span id="L9863" class="LineNr"> 9863 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L9864" class="LineNr"> 9864 </span> 5e/pop-to-esi +<span id="L9865" class="LineNr"> 9865 </span> 58/pop-to-eax +<span id="L9866" class="LineNr"> 9866 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L9867" class="LineNr"> 9867 </span> 89/<- %esp 5/r32/ebp +<span id="L9868" class="LineNr"> 9868 </span> 5d/pop-to-ebp +<span id="L9869" class="LineNr"> 9869 </span> c3/return +<span id="L9870" class="LineNr"> 9870 </span> +<span id="L9871" class="LineNr"> 9871 </span><span class="subxFunction">check-mu-stmt</span>: <span class="subxComment"># stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L9872" class="LineNr"> 9872 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L9873" class="LineNr"> 9873 </span> 55/push-ebp +<span id="L9874" class="LineNr"> 9874 </span> 89/<- %ebp 4/r32/esp +<span id="L9875" class="LineNr"> 9875 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L9876" class="LineNr"> 9876 </span> 50/push-eax +<span id="L9877" class="LineNr"> 9877 </span> 51/push-ecx +<span id="L9878" class="LineNr"> 9878 </span> 52/push-edx +<span id="L9879" class="LineNr"> 9879 </span> 53/push-ebx +<span id="L9880" class="LineNr"> 9880 </span> 56/push-esi +<span id="L9881" class="LineNr"> 9881 </span> 57/push-edi +<span id="L9882" class="LineNr"> 9882 </span> <span class="subxComment"># esi = stmt</span> +<span id="L9883" class="LineNr"> 9883 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L9884" class="LineNr"> 9884 </span> <span class="subxComment"># var f/edi: (addr function) = lookup(*Program->functions)</span> +<span id="L9885" class="LineNr"> 9885 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> +<span id="L9886" class="LineNr"> 9886 </span> (<a href='mu.subx.html#L16377'>find-matching-function</a> %eax *(ebp+8)) <span class="subxComment"># => eax</span> +<span id="L9887" class="LineNr"> 9887 </span> 89/<- %edi 0/r32/eax +<span id="L9888" class="LineNr"> 9888 </span> { +<span id="L9889" class="LineNr"> 9889 </span><span class="Constant">$check-mu-stmt:check-for-call</span>: +<span id="L9890" class="LineNr"> 9890 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L9891" class="LineNr"> 9891 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9892" class="LineNr"> 9892 </span><span class="Constant">$check-mu-stmt:is-call</span>: +<span id="L9893" class="LineNr"> 9893 </span> <span class="subxComment"># var inouts/ecx: (addr stmt-var) = lookup(stmt->inouts)</span> +<span id="L9894" class="LineNr"> 9894 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L9895" class="LineNr"> 9895 </span> 89/<- %ecx 0/r32/eax +<span id="L9896" class="LineNr"> 9896 </span> <span class="subxComment"># var expected/edx: (addr list var) = lookup(f->inouts)</span> +<span id="L9897" class="LineNr"> 9897 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># Function-inouts Function-inouts => eax</span> +<span id="L9898" class="LineNr"> 9898 </span> 89/<- %edx 0/r32/eax +<span id="L9899" class="LineNr"> 9899 </span> { +<span id="L9900" class="LineNr"> 9900 </span><span class="Constant">$check-mu-stmt:check-for-inouts</span>: +<span id="L9901" class="LineNr"> 9901 </span> <span class="subxComment"># if (inouts == 0) break</span> +<span id="L9902" class="LineNr"> 9902 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L9903" class="LineNr"> 9903 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9904" class="LineNr"> 9904 </span> <span class="subxComment"># if (expected == 0) error</span> +<span id="L9905" class="LineNr"> 9905 </span> 81 7/subop/compare %edx 0/imm32 +<span id="L9906" class="LineNr"> 9906 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9907" class="LineNr"> 9907 </span><span class="Constant">$check-mu-stmt:check-inout-type</span>: +<span id="L9908" class="LineNr"> 9908 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(inouts->value)</span> +<span id="L9909" class="LineNr"> 9909 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L9910" class="LineNr"> 9910 </span> <span class="subxComment"># var t/ebx: (addr tree type-id) = lookup(v->type)</span> +<span id="L9911" class="LineNr"> 9911 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L9912" class="LineNr"> 9912 </span> 89/<- %ebx 0/r32/eax +<span id="L9913" class="LineNr"> 9913 </span> <span class="subxComment"># if (inouts->is-deref?) t = t->right # TODO: check that t->left is an addr</span> +<span id="L9914" class="LineNr"> 9914 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L9915" class="LineNr"> 9915 </span> { +<span id="L9916" class="LineNr"> 9916 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L9917" class="LineNr"> 9917 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0xc) *(ebx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L9918" class="LineNr"> 9918 </span> 89/<- %ebx 0/r32/eax +<span id="L9919" class="LineNr"> 9919 </span> <span class="subxComment"># if t->right is null, t = t->left</span> +<span id="L9920" class="LineNr"> 9920 </span> 81 7/subop/compare *(ebx+0xc) 0/imm32 <span class="subxComment"># Tree-right</span> +<span id="L9921" class="LineNr"> 9921 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L9922" class="LineNr"> 9922 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+4) *(ebx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L9923" class="LineNr"> 9923 </span> 89/<- %ebx 0/r32/eax +<span id="L9924" class="LineNr"> 9924 </span> } +<span id="L9925" class="LineNr"> 9925 </span> <span class="subxComment"># var v2/eax: (addr v) = lookup(expected->value)</span> +<span id="L9926" class="LineNr"> 9926 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L9927" class="LineNr"> 9927 </span> <span class="subxComment"># var t2/eax: (addr tree type-id) = lookup(v2->type)</span> +<span id="L9928" class="LineNr"> 9928 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L9929" class="LineNr"> 9929 </span> <span class="subxComment"># if (t != t2) error</span> +<span id="L9930" class="LineNr"> 9930 </span> (<a href='mu.subx.html#L10140'>type-match?</a> %eax %ebx) <span class="subxComment"># => eax</span> +<span id="L9931" class="LineNr"> 9931 </span> 3d/compare-eax-and 0/imm32/false +<span id="L9932" class="LineNr"> 9932 </span> { +<span id="L9933" class="LineNr"> 9933 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L9934" class="LineNr"> 9934 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L9935" class="LineNr"> 9935 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L9936" class="LineNr"> 9936 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9937" class="LineNr"> 9937 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9938" class="LineNr"> 9938 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L9939" class="LineNr"> 9939 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9940" class="LineNr"> 9940 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9941" class="LineNr"> 9941 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": type for inout '"</span>) +<span id="L9942" class="LineNr"> 9942 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L9943" class="LineNr"> 9943 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L9944" class="LineNr"> 9944 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9945" class="LineNr"> 9945 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"' is not right\n"</span>) +<span id="L9946" class="LineNr"> 9946 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L9947" class="LineNr"> 9947 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L9948" class="LineNr"> 9948 </span> } +<span id="L9949" class="LineNr"> 9949 </span><span class="Constant">$check-mu-stmt:continue-to-next-inout</span>: +<span id="L9950" class="LineNr"> 9950 </span> <span class="subxComment"># inouts = lookup(inouts->next)</span> +<span id="L9951" class="LineNr"> 9951 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L9952" class="LineNr"> 9952 </span> 89/<- %ecx 0/r32/eax +<span id="L9953" class="LineNr"> 9953 </span> <span class="subxComment"># expected = lookup(expected->next)</span> +<span id="L9954" class="LineNr"> 9954 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L9955" class="LineNr"> 9955 </span> 89/<- %edx 0/r32/eax +<span id="L9956" class="LineNr"> 9956 </span> <span class="subxComment">#</span> +<span id="L9957" class="LineNr"> 9957 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L9958" class="LineNr"> 9958 </span> } +<span id="L9959" class="LineNr"> 9959 </span><span class="Constant">$check-mu-stmt:check-inout-count</span>: +<span id="L9960" class="LineNr"> 9960 </span> <span class="subxComment"># if (inouts == expected) proceed</span> +<span id="L9961" class="LineNr"> 9961 </span> 39/compare %ecx 2/r32/edx +<span id="L9962" class="LineNr"> 9962 </span> { +<span id="L9963" class="LineNr"> 9963 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9964" class="LineNr"> 9964 </span> <span class="subxComment"># exactly one of the two is null</span> +<span id="L9965" class="LineNr"> 9965 </span> <span class="subxComment"># if (inouts == 0) error("too many inouts")</span> +<span id="L9966" class="LineNr"> 9966 </span> { +<span id="L9967" class="LineNr"> 9967 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L9968" class="LineNr"> 9968 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9969" class="LineNr"> 9969 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L9970" class="LineNr"> 9970 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L9971" class="LineNr"> 9971 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9972" class="LineNr"> 9972 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9973" class="LineNr"> 9973 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L9974" class="LineNr"> 9974 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9975" class="LineNr"> 9975 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9976" class="LineNr"> 9976 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too many inouts\n"</span>) +<span id="L9977" class="LineNr"> 9977 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L9978" class="LineNr"> 9978 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L9979" class="LineNr"> 9979 </span> } +<span id="L9980" class="LineNr"> 9980 </span> <span class="subxComment"># if (expected == 0) error("too few inouts")</span> +<span id="L9981" class="LineNr"> 9981 </span> { +<span id="L9982" class="LineNr"> 9982 </span> 81 7/subop/compare %edx 0/imm32 +<span id="L9983" class="LineNr"> 9983 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L9984" class="LineNr"> 9984 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L9985" class="LineNr"> 9985 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L9986" class="LineNr"> 9986 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9987" class="LineNr"> 9987 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9988" class="LineNr"> 9988 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L9989" class="LineNr"> 9989 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L9990" class="LineNr"> 9990 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L9991" class="LineNr"> 9991 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too few inouts\n"</span>) +<span id="L9992" class="LineNr"> 9992 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L9993" class="LineNr"> 9993 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L9994" class="LineNr"> 9994 </span> } +<span id="L9995" class="LineNr"> 9995 </span> } +<span id="L9996" class="LineNr"> 9996 </span><span class="Constant">$check-mu-stmt:check-outputs</span>: +<span id="L9997" class="LineNr"> 9997 </span> <span class="subxComment"># var outputs/ecx: (addr stmt-var) = lookup(stmt->outputs)</span> +<span id="L9998" class="LineNr"> 9998 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x14) *(esi+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L9999" class="LineNr"> 9999 </span> 89/<- %ecx 0/r32/eax +<span id="L10000" class="LineNr">10000 </span> <span class="subxComment"># var expected/edx: (addr list var) = lookup(f->outputs)</span> +<span id="L10001" class="LineNr">10001 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x10) *(edi+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> +<span id="L10002" class="LineNr">10002 </span> 89/<- %edx 0/r32/eax +<span id="L10003" class="LineNr">10003 </span> { +<span id="L10004" class="LineNr">10004 </span><span class="Constant">$check-mu-stmt:check-for-outputs</span>: +<span id="L10005" class="LineNr">10005 </span> <span class="subxComment"># if (outputs == 0) break</span> +<span id="L10006" class="LineNr">10006 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L10007" class="LineNr">10007 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10008" class="LineNr">10008 </span> <span class="subxComment"># if (expected == 0) error</span> +<span id="L10009" class="LineNr">10009 </span> 81 7/subop/compare %edx 0/imm32 +<span id="L10010" class="LineNr">10010 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10011" class="LineNr">10011 </span><span class="Constant">$check-mu-stmt:check-output-type</span>: +<span id="L10012" class="LineNr">10012 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(outputs->value)</span> +<span id="L10013" class="LineNr">10013 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10014" class="LineNr">10014 </span> <span class="subxComment"># var t/ebx: (addr tree type-id) = lookup(v->type)</span> +<span id="L10015" class="LineNr">10015 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L10016" class="LineNr">10016 </span> 89/<- %ebx 0/r32/eax +<span id="L10017" class="LineNr">10017 </span> <span class="subxComment"># if (outputs->is-deref?) t = t->right # TODO: check that t->left is an addr</span> +<span id="L10018" class="LineNr">10018 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L10019" class="LineNr">10019 </span> { +<span id="L10020" class="LineNr">10020 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10021" class="LineNr">10021 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0xc) *(ebx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10022" class="LineNr">10022 </span> 89/<- %ebx 0/r32/eax +<span id="L10023" class="LineNr">10023 </span> } <span id="L10024" class="LineNr">10024 </span> <span class="subxComment"># var v2/eax: (addr v) = lookup(expected->value)</span> -<span id="L10025" class="LineNr">10025 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L10026" class="LineNr">10026 </span> <span class="subxComment"># var r2/eax: (addr array byte) = lookup(v2->register)</span> -<span id="L10027" class="LineNr">10027 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L10028" class="LineNr">10028 </span> <span class="subxComment"># if (r != r2) error</span> -<span id="L10029" class="LineNr">10029 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> +<span id="L10025" class="LineNr">10025 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L10026" class="LineNr">10026 </span> <span class="subxComment"># var t2/eax: (addr tree type-id) = lookup(v2->type)</span> +<span id="L10027" class="LineNr">10027 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L10028" class="LineNr">10028 </span> <span class="subxComment"># if (t != t2) error</span> +<span id="L10029" class="LineNr">10029 </span> (<a href='mu.subx.html#L10353'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> <span id="L10030" class="LineNr">10030 </span> 3d/compare-eax-and 0/imm32/false <span id="L10031" class="LineNr">10031 </span> { <span id="L10032" class="LineNr">10032 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 @@ -9639,7 +9639,7 @@ if ('onhashchange' in window) { <span id="L10037" class="LineNr">10037 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) <span id="L10038" class="LineNr">10038 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> <span id="L10039" class="LineNr">10039 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10040" class="LineNr">10040 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": register for output '"</span>) +<span id="L10040" class="LineNr">10040 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": type for output '"</span>) <span id="L10041" class="LineNr">10041 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> <span id="L10042" class="LineNr">10042 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> <span id="L10043" class="LineNr">10043 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) @@ -9647,190 +9647,190 @@ if ('onhashchange' in window) { <span id="L10045" class="LineNr">10045 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) <span id="L10046" class="LineNr">10046 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) <span id="L10047" class="LineNr">10047 </span> } -<span id="L10048" class="LineNr">10048 </span><span class="Constant">$check-mu-stmt:continue-to-next-output</span>: -<span id="L10049" class="LineNr">10049 </span> <span class="subxComment"># outputs = lookup(outputs->next)</span> -<span id="L10050" class="LineNr">10050 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L10051" class="LineNr">10051 </span> 89/<- %ecx 0/r32/eax -<span id="L10052" class="LineNr">10052 </span> <span class="subxComment"># expected = lookup(expected->next)</span> -<span id="L10053" class="LineNr">10053 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L10054" class="LineNr">10054 </span> 89/<- %edx 0/r32/eax -<span id="L10055" class="LineNr">10055 </span> <span class="subxComment">#</span> -<span id="L10056" class="LineNr">10056 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L10057" class="LineNr">10057 </span> } -<span id="L10058" class="LineNr">10058 </span><span class="Constant">$check-mu-stmt:check-output-count</span>: -<span id="L10059" class="LineNr">10059 </span> <span class="subxComment"># if (outputs == expected) proceed</span> -<span id="L10060" class="LineNr">10060 </span> 39/compare %ecx 2/r32/edx -<span id="L10061" class="LineNr">10061 </span> { -<span id="L10062" class="LineNr">10062 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10063" class="LineNr">10063 </span> <span class="subxComment"># exactly one of the two is null</span> -<span id="L10064" class="LineNr">10064 </span> <span class="subxComment"># if (outputs == 0) error("too many outputs")</span> -<span id="L10065" class="LineNr">10065 </span> { -<span id="L10066" class="LineNr">10066 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L10067" class="LineNr">10067 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10068" class="LineNr">10068 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L10069" class="LineNr">10069 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L10070" class="LineNr">10070 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10071" class="LineNr">10071 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10072" class="LineNr">10072 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L10073" class="LineNr">10073 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10074" class="LineNr">10074 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10075" class="LineNr">10075 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too many outputs\n"</span>) -<span id="L10076" class="LineNr">10076 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L10077" class="LineNr">10077 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L10078" class="LineNr">10078 </span> } -<span id="L10079" class="LineNr">10079 </span> <span class="subxComment"># if (expected == 0) error("too few outputs")</span> -<span id="L10080" class="LineNr">10080 </span> { -<span id="L10081" class="LineNr">10081 </span> 81 7/subop/compare %edx 0/imm32 -<span id="L10082" class="LineNr">10082 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10083" class="LineNr">10083 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) -<span id="L10084" class="LineNr">10084 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L10085" class="LineNr">10085 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10086" class="LineNr">10086 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10087" class="LineNr">10087 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) -<span id="L10088" class="LineNr">10088 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10089" class="LineNr">10089 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) -<span id="L10090" class="LineNr">10090 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too few outputs\n"</span>) -<span id="L10091" class="LineNr">10091 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L10092" class="LineNr">10092 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L10093" class="LineNr">10093 </span> } -<span id="L10094" class="LineNr">10094 </span> } -<span id="L10095" class="LineNr">10095 </span> } -<span id="L10096" class="LineNr">10096 </span><span class="Constant">$check-mu-stmt:end</span>: -<span id="L10097" class="LineNr">10097 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10098" class="LineNr">10098 </span> 5f/pop-to-edi -<span id="L10099" class="LineNr">10099 </span> 5e/pop-to-esi -<span id="L10100" class="LineNr">10100 </span> 5b/pop-to-ebx -<span id="L10101" class="LineNr">10101 </span> 5a/pop-to-edx -<span id="L10102" class="LineNr">10102 </span> 59/pop-to-ecx -<span id="L10103" class="LineNr">10103 </span> 58/pop-to-eax -<span id="L10104" class="LineNr">10104 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10105" class="LineNr">10105 </span> 89/<- %esp 5/r32/ebp -<span id="L10106" class="LineNr">10106 </span> 5d/pop-to-ebp -<span id="L10107" class="LineNr">10107 </span> c3/return -<span id="L10108" class="LineNr">10108 </span> -<span id="L10109" class="LineNr">10109 </span><span class="subxComment"># like type-equal? but takes literals into account</span> -<span id="L10110" class="LineNr">10110 </span><span class="subxFunction">type-match?</span>: <span class="subxComment"># def: (addr tree type-id), call: (addr tree type-id) -> result/eax: boolean</span> -<span id="L10111" class="LineNr">10111 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10112" class="LineNr">10112 </span> 55/push-ebp -<span id="L10113" class="LineNr">10113 </span> 89/<- %ebp 4/r32/esp -<span id="L10114" class="LineNr">10114 </span> <span class="subxComment"># if (call == literal) return true # TODO: more precise</span> -<span id="L10115" class="LineNr">10115 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> *(ebp+0xc) 0) <span class="subxComment"># literal => eax</span> -<span id="L10116" class="LineNr">10116 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10117" class="LineNr">10117 </span> b8/copy-to-eax 1/imm32/true -<span id="L10118" class="LineNr">10118 </span> 75/jump-if-!= $type-match?:end/disp8 -<span id="L10119" class="LineNr">10119 </span><span class="Constant">$type-match?:baseline</span>: -<span id="L10120" class="LineNr">10120 </span> <span class="subxComment"># otherwise fall back</span> -<span id="L10121" class="LineNr">10121 </span> (<a href='mu.subx.html#L10323'>type-equal?</a> *(ebp+8) *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L10122" class="LineNr">10122 </span><span class="Constant">$type-match?:end</span>: -<span id="L10123" class="LineNr">10123 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10124" class="LineNr">10124 </span> 89/<- %esp 5/r32/ebp -<span id="L10125" class="LineNr">10125 </span> 5d/pop-to-ebp -<span id="L10126" class="LineNr">10126 </span> c3/return -<span id="L10127" class="LineNr">10127 </span> -<span id="L10128" class="LineNr">10128 </span><span class="subxFunction">size-of</span>: <span class="subxComment"># v: (addr var) -> result/eax: int</span> -<span id="L10129" class="LineNr">10129 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10130" class="LineNr">10130 </span> 55/push-ebp -<span id="L10131" class="LineNr">10131 </span> 89/<- %ebp 4/r32/esp -<span id="L10132" class="LineNr">10132 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10133" class="LineNr">10133 </span> 51/push-ecx -<span id="L10134" class="LineNr">10134 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> -<span id="L10135" class="LineNr">10135 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10136" class="LineNr">10136 </span><span class="CommentedCode">#? (write-buffered Stderr "size-of ")</span> -<span id="L10137" class="LineNr">10137 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ecx)</span> -<span id="L10138" class="LineNr">10138 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L10139" class="LineNr">10139 </span><span class="CommentedCode">#? (write-buffered Stderr "type allocid: ")</span> -<span id="L10140" class="LineNr">10140 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ecx+8))</span> -<span id="L10141" class="LineNr">10141 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L10142" class="LineNr">10142 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L10143" class="LineNr">10143 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L10144" class="LineNr">10144 </span> 89/<- %ecx 0/r32/eax -<span id="L10145" class="LineNr">10145 </span> <span class="subxComment"># if is-mu-array?(t) return size-of-array(t)</span> -<span id="L10146" class="LineNr">10146 </span> { -<span id="L10147" class="LineNr">10147 </span> (<a href='mu.subx.html#L10209'>is-mu-array?</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L10148" class="LineNr">10148 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10149" class="LineNr">10149 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10150" class="LineNr">10150 </span> (<a href='mu.subx.html#L10239'>size-of-array</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L10151" class="LineNr">10151 </span> eb/jump $size-of:end/disp8 -<span id="L10152" class="LineNr">10152 </span> } -<span id="L10153" class="LineNr">10153 </span> <span class="subxComment"># if (!t->is-atom?) t = lookup(t->left)</span> -<span id="L10154" class="LineNr">10154 </span> { -<span id="L10155" class="LineNr">10155 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L10156" class="LineNr">10156 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10157" class="LineNr">10157 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10158" class="LineNr">10158 </span> 89/<- %ecx 0/r32/eax -<span id="L10159" class="LineNr">10159 </span> } -<span id="L10160" class="LineNr">10160 </span> <span class="subxComment"># TODO: assert t->is-atom?</span> -<span id="L10161" class="LineNr">10161 </span> (<a href='mu.subx.html#L10271'>size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> -<span id="L10162" class="LineNr">10162 </span><span class="Constant">$size-of:end</span>: -<span id="L10163" class="LineNr">10163 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10164" class="LineNr">10164 </span> 59/pop-to-ecx -<span id="L10165" class="LineNr">10165 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10166" class="LineNr">10166 </span> 89/<- %esp 5/r32/ebp -<span id="L10167" class="LineNr">10167 </span> 5d/pop-to-ebp -<span id="L10168" class="LineNr">10168 </span> c3/return -<span id="L10169" class="LineNr">10169 </span> -<span id="L10170" class="LineNr">10170 </span><span class="subxFunction">size-of-deref</span>: <span class="subxComment"># v: (addr var) -> result/eax: int</span> -<span id="L10171" class="LineNr">10171 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10172" class="LineNr">10172 </span> 55/push-ebp -<span id="L10173" class="LineNr">10173 </span> 89/<- %ebp 4/r32/esp -<span id="L10174" class="LineNr">10174 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10175" class="LineNr">10175 </span> 51/push-ecx -<span id="L10176" class="LineNr">10176 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> -<span id="L10177" class="LineNr">10177 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10178" class="LineNr">10178 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L10179" class="LineNr">10179 </span> 89/<- %ecx 0/r32/eax -<span id="L10180" class="LineNr">10180 </span> <span class="subxComment"># TODO: assert(t is an addr)</span> -<span id="L10181" class="LineNr">10181 </span> <span class="subxComment"># t = lookup(t->right)</span> -<span id="L10182" class="LineNr">10182 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L10183" class="LineNr">10183 </span> 89/<- %ecx 0/r32/eax -<span id="L10184" class="LineNr">10184 </span> <span class="subxComment"># if is-mu-array?(t) return size-of-array(t)</span> -<span id="L10185" class="LineNr">10185 </span> { -<span id="L10186" class="LineNr">10186 </span> (<a href='mu.subx.html#L10209'>is-mu-array?</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L10187" class="LineNr">10187 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10188" class="LineNr">10188 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10189" class="LineNr">10189 </span> (<a href='mu.subx.html#L10239'>size-of-array</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L10190" class="LineNr">10190 </span> eb/jump $size-of:end/disp8 -<span id="L10191" class="LineNr">10191 </span> } -<span id="L10192" class="LineNr">10192 </span> <span class="subxComment"># if (!t->is-atom?) t = lookup(t->left)</span> -<span id="L10193" class="LineNr">10193 </span> { -<span id="L10194" class="LineNr">10194 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L10195" class="LineNr">10195 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10196" class="LineNr">10196 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10197" class="LineNr">10197 </span> 89/<- %ecx 0/r32/eax -<span id="L10198" class="LineNr">10198 </span> } -<span id="L10199" class="LineNr">10199 </span> <span class="subxComment"># TODO: assert t->is-atom?</span> -<span id="L10200" class="LineNr">10200 </span> (<a href='mu.subx.html#L10271'>size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> -<span id="L10201" class="LineNr">10201 </span><span class="Constant">$size-of-deref:end</span>: -<span id="L10202" class="LineNr">10202 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10203" class="LineNr">10203 </span> 59/pop-to-ecx -<span id="L10204" class="LineNr">10204 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10205" class="LineNr">10205 </span> 89/<- %esp 5/r32/ebp -<span id="L10206" class="LineNr">10206 </span> 5d/pop-to-ebp -<span id="L10207" class="LineNr">10207 </span> c3/return -<span id="L10208" class="LineNr">10208 </span> -<span id="L10209" class="LineNr">10209 </span><span class="subxFunction">is-mu-array?</span>: <span class="subxComment"># t: (addr tree type-id) -> result/eax: boolean</span> -<span id="L10210" class="LineNr">10210 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10211" class="LineNr">10211 </span> 55/push-ebp -<span id="L10212" class="LineNr">10212 </span> 89/<- %ebp 4/r32/esp -<span id="L10213" class="LineNr">10213 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10214" class="LineNr">10214 </span> 51/push-ecx -<span id="L10215" class="LineNr">10215 </span> <span class="subxComment"># ecx = t</span> -<span id="L10216" class="LineNr">10216 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10217" class="LineNr">10217 </span> <span class="subxComment"># if t->is-atom?, return false</span> -<span id="L10218" class="LineNr">10218 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L10219" class="LineNr">10219 </span> 75/jump-if-!= $is-mu-array?:return-false/disp8 -<span id="L10220" class="LineNr">10220 </span> <span class="subxComment"># if !t->left->is-atom?, return false</span> -<span id="L10221" class="LineNr">10221 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10222" class="LineNr">10222 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L10223" class="LineNr">10223 </span> 74/jump-if-= $is-mu-array?:return-false/disp8 -<span id="L10224" class="LineNr">10224 </span> <span class="subxComment"># return t->left->value == array</span> -<span id="L10225" class="LineNr">10225 </span> 81 7/subop/compare *(eax+4) 3/imm32/array-type-id <span class="subxComment"># Tree-value</span> -<span id="L10226" class="LineNr">10226 </span> 0f 94/set-if-= %al -<span id="L10227" class="LineNr">10227 </span> 81 4/subop/and %eax 0xff/imm32 -<span id="L10228" class="LineNr">10228 </span> eb/jump $is-mu-array?:end/disp8 -<span id="L10229" class="LineNr">10229 </span><span class="Constant">$is-mu-array?:return-false</span>: -<span id="L10230" class="LineNr">10230 </span> b8/copy-to-eax 0/imm32/false -<span id="L10231" class="LineNr">10231 </span><span class="Constant">$is-mu-array?:end</span>: +<span id="L10048" class="LineNr">10048 </span><span class="Constant">$check-mu-stmt:check-output-register</span>: +<span id="L10049" class="LineNr">10049 </span> <span class="subxComment"># var v/eax: (addr v) = lookup(outputs->value)</span> +<span id="L10050" class="LineNr">10050 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10051" class="LineNr">10051 </span> <span class="subxComment"># var r/ebx: (addr array byte) = lookup(v->register)</span> +<span id="L10052" class="LineNr">10052 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L10053" class="LineNr">10053 </span> 89/<- %ebx 0/r32/eax +<span id="L10054" class="LineNr">10054 </span> <span class="subxComment"># var v2/eax: (addr v) = lookup(expected->value)</span> +<span id="L10055" class="LineNr">10055 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10056" class="LineNr">10056 </span> <span class="subxComment"># var r2/eax: (addr array byte) = lookup(v2->register)</span> +<span id="L10057" class="LineNr">10057 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L10058" class="LineNr">10058 </span> <span class="subxComment"># if (r != r2) error</span> +<span id="L10059" class="LineNr">10059 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> +<span id="L10060" class="LineNr">10060 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10061" class="LineNr">10061 </span> { +<span id="L10062" class="LineNr">10062 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L10063" class="LineNr">10063 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L10064" class="LineNr">10064 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L10065" class="LineNr">10065 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10066" class="LineNr">10066 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10067" class="LineNr">10067 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L10068" class="LineNr">10068 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10069" class="LineNr">10069 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10070" class="LineNr">10070 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": register for output '"</span>) +<span id="L10071" class="LineNr">10071 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10072" class="LineNr">10072 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L10073" class="LineNr">10073 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10074" class="LineNr">10074 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"' is not right\n"</span>) +<span id="L10075" class="LineNr">10075 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L10076" class="LineNr">10076 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L10077" class="LineNr">10077 </span> } +<span id="L10078" class="LineNr">10078 </span><span class="Constant">$check-mu-stmt:continue-to-next-output</span>: +<span id="L10079" class="LineNr">10079 </span> <span class="subxComment"># outputs = lookup(outputs->next)</span> +<span id="L10080" class="LineNr">10080 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L10081" class="LineNr">10081 </span> 89/<- %ecx 0/r32/eax +<span id="L10082" class="LineNr">10082 </span> <span class="subxComment"># expected = lookup(expected->next)</span> +<span id="L10083" class="LineNr">10083 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L10084" class="LineNr">10084 </span> 89/<- %edx 0/r32/eax +<span id="L10085" class="LineNr">10085 </span> <span class="subxComment">#</span> +<span id="L10086" class="LineNr">10086 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L10087" class="LineNr">10087 </span> } +<span id="L10088" class="LineNr">10088 </span><span class="Constant">$check-mu-stmt:check-output-count</span>: +<span id="L10089" class="LineNr">10089 </span> <span class="subxComment"># if (outputs == expected) proceed</span> +<span id="L10090" class="LineNr">10090 </span> 39/compare %ecx 2/r32/edx +<span id="L10091" class="LineNr">10091 </span> { +<span id="L10092" class="LineNr">10092 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10093" class="LineNr">10093 </span> <span class="subxComment"># exactly one of the two is null</span> +<span id="L10094" class="LineNr">10094 </span> <span class="subxComment"># if (outputs == 0) error("too many outputs")</span> +<span id="L10095" class="LineNr">10095 </span> { +<span id="L10096" class="LineNr">10096 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L10097" class="LineNr">10097 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10098" class="LineNr">10098 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L10099" class="LineNr">10099 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L10100" class="LineNr">10100 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10101" class="LineNr">10101 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10102" class="LineNr">10102 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L10103" class="LineNr">10103 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10104" class="LineNr">10104 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10105" class="LineNr">10105 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too many outputs\n"</span>) +<span id="L10106" class="LineNr">10106 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L10107" class="LineNr">10107 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L10108" class="LineNr">10108 </span> } +<span id="L10109" class="LineNr">10109 </span> <span class="subxComment"># if (expected == 0) error("too few outputs")</span> +<span id="L10110" class="LineNr">10110 </span> { +<span id="L10111" class="LineNr">10111 </span> 81 7/subop/compare %edx 0/imm32 +<span id="L10112" class="LineNr">10112 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10113" class="LineNr">10113 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"fn "</span>) +<span id="L10114" class="LineNr">10114 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L10115" class="LineNr">10115 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10116" class="LineNr">10116 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10117" class="LineNr">10117 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": call "</span>) +<span id="L10118" class="LineNr">10118 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10119" class="LineNr">10119 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) %eax) +<span id="L10120" class="LineNr">10120 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">": too few outputs\n"</span>) +<span id="L10121" class="LineNr">10121 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L10122" class="LineNr">10122 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L10123" class="LineNr">10123 </span> } +<span id="L10124" class="LineNr">10124 </span> } +<span id="L10125" class="LineNr">10125 </span> } +<span id="L10126" class="LineNr">10126 </span><span class="Constant">$check-mu-stmt:end</span>: +<span id="L10127" class="LineNr">10127 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10128" class="LineNr">10128 </span> 5f/pop-to-edi +<span id="L10129" class="LineNr">10129 </span> 5e/pop-to-esi +<span id="L10130" class="LineNr">10130 </span> 5b/pop-to-ebx +<span id="L10131" class="LineNr">10131 </span> 5a/pop-to-edx +<span id="L10132" class="LineNr">10132 </span> 59/pop-to-ecx +<span id="L10133" class="LineNr">10133 </span> 58/pop-to-eax +<span id="L10134" class="LineNr">10134 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10135" class="LineNr">10135 </span> 89/<- %esp 5/r32/ebp +<span id="L10136" class="LineNr">10136 </span> 5d/pop-to-ebp +<span id="L10137" class="LineNr">10137 </span> c3/return +<span id="L10138" class="LineNr">10138 </span> +<span id="L10139" class="LineNr">10139 </span><span class="subxComment"># like type-equal? but takes literals into account</span> +<span id="L10140" class="LineNr">10140 </span><span class="subxFunction">type-match?</span>: <span class="subxComment"># def: (addr tree type-id), call: (addr tree type-id) -> result/eax: boolean</span> +<span id="L10141" class="LineNr">10141 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10142" class="LineNr">10142 </span> 55/push-ebp +<span id="L10143" class="LineNr">10143 </span> 89/<- %ebp 4/r32/esp +<span id="L10144" class="LineNr">10144 </span> <span class="subxComment"># if (call == literal) return true # TODO: more precise</span> +<span id="L10145" class="LineNr">10145 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> *(ebp+0xc) 0) <span class="subxComment"># literal => eax</span> +<span id="L10146" class="LineNr">10146 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10147" class="LineNr">10147 </span> b8/copy-to-eax 1/imm32/true +<span id="L10148" class="LineNr">10148 </span> 75/jump-if-!= $type-match?:end/disp8 +<span id="L10149" class="LineNr">10149 </span><span class="Constant">$type-match?:baseline</span>: +<span id="L10150" class="LineNr">10150 </span> <span class="subxComment"># otherwise fall back</span> +<span id="L10151" class="LineNr">10151 </span> (<a href='mu.subx.html#L10353'>type-equal?</a> *(ebp+8) *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L10152" class="LineNr">10152 </span><span class="Constant">$type-match?:end</span>: +<span id="L10153" class="LineNr">10153 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10154" class="LineNr">10154 </span> 89/<- %esp 5/r32/ebp +<span id="L10155" class="LineNr">10155 </span> 5d/pop-to-ebp +<span id="L10156" class="LineNr">10156 </span> c3/return +<span id="L10157" class="LineNr">10157 </span> +<span id="L10158" class="LineNr">10158 </span><span class="subxFunction">size-of</span>: <span class="subxComment"># v: (addr var) -> result/eax: int</span> +<span id="L10159" class="LineNr">10159 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10160" class="LineNr">10160 </span> 55/push-ebp +<span id="L10161" class="LineNr">10161 </span> 89/<- %ebp 4/r32/esp +<span id="L10162" class="LineNr">10162 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10163" class="LineNr">10163 </span> 51/push-ecx +<span id="L10164" class="LineNr">10164 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> +<span id="L10165" class="LineNr">10165 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10166" class="LineNr">10166 </span><span class="CommentedCode">#? (write-buffered Stderr "size-of ")</span> +<span id="L10167" class="LineNr">10167 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ecx)</span> +<span id="L10168" class="LineNr">10168 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L10169" class="LineNr">10169 </span><span class="CommentedCode">#? (write-buffered Stderr "type allocid: ")</span> +<span id="L10170" class="LineNr">10170 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ecx+8))</span> +<span id="L10171" class="LineNr">10171 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L10172" class="LineNr">10172 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L10173" class="LineNr">10173 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L10174" class="LineNr">10174 </span> 89/<- %ecx 0/r32/eax +<span id="L10175" class="LineNr">10175 </span> <span class="subxComment"># if is-mu-array?(t) return size-of-array(t)</span> +<span id="L10176" class="LineNr">10176 </span> { +<span id="L10177" class="LineNr">10177 </span> (<a href='mu.subx.html#L10239'>is-mu-array?</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L10178" class="LineNr">10178 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10179" class="LineNr">10179 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10180" class="LineNr">10180 </span> (<a href='mu.subx.html#L10269'>size-of-array</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L10181" class="LineNr">10181 </span> eb/jump $size-of:end/disp8 +<span id="L10182" class="LineNr">10182 </span> } +<span id="L10183" class="LineNr">10183 </span> <span class="subxComment"># if (!t->is-atom?) t = lookup(t->left)</span> +<span id="L10184" class="LineNr">10184 </span> { +<span id="L10185" class="LineNr">10185 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L10186" class="LineNr">10186 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10187" class="LineNr">10187 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10188" class="LineNr">10188 </span> 89/<- %ecx 0/r32/eax +<span id="L10189" class="LineNr">10189 </span> } +<span id="L10190" class="LineNr">10190 </span> <span class="subxComment"># TODO: assert t->is-atom?</span> +<span id="L10191" class="LineNr">10191 </span> (<a href='mu.subx.html#L10301'>size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> +<span id="L10192" class="LineNr">10192 </span><span class="Constant">$size-of:end</span>: +<span id="L10193" class="LineNr">10193 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10194" class="LineNr">10194 </span> 59/pop-to-ecx +<span id="L10195" class="LineNr">10195 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10196" class="LineNr">10196 </span> 89/<- %esp 5/r32/ebp +<span id="L10197" class="LineNr">10197 </span> 5d/pop-to-ebp +<span id="L10198" class="LineNr">10198 </span> c3/return +<span id="L10199" class="LineNr">10199 </span> +<span id="L10200" class="LineNr">10200 </span><span class="subxFunction">size-of-deref</span>: <span class="subxComment"># v: (addr var) -> result/eax: int</span> +<span id="L10201" class="LineNr">10201 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10202" class="LineNr">10202 </span> 55/push-ebp +<span id="L10203" class="LineNr">10203 </span> 89/<- %ebp 4/r32/esp +<span id="L10204" class="LineNr">10204 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10205" class="LineNr">10205 </span> 51/push-ecx +<span id="L10206" class="LineNr">10206 </span> <span class="subxComment"># var t/ecx: (addr tree type-id) = lookup(v->type)</span> +<span id="L10207" class="LineNr">10207 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10208" class="LineNr">10208 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L10209" class="LineNr">10209 </span> 89/<- %ecx 0/r32/eax +<span id="L10210" class="LineNr">10210 </span> <span class="subxComment"># TODO: assert(t is an addr)</span> +<span id="L10211" class="LineNr">10211 </span> <span class="subxComment"># t = lookup(t->right)</span> +<span id="L10212" class="LineNr">10212 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10213" class="LineNr">10213 </span> 89/<- %ecx 0/r32/eax +<span id="L10214" class="LineNr">10214 </span> <span class="subxComment"># if is-mu-array?(t) return size-of-array(t)</span> +<span id="L10215" class="LineNr">10215 </span> { +<span id="L10216" class="LineNr">10216 </span> (<a href='mu.subx.html#L10239'>is-mu-array?</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L10217" class="LineNr">10217 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10218" class="LineNr">10218 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10219" class="LineNr">10219 </span> (<a href='mu.subx.html#L10269'>size-of-array</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L10220" class="LineNr">10220 </span> eb/jump $size-of:end/disp8 +<span id="L10221" class="LineNr">10221 </span> } +<span id="L10222" class="LineNr">10222 </span> <span class="subxComment"># if (!t->is-atom?) t = lookup(t->left)</span> +<span id="L10223" class="LineNr">10223 </span> { +<span id="L10224" class="LineNr">10224 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L10225" class="LineNr">10225 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10226" class="LineNr">10226 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10227" class="LineNr">10227 </span> 89/<- %ecx 0/r32/eax +<span id="L10228" class="LineNr">10228 </span> } +<span id="L10229" class="LineNr">10229 </span> <span class="subxComment"># TODO: assert t->is-atom?</span> +<span id="L10230" class="LineNr">10230 </span> (<a href='mu.subx.html#L10301'>size-of-type-id</a> *(ecx+4)) <span class="subxComment"># Tree-value => eax</span> +<span id="L10231" class="LineNr">10231 </span><span class="Constant">$size-of-deref:end</span>: <span id="L10232" class="LineNr">10232 </span> <span class="subxS1Comment"># . restore registers</span> <span id="L10233" class="LineNr">10233 </span> 59/pop-to-ecx <span id="L10234" class="LineNr">10234 </span> <span class="subxS1Comment"># . epilogue</span> @@ -9838,8269 +9838,8299 @@ if ('onhashchange' in window) { <span id="L10236" class="LineNr">10236 </span> 5d/pop-to-ebp <span id="L10237" class="LineNr">10237 </span> c3/return <span id="L10238" class="LineNr">10238 </span> -<span id="L10239" class="LineNr">10239 </span><span class="subxFunction">size-of-array</span>: <span class="subxComment"># a: (addr tree type-id) -> result/eax: int</span> +<span id="L10239" class="LineNr">10239 </span><span class="subxFunction">is-mu-array?</span>: <span class="subxComment"># t: (addr tree type-id) -> result/eax: boolean</span> <span id="L10240" class="LineNr">10240 </span> <span class="subxS1Comment"># . prologue</span> <span id="L10241" class="LineNr">10241 </span> 55/push-ebp <span id="L10242" class="LineNr">10242 </span> 89/<- %ebp 4/r32/esp <span id="L10243" class="LineNr">10243 </span> <span class="subxS1Comment"># . save registers</span> <span id="L10244" class="LineNr">10244 </span> 51/push-ecx -<span id="L10245" class="LineNr">10245 </span> 52/push-edx -<span id="L10246" class="LineNr">10246 </span> <span class="subxComment">#</span> -<span id="L10247" class="LineNr">10247 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10248" class="LineNr">10248 </span> <span class="subxComment"># TODO: assert that a->left is 'array'</span> -<span id="L10249" class="LineNr">10249 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L10250" class="LineNr">10250 </span> 89/<- %ecx 0/r32/eax -<span id="L10251" class="LineNr">10251 </span> <span class="subxComment"># var elem-type/edx: type-id = a->right->left->value</span> -<span id="L10252" class="LineNr">10252 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10253" class="LineNr">10253 </span> 8b/-> *(eax+4) 2/r32/edx <span class="subxComment"># Tree-value</span> -<span id="L10254" class="LineNr">10254 </span> <span class="subxComment"># var array-size/ecx: int = a->right->right->left->value</span> -<span id="L10255" class="LineNr">10255 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L10256" class="LineNr">10256 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10257" class="LineNr">10257 </span> 8b/-> *(eax+4) 1/r32/ecx <span class="subxComment"># Tree-value</span> -<span id="L10258" class="LineNr">10258 </span> <span class="subxComment"># return array-size * size-of(elem-type)</span> -<span id="L10259" class="LineNr">10259 </span> (<a href='mu.subx.html#L11892'>size-of-type-id-as-array-element</a> %edx) <span class="subxComment"># => eax</span> -<span id="L10260" class="LineNr">10260 </span> f7 4/subop/multiply-into-eax %ecx -<span id="L10261" class="LineNr">10261 </span> 05/add-to-eax 4/imm32 <span class="subxComment"># for array size</span> -<span id="L10262" class="LineNr">10262 </span><span class="Constant">$size-of-array:end</span>: -<span id="L10263" class="LineNr">10263 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10264" class="LineNr">10264 </span> 5a/pop-to-edx -<span id="L10265" class="LineNr">10265 </span> 59/pop-to-ecx -<span id="L10266" class="LineNr">10266 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10267" class="LineNr">10267 </span> 89/<- %esp 5/r32/ebp -<span id="L10268" class="LineNr">10268 </span> 5d/pop-to-ebp -<span id="L10269" class="LineNr">10269 </span> c3/return -<span id="L10270" class="LineNr">10270 </span> -<span id="L10271" class="LineNr">10271 </span><span class="subxFunction">size-of-type-id</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> -<span id="L10272" class="LineNr">10272 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10273" class="LineNr">10273 </span> 55/push-ebp -<span id="L10274" class="LineNr">10274 </span> 89/<- %ebp 4/r32/esp -<span id="L10275" class="LineNr">10275 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10276" class="LineNr">10276 </span> 51/push-ecx -<span id="L10277" class="LineNr">10277 </span> <span class="subxComment"># var out/ecx: (handle typeinfo)</span> -<span id="L10278" class="LineNr">10278 </span> 68/push 0/imm32 -<span id="L10279" class="LineNr">10279 </span> 68/push 0/imm32 -<span id="L10280" class="LineNr">10280 </span> 89/<- %ecx 4/r32/esp -<span id="L10281" class="LineNr">10281 </span> <span class="subxComment"># eax = t</span> -<span id="L10282" class="LineNr">10282 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L10283" class="LineNr">10283 </span> <span class="subxComment"># if t is a literal, return 0</span> -<span id="L10284" class="LineNr">10284 </span> 3d/compare-eax-and 0/imm32 -<span id="L10285" class="LineNr">10285 </span> 0f 84/jump-if-= $size-of-type-id:end/disp32 <span class="subxComment"># eax changes type from type-id to int</span> -<span id="L10286" class="LineNr">10286 </span> <span class="subxComment"># if t is a byte, return 4 (because we don't really support non-multiples of 4)</span> -<span id="L10287" class="LineNr">10287 </span> 3d/compare-eax-and 8/imm32/byte -<span id="L10288" class="LineNr">10288 </span> { -<span id="L10289" class="LineNr">10289 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10290" class="LineNr">10290 </span> b8/copy-to-eax 4/imm32 -<span id="L10291" class="LineNr">10291 </span> eb/jump $size-of-type-id:end/disp8 -<span id="L10292" class="LineNr">10292 </span> } -<span id="L10293" class="LineNr">10293 </span> <span class="subxComment"># if t is a handle, return 8</span> -<span id="L10294" class="LineNr">10294 </span> 3d/compare-eax-and 4/imm32/handle -<span id="L10295" class="LineNr">10295 </span> { -<span id="L10296" class="LineNr">10296 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10297" class="LineNr">10297 </span> b8/copy-to-eax 8/imm32 -<span id="L10298" class="LineNr">10298 </span> eb/jump $size-of-type-id:end/disp8 <span class="subxComment"># eax changes type from type-id to int</span> -<span id="L10299" class="LineNr">10299 </span> } -<span id="L10300" class="LineNr">10300 </span> <span class="subxComment"># if t is a user-defined type, return its size</span> -<span id="L10301" class="LineNr">10301 </span> <span class="subxComment"># TODO: support non-atom type</span> -<span id="L10302" class="LineNr">10302 </span> (<a href='mu.subx.html#L8771'>find-typeinfo</a> %eax %ecx) -<span id="L10303" class="LineNr">10303 </span> { -<span id="L10304" class="LineNr">10304 </span> 81 7/subop/compare *ecx 0/imm32 -<span id="L10305" class="LineNr">10305 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10306" class="LineNr">10306 </span><span class="Constant">$size-of-type-id:user-defined</span>: -<span id="L10307" class="LineNr">10307 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> -<span id="L10308" class="LineNr">10308 </span> 8b/-> *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-total-size-in-bytes</span> -<span id="L10309" class="LineNr">10309 </span> eb/jump $size-of-type-id:end/disp8 -<span id="L10310" class="LineNr">10310 </span> } -<span id="L10311" class="LineNr">10311 </span> <span class="subxComment"># otherwise return the word size</span> -<span id="L10312" class="LineNr">10312 </span> b8/copy-to-eax 4/imm32 -<span id="L10313" class="LineNr">10313 </span><span class="Constant">$size-of-type-id:end</span>: -<span id="L10314" class="LineNr">10314 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L10315" class="LineNr">10315 </span> 81 0/subop/add %esp 8/imm32 -<span id="L10316" class="LineNr">10316 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10317" class="LineNr">10317 </span> 59/pop-to-ecx -<span id="L10318" class="LineNr">10318 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10319" class="LineNr">10319 </span> 89/<- %esp 5/r32/ebp -<span id="L10320" class="LineNr">10320 </span> 5d/pop-to-ebp -<span id="L10321" class="LineNr">10321 </span> c3/return -<span id="L10322" class="LineNr">10322 </span> -<span id="L10323" class="LineNr">10323 </span><span class="subxFunction">type-equal?</span>: <span class="subxComment"># a: (addr tree type-id), b: (addr tree type-id) -> result/eax: boolean</span> -<span id="L10324" class="LineNr">10324 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10325" class="LineNr">10325 </span> 55/push-ebp -<span id="L10326" class="LineNr">10326 </span> 89/<- %ebp 4/r32/esp -<span id="L10327" class="LineNr">10327 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10328" class="LineNr">10328 </span> 51/push-ecx -<span id="L10329" class="LineNr">10329 </span> 52/push-edx -<span id="L10330" class="LineNr">10330 </span> 53/push-ebx -<span id="L10331" class="LineNr">10331 </span> <span class="subxComment"># ecx = a</span> -<span id="L10332" class="LineNr">10332 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10333" class="LineNr">10333 </span> <span class="subxComment"># edx = b</span> -<span id="L10334" class="LineNr">10334 </span> 8b/-> *(ebp+0xc) 2/r32/edx -<span id="L10335" class="LineNr">10335 </span><span class="Constant">$type-equal?:compare-addr</span>: -<span id="L10336" class="LineNr">10336 </span> <span class="subxComment"># if (a == b) return true</span> -<span id="L10337" class="LineNr">10337 </span> 8b/-> %ecx 0/r32/eax <span class="subxComment"># Var-type</span> -<span id="L10338" class="LineNr">10338 </span> 39/compare %edx 0/r32/eax <span class="subxComment"># Var-type</span> -<span id="L10339" class="LineNr">10339 </span> b8/copy-to-eax 1/imm32/true -<span id="L10340" class="LineNr">10340 </span> 0f 84/jump-if-= $type-equal?:end/disp32 -<span id="L10341" class="LineNr">10341 </span><span class="Constant">$type-equal?:compare-atom-state</span>: -<span id="L10342" class="LineNr">10342 </span> <span class="subxComment"># if (a->is-atom? != b->is-atom?) return false</span> -<span id="L10343" class="LineNr">10343 </span> 8b/-> *ecx 3/r32/ebx <span class="subxComment"># Tree-value</span> -<span id="L10344" class="LineNr">10344 </span> 39/compare *edx 3/r32/ebx <span class="subxComment"># Tree-value</span> -<span id="L10345" class="LineNr">10345 </span> b8/copy-to-eax 0/imm32/false -<span id="L10346" class="LineNr">10346 </span> 0f 85/jump-if-!= $type-equal?:end/disp32 -<span id="L10347" class="LineNr">10347 </span> <span class="subxComment"># if a->is-atom? return (a->value == b->value)</span> -<span id="L10348" class="LineNr">10348 </span> { -<span id="L10349" class="LineNr">10349 </span><span class="Constant">$type-equal?:check-atom</span>: -<span id="L10350" class="LineNr">10350 </span> 81 7/subop/compare %ebx 0/imm32/false -<span id="L10351" class="LineNr">10351 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10352" class="LineNr">10352 </span><span class="Constant">$type-equal?:is-atom</span>: -<span id="L10353" class="LineNr">10353 </span> 8b/-> *(ecx+4) 0/r32/eax <span class="subxComment"># Tree-value</span> -<span id="L10354" class="LineNr">10354 </span> 39/compare *(edx+4) 0/r32/eax <span class="subxComment"># Tree-value</span> -<span id="L10355" class="LineNr">10355 </span> 0f 94/set-if-= %al -<span id="L10356" class="LineNr">10356 </span> 81 4/subop/and %eax 0xff/imm32 -<span id="L10357" class="LineNr">10357 </span> e9/jump $type-equal?:end/disp32 -<span id="L10358" class="LineNr">10358 </span> } -<span id="L10359" class="LineNr">10359 </span><span class="Constant">$type-equal?:check-left</span>: -<span id="L10360" class="LineNr">10360 </span> <span class="subxComment"># if (!type-equal?(a->left, b->left)) return false</span> -<span id="L10361" class="LineNr">10361 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10362" class="LineNr">10362 </span> 89/<- %ebx 0/r32/eax -<span id="L10363" class="LineNr">10363 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L10364" class="LineNr">10364 </span> (<a href='mu.subx.html#L10323'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> -<span id="L10365" class="LineNr">10365 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10366" class="LineNr">10366 </span> 74/jump-if-= $type-equal?:end/disp8 -<span id="L10367" class="LineNr">10367 </span><span class="Constant">$type-equal?:check-right</span>: -<span id="L10368" class="LineNr">10368 </span> <span class="subxComment"># return type-equal?(a->right, b->right)</span> -<span id="L10369" class="LineNr">10369 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L10370" class="LineNr">10370 </span> 89/<- %ebx 0/r32/eax -<span id="L10371" class="LineNr">10371 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L10372" class="LineNr">10372 </span> (<a href='mu.subx.html#L10323'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> -<span id="L10373" class="LineNr">10373 </span><span class="Constant">$type-equal?:end</span>: -<span id="L10374" class="LineNr">10374 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10375" class="LineNr">10375 </span> 5b/pop-to-ebx -<span id="L10376" class="LineNr">10376 </span> 5a/pop-to-edx -<span id="L10377" class="LineNr">10377 </span> 59/pop-to-ecx -<span id="L10378" class="LineNr">10378 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10379" class="LineNr">10379 </span> 89/<- %esp 5/r32/ebp -<span id="L10380" class="LineNr">10380 </span> 5d/pop-to-ebp -<span id="L10381" class="LineNr">10381 </span> c3/return -<span id="L10382" class="LineNr">10382 </span> -<span id="L10383" class="LineNr">10383 </span><span class="subxComment">#######################################################</span> -<span id="L10384" class="LineNr">10384 </span><span class="subxComment"># Code-generation</span> -<span id="L10385" class="LineNr">10385 </span><span class="subxComment">#######################################################</span> -<span id="L10386" class="LineNr">10386 </span> -<span id="L10387" class="LineNr">10387 </span>== data -<span id="L10388" class="LineNr">10388 </span> -<span id="L10389" class="LineNr">10389 </span><span class="subxComment"># Global state added to each var record when performing code-generation.</span> -<span id="L10390" class="LineNr">10390 </span><span class="SpecialChar">Curr-local-stack-offset</span>: <span class="subxComment"># (addr int)</span> -<span id="L10391" class="LineNr">10391 </span> 0/imm32 -<span id="L10392" class="LineNr">10392 </span> -<span id="L10393" class="LineNr">10393 </span>== code -<span id="L10394" class="LineNr">10394 </span> -<span id="L10395" class="LineNr">10395 </span><span class="subxFunction">emit-subx</span>: <span class="subxComment"># out: (addr buffered-file), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L10396" class="LineNr">10396 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10397" class="LineNr">10397 </span> 55/push-ebp -<span id="L10398" class="LineNr">10398 </span> 89/<- %ebp 4/r32/esp -<span id="L10399" class="LineNr">10399 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10400" class="LineNr">10400 </span> 50/push-eax -<span id="L10401" class="LineNr">10401 </span> <span class="subxComment"># var curr/eax: (addr function) = *Program->functions</span> -<span id="L10402" class="LineNr">10402 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> -<span id="L10403" class="LineNr">10403 </span> { -<span id="L10404" class="LineNr">10404 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L10405" class="LineNr">10405 </span> 3d/compare-eax-and 0/imm32 -<span id="L10406" class="LineNr">10406 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10407" class="LineNr">10407 </span> (<a href='mu.subx.html#L10420'>emit-subx-function</a> *(ebp+8) %eax *(ebp+0xc) *(ebp+0x10)) -<span id="L10408" class="LineNr">10408 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L10409" class="LineNr">10409 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x20) *(eax+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> -<span id="L10410" class="LineNr">10410 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L10411" class="LineNr">10411 </span> } -<span id="L10412" class="LineNr">10412 </span><span class="Constant">$emit-subx:end</span>: -<span id="L10413" class="LineNr">10413 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10414" class="LineNr">10414 </span> 58/pop-to-eax -<span id="L10415" class="LineNr">10415 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10416" class="LineNr">10416 </span> 89/<- %esp 5/r32/ebp -<span id="L10417" class="LineNr">10417 </span> 5d/pop-to-ebp -<span id="L10418" class="LineNr">10418 </span> c3/return -<span id="L10419" class="LineNr">10419 </span> -<span id="L10420" class="LineNr">10420 </span><span class="subxFunction">emit-subx-function</span>: <span class="subxComment"># out: (addr buffered-file), f: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L10421" class="LineNr">10421 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10422" class="LineNr">10422 </span> 55/push-ebp -<span id="L10423" class="LineNr">10423 </span> 89/<- %ebp 4/r32/esp -<span id="L10424" class="LineNr">10424 </span> <span class="subxComment"># some preprocessing</span> -<span id="L10425" class="LineNr">10425 </span> (<a href='mu.subx.html#L10465'>populate-mu-type-offsets-in-inouts</a> *(ebp+0xc)) -<span id="L10426" class="LineNr">10426 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10427" class="LineNr">10427 </span> 50/push-eax -<span id="L10428" class="LineNr">10428 </span> 51/push-ecx -<span id="L10429" class="LineNr">10429 </span> 52/push-edx -<span id="L10430" class="LineNr">10430 </span> <span class="subxComment"># initialize some global state</span> -<span id="L10431" class="LineNr">10431 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 1/imm32 <span class="subxComment"># Important: keep this in sync with the parse phase</span> -<span id="L10432" class="LineNr">10432 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L10390'>Curr-local-stack-offset</a></span> 0/imm32 -<span id="L10433" class="LineNr">10433 </span> <span class="subxComment"># ecx = f</span> -<span id="L10434" class="LineNr">10434 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10435" class="LineNr">10435 </span> <span class="subxComment"># var vars/edx: (stack (addr var) 256)</span> -<span id="L10436" class="LineNr">10436 </span> 81 5/subop/subtract %esp 0xc00/imm32 -<span id="L10437" class="LineNr">10437 </span> 68/push 0xc00/imm32/size -<span id="L10438" class="LineNr">10438 </span> 68/push 0/imm32/top -<span id="L10439" class="LineNr">10439 </span> 89/<- %edx 4/r32/esp -<span id="L10440" class="LineNr">10440 </span> <span class="subxComment"># var name/eax: (addr array byte) = lookup(f->name)</span> -<span id="L10441" class="LineNr">10441 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L10442" class="LineNr">10442 </span> <span class="subxComment">#</span> -<span id="L10443" class="LineNr">10443 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L10444" class="LineNr">10444 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":\n"</span>) -<span id="L10445" class="LineNr">10445 </span> (<a href='mu.subx.html#L18665'>emit-subx-prologue</a> *(ebp+8)) -<span id="L10446" class="LineNr">10446 </span> <span class="subxComment"># var body/eax: (addr block) = lookup(f->body)</span> -<span id="L10447" class="LineNr">10447 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Function-body Function-body => eax</span> -<span id="L10448" class="LineNr">10448 </span> <span class="subxComment">#</span> -<span id="L10449" class="LineNr">10449 </span> (<a href='mu.subx.html#L12557'>emit-subx-block</a> *(ebp+8) %eax %edx *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L10450" class="LineNr">10450 </span> (<a href='mu.subx.html#L18679'>emit-subx-epilogue</a> *(ebp+8)) -<span id="L10451" class="LineNr">10451 </span> <span class="subxComment"># TODO: validate that *Curr-block-depth and *Curr-local-stack-offset have</span> -<span id="L10452" class="LineNr">10452 </span> <span class="subxComment"># been cleaned up</span> -<span id="L10453" class="LineNr">10453 </span><span class="Constant">$emit-subx-function:end</span>: -<span id="L10454" class="LineNr">10454 </span> <span class="subxS1Comment"># . reclaim locals</span> -<span id="L10455" class="LineNr">10455 </span> 81 0/subop/add %esp 0xc08/imm32 -<span id="L10456" class="LineNr">10456 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10457" class="LineNr">10457 </span> 5a/pop-to-edx -<span id="L10458" class="LineNr">10458 </span> 59/pop-to-ecx -<span id="L10459" class="LineNr">10459 </span> 58/pop-to-eax -<span id="L10460" class="LineNr">10460 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10461" class="LineNr">10461 </span> 89/<- %esp 5/r32/ebp -<span id="L10462" class="LineNr">10462 </span> 5d/pop-to-ebp -<span id="L10463" class="LineNr">10463 </span> c3/return -<span id="L10464" class="LineNr">10464 </span> -<span id="L10465" class="LineNr">10465 </span><span class="subxFunction">populate-mu-type-offsets-in-inouts</span>: <span class="subxComment"># f: (addr function)</span> -<span id="L10466" class="LineNr">10466 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10467" class="LineNr">10467 </span> 55/push-ebp -<span id="L10468" class="LineNr">10468 </span> 89/<- %ebp 4/r32/esp -<span id="L10469" class="LineNr">10469 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10470" class="LineNr">10470 </span> 50/push-eax -<span id="L10471" class="LineNr">10471 </span> 51/push-ecx -<span id="L10472" class="LineNr">10472 </span> 52/push-edx -<span id="L10473" class="LineNr">10473 </span> 53/push-ebx -<span id="L10474" class="LineNr">10474 </span> 57/push-edi -<span id="L10475" class="LineNr">10475 </span> <span class="subxComment"># var next-offset/edx: int = 8</span> -<span id="L10476" class="LineNr">10476 </span> ba/copy-to-edx 8/imm32 -<span id="L10477" class="LineNr">10477 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(f->inouts)</span> -<span id="L10478" class="LineNr">10478 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10479" class="LineNr">10479 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Function-inouts Function-inouts => eax</span> -<span id="L10480" class="LineNr">10480 </span> 89/<- %ecx 0/r32/eax -<span id="L10481" class="LineNr">10481 </span> { -<span id="L10482" class="LineNr">10482 </span><span class="Constant">$populate-mu-type-offsets-in-inouts:loop</span>: -<span id="L10483" class="LineNr">10483 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L10484" class="LineNr">10484 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10485" class="LineNr">10485 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(curr->value)</span> -<span id="L10486" class="LineNr">10486 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L10487" class="LineNr">10487 </span> 89/<- %ebx 0/r32/eax -<span id="L10488" class="LineNr">10488 </span><span class="CommentedCode">#? (lookup *ebx *(ebx+4))</span> -<span id="L10489" class="LineNr">10489 </span><span class="CommentedCode">#? (write-buffered Stderr "setting offset of fn inout ")</span> -<span id="L10490" class="LineNr">10490 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L10491" class="LineNr">10491 </span><span class="CommentedCode">#? (write-buffered Stderr "@")</span> -<span id="L10492" class="LineNr">10492 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> -<span id="L10493" class="LineNr">10493 </span><span class="CommentedCode">#? (write-buffered Stderr " to ")</span> -<span id="L10494" class="LineNr">10494 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %edx)</span> -<span id="L10495" class="LineNr">10495 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L10496" class="LineNr">10496 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L10497" class="LineNr">10497 </span> <span class="subxComment"># v->offset = next-offset</span> -<span id="L10498" class="LineNr">10498 </span> 89/<- *(ebx+0x14) 2/r32/edx <span class="subxComment"># Var-offset</span> -<span id="L10499" class="LineNr">10499 </span> <span class="subxComment"># next-offset += size-of(v)</span> -<span id="L10500" class="LineNr">10500 </span> (<a href='mu.subx.html#L10128'>size-of</a> %ebx) <span class="subxComment"># => eax</span> -<span id="L10501" class="LineNr">10501 </span> 01/add-to %edx 0/r32/eax -<span id="L10502" class="LineNr">10502 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L10503" class="LineNr">10503 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L10504" class="LineNr">10504 </span> 89/<- %ecx 0/r32/eax -<span id="L10505" class="LineNr">10505 </span> <span class="subxComment">#</span> -<span id="L10506" class="LineNr">10506 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L10507" class="LineNr">10507 </span> } -<span id="L10508" class="LineNr">10508 </span><span class="Constant">$populate-mu-type-offsets-in-inouts:end</span>: -<span id="L10509" class="LineNr">10509 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10510" class="LineNr">10510 </span> 5f/pop-to-edi -<span id="L10511" class="LineNr">10511 </span> 5b/pop-to-ebx -<span id="L10512" class="LineNr">10512 </span> 5a/pop-to-edx -<span id="L10513" class="LineNr">10513 </span> 59/pop-to-ecx -<span id="L10514" class="LineNr">10514 </span> 58/pop-to-eax -<span id="L10515" class="LineNr">10515 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10516" class="LineNr">10516 </span> 89/<- %esp 5/r32/ebp -<span id="L10517" class="LineNr">10517 </span> 5d/pop-to-ebp -<span id="L10518" class="LineNr">10518 </span> c3/return -<span id="L10519" class="LineNr">10519 </span> -<span id="L10520" class="LineNr">10520 </span><span class="subxFunction">emit-subx-stmt-list</span>: <span class="subxComment"># out: (addr buffered-file), stmts: (addr list stmt), vars: (addr stack live-var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L10521" class="LineNr">10521 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10522" class="LineNr">10522 </span> 55/push-ebp -<span id="L10523" class="LineNr">10523 </span> 89/<- %ebp 4/r32/esp -<span id="L10524" class="LineNr">10524 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10525" class="LineNr">10525 </span> 50/push-eax -<span id="L10526" class="LineNr">10526 </span> 51/push-ecx -<span id="L10527" class="LineNr">10527 </span> 53/push-ebx -<span id="L10528" class="LineNr">10528 </span> 56/push-esi -<span id="L10529" class="LineNr">10529 </span> <span class="subxComment"># esi = stmts</span> -<span id="L10530" class="LineNr">10530 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L10531" class="LineNr">10531 </span> <span class="subxComment">#</span> -<span id="L10532" class="LineNr">10532 </span> { -<span id="L10533" class="LineNr">10533 </span><span class="Constant">$emit-subx-stmt-list:loop</span>: -<span id="L10534" class="LineNr">10534 </span> 81 7/subop/compare %esi 0/imm32 -<span id="L10535" class="LineNr">10535 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10536" class="LineNr">10536 </span> <span class="subxComment"># var curr-stmt/ecx: (addr stmt) = lookup(stmts->value)</span> -<span id="L10537" class="LineNr">10537 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L10538" class="LineNr">10538 </span> 89/<- %ecx 0/r32/eax -<span id="L10539" class="LineNr">10539 </span> { -<span id="L10540" class="LineNr">10540 </span><span class="Constant">$emit-subx-stmt-list:check-for-block</span>: -<span id="L10541" class="LineNr">10541 </span> 81 7/subop/compare *ecx 0/imm32/block <span class="subxComment"># Stmt-tag</span> -<span id="L10542" class="LineNr">10542 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10543" class="LineNr">10543 </span><span class="Constant">$emit-subx-stmt-list:block</span>: -<span id="L10544" class="LineNr">10544 </span> (<a href='mu.subx.html#L12557'>emit-subx-block</a> *(ebp+8) %ecx *(ebp+0x10) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) -<span id="L10545" class="LineNr">10545 </span> } -<span id="L10546" class="LineNr">10546 </span> { -<span id="L10547" class="LineNr">10547 </span><span class="Constant">$emit-subx-stmt-list:check-for-stmt</span>: -<span id="L10548" class="LineNr">10548 </span> 81 7/subop/compare *ecx 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> -<span id="L10549" class="LineNr">10549 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L10550" class="LineNr">10550 </span><span class="Constant">$emit-subx-stmt-list:stmt1</span>: -<span id="L10551" class="LineNr">10551 </span> { -<span id="L10552" class="LineNr">10552 </span> (<a href='mu.subx.html#L10821'>is-mu-branch?</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L10553" class="LineNr">10553 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10554" class="LineNr">10554 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L10555" class="LineNr">10555 </span><span class="Constant">$emit-subx-stmt-list:branch-stmt</span>: -<span id="L10556" class="Folded">10556 </span><span class="Folded">+-- 27 lines: # unconditional loops -----------------------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L10583" class="Folded">10583 </span><span class="Folded">+-- 16 lines: # unconditional breaks ----------------------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L10599" class="Folded">10599 </span><span class="Folded">+-- 38 lines: # simple conditional branches without a target ----------------------------------------------------------------------------------------------------------------------------</span> -<span id="L10637" class="Folded">10637 </span><span class="Folded">+-- 19 lines: # conditional branches with an explicit target ----------------------------------------------------------------------------------------------------------------------------</span> -<span id="L10656" class="LineNr">10656 </span> } -<span id="L10657" class="LineNr">10657 </span><span class="Constant">$emit-subx-stmt-list:1-to-1</span>: -<span id="L10658" class="LineNr">10658 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> *(ebp+8) %ecx <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> *(ebp+0x18) *(ebp+0x1c)) -<span id="L10659" class="LineNr">10659 </span> e9/jump $emit-subx-stmt-list:continue/disp32 -<span id="L10660" class="LineNr">10660 </span> } -<span id="L10661" class="LineNr">10661 </span> { -<span id="L10662" class="LineNr">10662 </span><span class="Constant">$emit-subx-stmt-list:check-for-var-def</span>: -<span id="L10663" class="LineNr">10663 </span> 81 7/subop/compare *ecx 2/imm32/var-def <span class="subxComment"># Stmt-tag</span> -<span id="L10664" class="LineNr">10664 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10665" class="LineNr">10665 </span><span class="Constant">$emit-subx-stmt-list:var-def</span>: -<span id="L10666" class="LineNr">10666 </span> (<a href='mu.subx.html#L11623'>emit-subx-var-def</a> *(ebp+8) %ecx) -<span id="L10667" class="LineNr">10667 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ecx+4)) <span class="subxComment"># Vardef-var</span> -<span id="L10668" class="LineNr">10668 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ecx+8)) <span class="subxComment"># Vardef-var</span> -<span id="L10669" class="LineNr">10669 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># Live-var-register-spilled = 0 for vars on the stack</span> -<span id="L10670" class="LineNr">10670 </span> <span class="subxComment">#</span> -<span id="L10671" class="LineNr">10671 </span> eb/jump $emit-subx-stmt-list:continue/disp8 -<span id="L10672" class="LineNr">10672 </span> } -<span id="L10673" class="LineNr">10673 </span> { -<span id="L10674" class="LineNr">10674 </span><span class="Constant">$emit-subx-stmt-list:check-for-reg-var-def</span>: -<span id="L10675" class="LineNr">10675 </span> 81 7/subop/compare *ecx 3/imm32/reg-var-def <span class="subxComment"># Stmt-tag</span> -<span id="L10676" class="LineNr">10676 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L10677" class="LineNr">10677 </span><span class="Constant">$emit-subx-stmt-list:reg-var-def</span>: -<span id="L10678" class="LineNr">10678 </span> <span class="subxComment"># TODO: ensure that there's exactly one output</span> -<span id="L10679" class="LineNr">10679 </span> (<a href='mu.subx.html#L10707'>push-output-and-maybe-emit-spill</a> *(ebp+8) %ecx *(ebp+0x10) %esi *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) -<span id="L10680" class="LineNr">10680 </span> <span class="subxComment"># emit the instruction as usual</span> -<span id="L10681" class="LineNr">10681 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> *(ebp+8) %ecx <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> *(ebp+0x18) *(ebp+0x1c)) -<span id="L10682" class="LineNr">10682 </span> <span class="subxComment">#</span> -<span id="L10683" class="LineNr">10683 </span> eb/jump $emit-subx-stmt-list:continue/disp8 -<span id="L10684" class="LineNr">10684 </span> } -<span id="L10685" class="LineNr">10685 </span><span class="Constant">$emit-subx-stmt-list:continue</span>: -<span id="L10686" class="LineNr">10686 </span> <span class="subxComment"># TODO: raise an error on unrecognized Stmt-tag</span> -<span id="L10687" class="LineNr">10687 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L10688" class="LineNr">10688 </span> 89/<- %esi 0/r32/eax -<span id="L10689" class="LineNr">10689 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L10690" class="LineNr">10690 </span> } -<span id="L10691" class="LineNr">10691 </span><span class="Constant">$emit-subx-stmt-list:emit-cleanup</span>: -<span id="L10692" class="LineNr">10692 </span> (<a href='mu.subx.html#L10971'>emit-cleanup-code-until-depth</a> *(ebp+8) *(ebp+0x10) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L10693" class="LineNr">10693 </span><span class="Constant">$emit-subx-stmt-list:clean-up</span>: -<span id="L10694" class="LineNr">10694 </span> (<a href='mu.subx.html#L11469'>clean-up-blocks</a> *(ebp+0x10) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> *(ebp+0x14)) -<span id="L10695" class="LineNr">10695 </span><span class="Constant">$emit-subx-stmt-list:end</span>: -<span id="L10696" class="LineNr">10696 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10697" class="LineNr">10697 </span> 5e/pop-to-esi -<span id="L10698" class="LineNr">10698 </span> 5b/pop-to-ebx -<span id="L10699" class="LineNr">10699 </span> 59/pop-to-ecx -<span id="L10700" class="LineNr">10700 </span> 58/pop-to-eax -<span id="L10701" class="LineNr">10701 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10702" class="LineNr">10702 </span> 89/<- %esp 5/r32/ebp -<span id="L10703" class="LineNr">10703 </span> 5d/pop-to-ebp -<span id="L10704" class="LineNr">10704 </span> c3/return -<span id="L10705" class="LineNr">10705 </span> -<span id="L10706" class="LineNr">10706 </span><span class="subxComment"># 'later-stmts' includes 'stmt', but will behave the same even without it; reg-var-def stmts are guaranteed not to write to function outputs.</span> -<span id="L10707" class="LineNr">10707 </span><span class="subxFunction">push-output-and-maybe-emit-spill</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr reg-var-def), vars: (addr stack (handle var)), later-stmts: (addr list stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L10708" class="LineNr">10708 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10709" class="LineNr">10709 </span> 55/push-ebp -<span id="L10710" class="LineNr">10710 </span> 89/<- %ebp 4/r32/esp -<span id="L10711" class="LineNr">10711 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10712" class="LineNr">10712 </span> 50/push-eax -<span id="L10713" class="LineNr">10713 </span> 51/push-ecx -<span id="L10714" class="LineNr">10714 </span> 52/push-edx -<span id="L10715" class="LineNr">10715 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L10716" class="LineNr">10716 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10717" class="LineNr">10717 </span> <span class="subxComment"># var sv/eax: (addr stmt-var) = lookup(curr-stmt->outputs)</span> -<span id="L10718" class="LineNr">10718 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Regvardef-outputs Regvardef-outputs => eax</span> -<span id="L10719" class="LineNr">10719 </span> <span class="subxComment"># TODO: assert !sv->is-deref?</span> -<span id="L10720" class="LineNr">10720 </span> <span class="subxComment"># var v/ecx: (addr var) = lookup(sv->value)</span> -<span id="L10721" class="LineNr">10721 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L10722" class="LineNr">10722 </span> 89/<- %ecx 0/r32/eax -<span id="L10723" class="LineNr">10723 </span> <span class="subxComment"># v->block-depth = *Curr-block-depth</span> -<span id="L10724" class="LineNr">10724 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax -<span id="L10725" class="LineNr">10725 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> -<span id="L10726" class="LineNr">10726 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> -<span id="L10727" class="LineNr">10727 </span><span class="CommentedCode">#? (lookup *ecx *(ecx+4))</span> -<span id="L10728" class="LineNr">10728 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L10729" class="LineNr">10729 </span><span class="CommentedCode">#? (write-buffered Stderr " at depth ")</span> -<span id="L10730" class="LineNr">10730 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ecx+0x10))</span> -<span id="L10731" class="LineNr">10731 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L10732" class="LineNr">10732 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L10733" class="LineNr">10733 </span> <span class="subxComment"># ensure that v is in a register</span> -<span id="L10734" class="LineNr">10734 </span> 81 7/subop/compare *(ecx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L10735" class="LineNr">10735 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:abort/disp32 -<span id="L10736" class="LineNr">10736 </span> <span class="subxComment"># var emit-spill?/edx: boolean = not-yet-spilled-this-block? && will-not-write-some-register?(fn)</span> -<span id="L10737" class="LineNr">10737 </span> (<a href='mu.subx.html#L11141'>not-yet-spilled-this-block?</a> %ecx *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L10738" class="LineNr">10738 </span> 89/<- %edx 0/r32/eax -<span id="L10739" class="LineNr">10739 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10740" class="LineNr">10740 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a>/disp32 -<span id="L10741" class="LineNr">10741 </span> (<a href='mu.subx.html#L11214'>will-not-write-some-register?</a> %ecx *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> -<span id="L10742" class="LineNr">10742 </span> 89/<- %edx 0/r32/eax -<span id="L10743" class="LineNr">10743 </span> <span class="subxComment"># check emit-spill?</span> -<span id="L10744" class="LineNr">10744 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10745" class="LineNr">10745 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a>/disp32 -<span id="L10746" class="LineNr">10746 </span> <span class="subxComment"># TODO: assert(size-of(output) == 4)</span> -<span id="L10747" class="LineNr">10747 </span> <span class="subxComment"># *Curr-local-stack-offset -= 4</span> -<span id="L10748" class="LineNr">10748 </span> 81 5/subop/subtract *<span class="SpecialChar"><a href='mu.subx.html#L10390'>Curr-local-stack-offset</a></span> 4/imm32 -<span id="L10749" class="LineNr">10749 </span> <span class="subxComment"># emit spill</span> -<span id="L10750" class="LineNr">10750 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L10751" class="LineNr">10751 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"ff 6/subop/push %"</span>) -<span id="L10752" class="LineNr">10752 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L10753" class="LineNr">10753 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L10754" class="LineNr">10754 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L10755" class="LineNr">10755 </span><span class="Constant">$push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a></span>: -<span id="L10756" class="LineNr">10756 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10757" class="LineNr">10757 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Regvardef-outputs Regvardef-outputs => eax</span> -<span id="L10758" class="LineNr">10758 </span> <span class="subxComment"># push(vars, {sv->value, emit-spill?})</span> -<span id="L10759" class="LineNr">10759 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *eax) <span class="subxComment"># Stmt-var-value</span> -<span id="L10760" class="LineNr">10760 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(eax+4)) <span class="subxComment"># Stmt-var-value</span> -<span id="L10761" class="LineNr">10761 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) %edx) -<span id="L10762" class="LineNr">10762 </span><span class="Constant">$push-output-and-maybe-emit-spill:end</span>: -<span id="L10763" class="LineNr">10763 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10764" class="LineNr">10764 </span> 5a/pop-to-edx -<span id="L10765" class="LineNr">10765 </span> 59/pop-to-ecx -<span id="L10766" class="LineNr">10766 </span> 58/pop-to-eax -<span id="L10767" class="LineNr">10767 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10768" class="LineNr">10768 </span> 89/<- %esp 5/r32/ebp -<span id="L10769" class="LineNr">10769 </span> 5d/pop-to-ebp -<span id="L10770" class="LineNr">10770 </span> c3/return -<span id="L10771" class="LineNr">10771 </span> -<span id="L10772" class="LineNr">10772 </span><span class="Constant">$push-output-and-maybe-emit-spill:abort</span>: -<span id="L10773" class="LineNr">10773 </span> <span class="subxComment"># error("var '" var->name "' initialized from an instruction must live in a register\n")</span> -<span id="L10774" class="LineNr">10774 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) <span class="Constant">"var '"</span>) -<span id="L10775" class="LineNr">10775 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) *eax) <span class="subxComment"># Var-name</span> -<span id="L10776" class="LineNr">10776 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) <span class="Constant">"' initialized from an instruction must live in a register\n"</span>) -<span id="L10777" class="LineNr">10777 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x1c)) -<span id="L10778" class="LineNr">10778 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x20) 1) -<span id="L10779" class="LineNr">10779 </span> <span class="subxComment"># never gets here</span> -<span id="L10780" class="LineNr">10780 </span> -<span id="L10781" class="LineNr">10781 </span><span class="subxFunction">emit-subx-cleanup-and-unconditional-nonlocal-branch</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt1), vars: (addr stack live-var)</span> -<span id="L10782" class="LineNr">10782 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10783" class="LineNr">10783 </span> 55/push-ebp -<span id="L10784" class="LineNr">10784 </span> 89/<- %ebp 4/r32/esp -<span id="L10785" class="LineNr">10785 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10786" class="LineNr">10786 </span> 50/push-eax -<span id="L10787" class="LineNr">10787 </span> 51/push-ecx -<span id="L10788" class="LineNr">10788 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L10789" class="LineNr">10789 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10790" class="LineNr">10790 </span> <span class="subxComment"># var target/eax: (addr array byte) = curr-stmt->inouts->value->name</span> -<span id="L10791" class="LineNr">10791 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L10792" class="LineNr">10792 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L10793" class="LineNr">10793 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L10794" class="LineNr">10794 </span> <span class="subxComment"># clean up until target block</span> -<span id="L10795" class="LineNr">10795 </span> (<a href='mu.subx.html#L11060'>emit-cleanup-code-until-target</a> *(ebp+8) *(ebp+0x10) %eax) -<span id="L10796" class="LineNr">10796 </span> <span class="subxComment"># emit jump to target block</span> -<span id="L10797" class="LineNr">10797 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L10798" class="LineNr">10798 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"e9/jump "</span>) -<span id="L10799" class="LineNr">10799 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L10800" class="LineNr">10800 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L10801" class="LineNr">10801 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %eax <span class="Constant">"break"</span>) -<span id="L10802" class="LineNr">10802 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10803" class="LineNr">10803 </span> { -<span id="L10804" class="LineNr">10804 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L10805" class="LineNr">10805 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break/disp32\n"</span>) -<span id="L10806" class="LineNr">10806 </span> } -<span id="L10807" class="LineNr">10807 </span> 3d/compare-eax-and 0/imm32/false <span class="subxComment"># just in case the function call modified flags</span> -<span id="L10808" class="LineNr">10808 </span> { -<span id="L10809" class="LineNr">10809 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L10810" class="LineNr">10810 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop/disp32\n"</span>) -<span id="L10811" class="LineNr">10811 </span> } -<span id="L10812" class="LineNr">10812 </span><span class="Constant">$emit-subx-cleanup-and-unconditional-nonlocal-branch:end</span>: -<span id="L10813" class="LineNr">10813 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10814" class="LineNr">10814 </span> 59/pop-to-ecx -<span id="L10815" class="LineNr">10815 </span> 58/pop-to-eax -<span id="L10816" class="LineNr">10816 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10817" class="LineNr">10817 </span> 89/<- %esp 5/r32/ebp -<span id="L10818" class="LineNr">10818 </span> 5d/pop-to-ebp -<span id="L10819" class="LineNr">10819 </span> c3/return -<span id="L10820" class="LineNr">10820 </span> -<span id="L10821" class="LineNr">10821 </span><span class="subxFunction">is-mu-branch?</span>: <span class="subxComment"># stmt: (addr stmt1) -> result/eax: boolean</span> -<span id="L10822" class="LineNr">10822 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10823" class="LineNr">10823 </span> 55/push-ebp -<span id="L10824" class="LineNr">10824 </span> 89/<- %ebp 4/r32/esp -<span id="L10825" class="LineNr">10825 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10826" class="LineNr">10826 </span> 51/push-ecx -<span id="L10827" class="LineNr">10827 </span> <span class="subxComment"># ecx = lookup(stmt->operation)</span> -<span id="L10828" class="LineNr">10828 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L10829" class="LineNr">10829 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L10830" class="LineNr">10830 </span> 89/<- %ecx 0/r32/eax -<span id="L10831" class="LineNr">10831 </span> <span class="subxComment"># if (stmt->operation starts with "loop") return true</span> -<span id="L10832" class="LineNr">10832 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"loop"</span>) <span class="subxComment"># => eax</span> -<span id="L10833" class="LineNr">10833 </span> 3d/compare-eax-and 0/imm32/false -<span id="L10834" class="LineNr">10834 </span> 75/jump-if-not-equal $is-mu-branch?:end/disp8 -<span id="L10835" class="LineNr">10835 </span> <span class="subxComment"># otherwise return (stmt->operation starts with "break")</span> -<span id="L10836" class="LineNr">10836 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"break"</span>) <span class="subxComment"># => eax</span> -<span id="L10837" class="LineNr">10837 </span><span class="Constant">$is-mu-branch?:end</span>: -<span id="L10838" class="LineNr">10838 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10839" class="LineNr">10839 </span> 59/pop-to-ecx -<span id="L10840" class="LineNr">10840 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10841" class="LineNr">10841 </span> 89/<- %esp 5/r32/ebp -<span id="L10842" class="LineNr">10842 </span> 5d/pop-to-ebp -<span id="L10843" class="LineNr">10843 </span> c3/return -<span id="L10844" class="LineNr">10844 </span> -<span id="L10845" class="LineNr">10845 </span><span class="subxFunction">emit-reverse-break</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt1)</span> -<span id="L10846" class="LineNr">10846 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10847" class="LineNr">10847 </span> 55/push-ebp -<span id="L10848" class="LineNr">10848 </span> 89/<- %ebp 4/r32/esp -<span id="L10849" class="LineNr">10849 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10850" class="LineNr">10850 </span> 50/push-eax -<span id="L10851" class="LineNr">10851 </span> <span class="subxComment"># eax = stmt</span> -<span id="L10852" class="LineNr">10852 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L10853" class="LineNr">10853 </span> <span class="subxComment">#</span> -<span id="L10854" class="LineNr">10854 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L10855" class="LineNr">10855 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L10871'>Reverse-branch</a></span> %eax 0x10 <span class="Constant">"reverse-branch: "</span>) <span class="subxComment"># => eax: (addr handle array byte)</span> -<span id="L10856" class="LineNr">10856 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L10857" class="LineNr">10857 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L10858" class="LineNr">10858 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L10859" class="LineNr">10859 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" break/disp32\n"</span>) -<span id="L10860" class="LineNr">10860 </span><span class="Constant">$emit-reverse-break:end</span>: -<span id="L10861" class="LineNr">10861 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10862" class="LineNr">10862 </span> 58/pop-to-eax -<span id="L10863" class="LineNr">10863 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10864" class="LineNr">10864 </span> 89/<- %esp 5/r32/ebp -<span id="L10865" class="LineNr">10865 </span> 5d/pop-to-ebp -<span id="L10866" class="LineNr">10866 </span> c3/return -<span id="L10867" class="LineNr">10867 </span> -<span id="L10868" class="LineNr">10868 </span>== data -<span id="L10869" class="LineNr">10869 </span> -<span id="L10870" class="LineNr">10870 </span><span class="subxComment"># Table from Mu branch instructions to the reverse SubX opcodes for them.</span> -<span id="L10871" class="LineNr">10871 </span><span class="SpecialChar">Reverse-branch</span>: <span class="subxComment"># (table (handle array byte) (handle array byte))</span> -<span id="L10872" class="LineNr">10872 </span> <span class="subxComment"># a table is a stream</span> -<span id="L10873" class="LineNr">10873 </span> 0x140/imm32/write -<span id="L10874" class="LineNr">10874 </span> 0/imm32/read -<span id="L10875" class="LineNr">10875 </span> 0x140/imm32/size -<span id="L10876" class="LineNr">10876 </span> <span class="subxComment"># data</span> -<span id="L10877" class="LineNr">10877 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14709'>_string-break-if-=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14951'>_string_0f_85_jump_label</a>/imm32 -<span id="L10878" class="LineNr">10878 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14799'>_string-loop-if-=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14951'>_string_0f_85_jump_label</a>/imm32 -<span id="L10879" class="LineNr">10879 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14724'>_string-break-if-!=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14936'>_string_0f_84_jump_label</a>/imm32 -<span id="L10880" class="LineNr">10880 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14814'>_string-loop-if-!=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14936'>_string_0f_84_jump_label</a>/imm32 -<span id="L10881" class="LineNr">10881 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14699'>_string-break-if-<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_8d_jump_label</a>/imm32 -<span id="L10882" class="LineNr">10882 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14789'>_string-loop-if-<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_8d_jump_label</a>/imm32 -<span id="L10883" class="LineNr">10883 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14714'>_string-break-if-></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15026'>_string_0f_8e_jump_label</a>/imm32 -<span id="L10884" class="LineNr">10884 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14804'>_string-loop-if-></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15026'>_string_0f_8e_jump_label</a>/imm32 -<span id="L10885" class="LineNr">10885 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14704'>_string-break-if-<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32 -<span id="L10886" class="LineNr">10886 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14794'>_string-loop-if-<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32 -<span id="L10887" class="LineNr">10887 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14719'>_string-break-if->=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14996'>_string_0f_8c_jump_label</a>/imm32 -<span id="L10888" class="LineNr">10888 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14809'>_string-loop-if->=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14996'>_string_0f_8c_jump_label</a>/imm32 -<span id="L10889" class="LineNr">10889 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14729'>_string-break-if-addr<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14921'>_string_0f_83_jump_label</a>/imm32 -<span id="L10890" class="LineNr">10890 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14819'>_string-loop-if-addr<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14921'>_string_0f_83_jump_label</a>/imm32 -<span id="L10891" class="LineNr">10891 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14739'>_string-break-if-addr></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14966'>_string_0f_86_jump_label</a>/imm32 -<span id="L10892" class="LineNr">10892 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14829'>_string-loop-if-addr></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14966'>_string_0f_86_jump_label</a>/imm32 -<span id="L10893" class="LineNr">10893 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14734'>_string-break-if-addr<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32 -<span id="L10894" class="LineNr">10894 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14824'>_string-loop-if-addr<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32 -<span id="L10895" class="LineNr">10895 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14744'>_string-break-if-addr>=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14906'>_string_0f_82_jump_label</a>/imm32 -<span id="L10896" class="LineNr">10896 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14834'>_string-loop-if-addr>=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14906'>_string_0f_82_jump_label</a>/imm32 +<span id="L10245" class="LineNr">10245 </span> <span class="subxComment"># ecx = t</span> +<span id="L10246" class="LineNr">10246 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10247" class="LineNr">10247 </span> <span class="subxComment"># if t->is-atom?, return false</span> +<span id="L10248" class="LineNr">10248 </span> 81 7/subop/compare *ecx 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L10249" class="LineNr">10249 </span> 75/jump-if-!= $is-mu-array?:return-false/disp8 +<span id="L10250" class="LineNr">10250 </span> <span class="subxComment"># if !t->left->is-atom?, return false</span> +<span id="L10251" class="LineNr">10251 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10252" class="LineNr">10252 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L10253" class="LineNr">10253 </span> 74/jump-if-= $is-mu-array?:return-false/disp8 +<span id="L10254" class="LineNr">10254 </span> <span class="subxComment"># return t->left->value == array</span> +<span id="L10255" class="LineNr">10255 </span> 81 7/subop/compare *(eax+4) 3/imm32/array-type-id <span class="subxComment"># Tree-value</span> +<span id="L10256" class="LineNr">10256 </span> 0f 94/set-if-= %al +<span id="L10257" class="LineNr">10257 </span> 81 4/subop/and %eax 0xff/imm32 +<span id="L10258" class="LineNr">10258 </span> eb/jump $is-mu-array?:end/disp8 +<span id="L10259" class="LineNr">10259 </span><span class="Constant">$is-mu-array?:return-false</span>: +<span id="L10260" class="LineNr">10260 </span> b8/copy-to-eax 0/imm32/false +<span id="L10261" class="LineNr">10261 </span><span class="Constant">$is-mu-array?:end</span>: +<span id="L10262" class="LineNr">10262 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10263" class="LineNr">10263 </span> 59/pop-to-ecx +<span id="L10264" class="LineNr">10264 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10265" class="LineNr">10265 </span> 89/<- %esp 5/r32/ebp +<span id="L10266" class="LineNr">10266 </span> 5d/pop-to-ebp +<span id="L10267" class="LineNr">10267 </span> c3/return +<span id="L10268" class="LineNr">10268 </span> +<span id="L10269" class="LineNr">10269 </span><span class="subxFunction">size-of-array</span>: <span class="subxComment"># a: (addr tree type-id) -> result/eax: int</span> +<span id="L10270" class="LineNr">10270 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10271" class="LineNr">10271 </span> 55/push-ebp +<span id="L10272" class="LineNr">10272 </span> 89/<- %ebp 4/r32/esp +<span id="L10273" class="LineNr">10273 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10274" class="LineNr">10274 </span> 51/push-ecx +<span id="L10275" class="LineNr">10275 </span> 52/push-edx +<span id="L10276" class="LineNr">10276 </span> <span class="subxComment">#</span> +<span id="L10277" class="LineNr">10277 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10278" class="LineNr">10278 </span> <span class="subxComment"># TODO: assert that a->left is 'array'</span> +<span id="L10279" class="LineNr">10279 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10280" class="LineNr">10280 </span> 89/<- %ecx 0/r32/eax +<span id="L10281" class="LineNr">10281 </span> <span class="subxComment"># var elem-type/edx: type-id = a->right->left->value</span> +<span id="L10282" class="LineNr">10282 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10283" class="LineNr">10283 </span> 8b/-> *(eax+4) 2/r32/edx <span class="subxComment"># Tree-value</span> +<span id="L10284" class="LineNr">10284 </span> <span class="subxComment"># var array-size/ecx: int = a->right->right->left->value</span> +<span id="L10285" class="LineNr">10285 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10286" class="LineNr">10286 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10287" class="LineNr">10287 </span> 8b/-> *(eax+4) 1/r32/ecx <span class="subxComment"># Tree-value</span> +<span id="L10288" class="LineNr">10288 </span> <span class="subxComment"># return array-size * size-of(elem-type)</span> +<span id="L10289" class="LineNr">10289 </span> (<a href='mu.subx.html#L11922'>size-of-type-id-as-array-element</a> %edx) <span class="subxComment"># => eax</span> +<span id="L10290" class="LineNr">10290 </span> f7 4/subop/multiply-into-eax %ecx +<span id="L10291" class="LineNr">10291 </span> 05/add-to-eax 4/imm32 <span class="subxComment"># for array size</span> +<span id="L10292" class="LineNr">10292 </span><span class="Constant">$size-of-array:end</span>: +<span id="L10293" class="LineNr">10293 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10294" class="LineNr">10294 </span> 5a/pop-to-edx +<span id="L10295" class="LineNr">10295 </span> 59/pop-to-ecx +<span id="L10296" class="LineNr">10296 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10297" class="LineNr">10297 </span> 89/<- %esp 5/r32/ebp +<span id="L10298" class="LineNr">10298 </span> 5d/pop-to-ebp +<span id="L10299" class="LineNr">10299 </span> c3/return +<span id="L10300" class="LineNr">10300 </span> +<span id="L10301" class="LineNr">10301 </span><span class="subxFunction">size-of-type-id</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> +<span id="L10302" class="LineNr">10302 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10303" class="LineNr">10303 </span> 55/push-ebp +<span id="L10304" class="LineNr">10304 </span> 89/<- %ebp 4/r32/esp +<span id="L10305" class="LineNr">10305 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10306" class="LineNr">10306 </span> 51/push-ecx +<span id="L10307" class="LineNr">10307 </span> <span class="subxComment"># var out/ecx: (handle typeinfo)</span> +<span id="L10308" class="LineNr">10308 </span> 68/push 0/imm32 +<span id="L10309" class="LineNr">10309 </span> 68/push 0/imm32 +<span id="L10310" class="LineNr">10310 </span> 89/<- %ecx 4/r32/esp +<span id="L10311" class="LineNr">10311 </span> <span class="subxComment"># eax = t</span> +<span id="L10312" class="LineNr">10312 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L10313" class="LineNr">10313 </span> <span class="subxComment"># if t is a literal, return 0</span> +<span id="L10314" class="LineNr">10314 </span> 3d/compare-eax-and 0/imm32 +<span id="L10315" class="LineNr">10315 </span> 0f 84/jump-if-= $size-of-type-id:end/disp32 <span class="subxComment"># eax changes type from type-id to int</span> +<span id="L10316" class="LineNr">10316 </span> <span class="subxComment"># if t is a byte, return 4 (because we don't really support non-multiples of 4)</span> +<span id="L10317" class="LineNr">10317 </span> 3d/compare-eax-and 8/imm32/byte +<span id="L10318" class="LineNr">10318 </span> { +<span id="L10319" class="LineNr">10319 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10320" class="LineNr">10320 </span> b8/copy-to-eax 4/imm32 +<span id="L10321" class="LineNr">10321 </span> eb/jump $size-of-type-id:end/disp8 +<span id="L10322" class="LineNr">10322 </span> } +<span id="L10323" class="LineNr">10323 </span> <span class="subxComment"># if t is a handle, return 8</span> +<span id="L10324" class="LineNr">10324 </span> 3d/compare-eax-and 4/imm32/handle +<span id="L10325" class="LineNr">10325 </span> { +<span id="L10326" class="LineNr">10326 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10327" class="LineNr">10327 </span> b8/copy-to-eax 8/imm32 +<span id="L10328" class="LineNr">10328 </span> eb/jump $size-of-type-id:end/disp8 <span class="subxComment"># eax changes type from type-id to int</span> +<span id="L10329" class="LineNr">10329 </span> } +<span id="L10330" class="LineNr">10330 </span> <span class="subxComment"># if t is a user-defined type, return its size</span> +<span id="L10331" class="LineNr">10331 </span> <span class="subxComment"># TODO: support non-atom type</span> +<span id="L10332" class="LineNr">10332 </span> (<a href='mu.subx.html#L8801'>find-typeinfo</a> %eax %ecx) +<span id="L10333" class="LineNr">10333 </span> { +<span id="L10334" class="LineNr">10334 </span> 81 7/subop/compare *ecx 0/imm32 +<span id="L10335" class="LineNr">10335 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10336" class="LineNr">10336 </span><span class="Constant">$size-of-type-id:user-defined</span>: +<span id="L10337" class="LineNr">10337 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># => eax</span> +<span id="L10338" class="LineNr">10338 </span> 8b/-> *(eax+0xc) 0/r32/eax <span class="subxComment"># Typeinfo-total-size-in-bytes</span> +<span id="L10339" class="LineNr">10339 </span> eb/jump $size-of-type-id:end/disp8 +<span id="L10340" class="LineNr">10340 </span> } +<span id="L10341" class="LineNr">10341 </span> <span class="subxComment"># otherwise return the word size</span> +<span id="L10342" class="LineNr">10342 </span> b8/copy-to-eax 4/imm32 +<span id="L10343" class="LineNr">10343 </span><span class="Constant">$size-of-type-id:end</span>: +<span id="L10344" class="LineNr">10344 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L10345" class="LineNr">10345 </span> 81 0/subop/add %esp 8/imm32 +<span id="L10346" class="LineNr">10346 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10347" class="LineNr">10347 </span> 59/pop-to-ecx +<span id="L10348" class="LineNr">10348 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10349" class="LineNr">10349 </span> 89/<- %esp 5/r32/ebp +<span id="L10350" class="LineNr">10350 </span> 5d/pop-to-ebp +<span id="L10351" class="LineNr">10351 </span> c3/return +<span id="L10352" class="LineNr">10352 </span> +<span id="L10353" class="LineNr">10353 </span><span class="subxFunction">type-equal?</span>: <span class="subxComment"># a: (addr tree type-id), b: (addr tree type-id) -> result/eax: boolean</span> +<span id="L10354" class="LineNr">10354 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10355" class="LineNr">10355 </span> 55/push-ebp +<span id="L10356" class="LineNr">10356 </span> 89/<- %ebp 4/r32/esp +<span id="L10357" class="LineNr">10357 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10358" class="LineNr">10358 </span> 51/push-ecx +<span id="L10359" class="LineNr">10359 </span> 52/push-edx +<span id="L10360" class="LineNr">10360 </span> 53/push-ebx +<span id="L10361" class="LineNr">10361 </span> <span class="subxComment"># ecx = a</span> +<span id="L10362" class="LineNr">10362 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10363" class="LineNr">10363 </span> <span class="subxComment"># edx = b</span> +<span id="L10364" class="LineNr">10364 </span> 8b/-> *(ebp+0xc) 2/r32/edx +<span id="L10365" class="LineNr">10365 </span><span class="Constant">$type-equal?:compare-addr</span>: +<span id="L10366" class="LineNr">10366 </span> <span class="subxComment"># if (a == b) return true</span> +<span id="L10367" class="LineNr">10367 </span> 8b/-> %ecx 0/r32/eax <span class="subxComment"># Var-type</span> +<span id="L10368" class="LineNr">10368 </span> 39/compare %edx 0/r32/eax <span class="subxComment"># Var-type</span> +<span id="L10369" class="LineNr">10369 </span> b8/copy-to-eax 1/imm32/true +<span id="L10370" class="LineNr">10370 </span> 0f 84/jump-if-= $type-equal?:end/disp32 +<span id="L10371" class="LineNr">10371 </span><span class="Constant">$type-equal?:compare-atom-state</span>: +<span id="L10372" class="LineNr">10372 </span> <span class="subxComment"># if (a->is-atom? != b->is-atom?) return false</span> +<span id="L10373" class="LineNr">10373 </span> 8b/-> *ecx 3/r32/ebx <span class="subxComment"># Tree-value</span> +<span id="L10374" class="LineNr">10374 </span> 39/compare *edx 3/r32/ebx <span class="subxComment"># Tree-value</span> +<span id="L10375" class="LineNr">10375 </span> b8/copy-to-eax 0/imm32/false +<span id="L10376" class="LineNr">10376 </span> 0f 85/jump-if-!= $type-equal?:end/disp32 +<span id="L10377" class="LineNr">10377 </span> <span class="subxComment"># if a->is-atom? return (a->value == b->value)</span> +<span id="L10378" class="LineNr">10378 </span> { +<span id="L10379" class="LineNr">10379 </span><span class="Constant">$type-equal?:check-atom</span>: +<span id="L10380" class="LineNr">10380 </span> 81 7/subop/compare %ebx 0/imm32/false +<span id="L10381" class="LineNr">10381 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10382" class="LineNr">10382 </span><span class="Constant">$type-equal?:is-atom</span>: +<span id="L10383" class="LineNr">10383 </span> 8b/-> *(ecx+4) 0/r32/eax <span class="subxComment"># Tree-value</span> +<span id="L10384" class="LineNr">10384 </span> 39/compare *(edx+4) 0/r32/eax <span class="subxComment"># Tree-value</span> +<span id="L10385" class="LineNr">10385 </span> 0f 94/set-if-= %al +<span id="L10386" class="LineNr">10386 </span> 81 4/subop/and %eax 0xff/imm32 +<span id="L10387" class="LineNr">10387 </span> e9/jump $type-equal?:end/disp32 +<span id="L10388" class="LineNr">10388 </span> } +<span id="L10389" class="LineNr">10389 </span><span class="Constant">$type-equal?:check-left</span>: +<span id="L10390" class="LineNr">10390 </span> <span class="subxComment"># if (!type-equal?(a->left, b->left)) return false</span> +<span id="L10391" class="LineNr">10391 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10392" class="LineNr">10392 </span> 89/<- %ebx 0/r32/eax +<span id="L10393" class="LineNr">10393 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+4) *(edx+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L10394" class="LineNr">10394 </span> (<a href='mu.subx.html#L10353'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> +<span id="L10395" class="LineNr">10395 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10396" class="LineNr">10396 </span> 74/jump-if-= $type-equal?:end/disp8 +<span id="L10397" class="LineNr">10397 </span><span class="Constant">$type-equal?:check-right</span>: +<span id="L10398" class="LineNr">10398 </span> <span class="subxComment"># return type-equal?(a->right, b->right)</span> +<span id="L10399" class="LineNr">10399 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10400" class="LineNr">10400 </span> 89/<- %ebx 0/r32/eax +<span id="L10401" class="LineNr">10401 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0xc) *(edx+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L10402" class="LineNr">10402 </span> (<a href='mu.subx.html#L10353'>type-equal?</a> %eax %ebx) <span class="subxComment"># => eax</span> +<span id="L10403" class="LineNr">10403 </span><span class="Constant">$type-equal?:end</span>: +<span id="L10404" class="LineNr">10404 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10405" class="LineNr">10405 </span> 5b/pop-to-ebx +<span id="L10406" class="LineNr">10406 </span> 5a/pop-to-edx +<span id="L10407" class="LineNr">10407 </span> 59/pop-to-ecx +<span id="L10408" class="LineNr">10408 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10409" class="LineNr">10409 </span> 89/<- %esp 5/r32/ebp +<span id="L10410" class="LineNr">10410 </span> 5d/pop-to-ebp +<span id="L10411" class="LineNr">10411 </span> c3/return +<span id="L10412" class="LineNr">10412 </span> +<span id="L10413" class="LineNr">10413 </span><span class="subxComment">#######################################################</span> +<span id="L10414" class="LineNr">10414 </span><span class="subxComment"># Code-generation</span> +<span id="L10415" class="LineNr">10415 </span><span class="subxComment">#######################################################</span> +<span id="L10416" class="LineNr">10416 </span> +<span id="L10417" class="LineNr">10417 </span>== data +<span id="L10418" class="LineNr">10418 </span> +<span id="L10419" class="LineNr">10419 </span><span class="subxComment"># Global state added to each var record when performing code-generation.</span> +<span id="L10420" class="LineNr">10420 </span><span class="SpecialChar">Curr-local-stack-offset</span>: <span class="subxComment"># (addr int)</span> +<span id="L10421" class="LineNr">10421 </span> 0/imm32 +<span id="L10422" class="LineNr">10422 </span> +<span id="L10423" class="LineNr">10423 </span>== code +<span id="L10424" class="LineNr">10424 </span> +<span id="L10425" class="LineNr">10425 </span><span class="subxFunction">emit-subx</span>: <span class="subxComment"># out: (addr buffered-file), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L10426" class="LineNr">10426 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10427" class="LineNr">10427 </span> 55/push-ebp +<span id="L10428" class="LineNr">10428 </span> 89/<- %ebp 4/r32/esp +<span id="L10429" class="LineNr">10429 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10430" class="LineNr">10430 </span> 50/push-eax +<span id="L10431" class="LineNr">10431 </span> <span class="subxComment"># var curr/eax: (addr function) = *Program->functions</span> +<span id="L10432" class="LineNr">10432 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *_Program-functions *_Program-functions->payload) <span class="subxComment"># => eax</span> +<span id="L10433" class="LineNr">10433 </span> { +<span id="L10434" class="LineNr">10434 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L10435" class="LineNr">10435 </span> 3d/compare-eax-and 0/imm32 +<span id="L10436" class="LineNr">10436 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10437" class="LineNr">10437 </span> (<a href='mu.subx.html#L10450'>emit-subx-function</a> *(ebp+8) %eax *(ebp+0xc) *(ebp+0x10)) +<span id="L10438" class="LineNr">10438 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L10439" class="LineNr">10439 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x20) *(eax+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> +<span id="L10440" class="LineNr">10440 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L10441" class="LineNr">10441 </span> } +<span id="L10442" class="LineNr">10442 </span><span class="Constant">$emit-subx:end</span>: +<span id="L10443" class="LineNr">10443 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10444" class="LineNr">10444 </span> 58/pop-to-eax +<span id="L10445" class="LineNr">10445 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10446" class="LineNr">10446 </span> 89/<- %esp 5/r32/ebp +<span id="L10447" class="LineNr">10447 </span> 5d/pop-to-ebp +<span id="L10448" class="LineNr">10448 </span> c3/return +<span id="L10449" class="LineNr">10449 </span> +<span id="L10450" class="LineNr">10450 </span><span class="subxFunction">emit-subx-function</span>: <span class="subxComment"># out: (addr buffered-file), f: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L10451" class="LineNr">10451 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10452" class="LineNr">10452 </span> 55/push-ebp +<span id="L10453" class="LineNr">10453 </span> 89/<- %ebp 4/r32/esp +<span id="L10454" class="LineNr">10454 </span> <span class="subxComment"># some preprocessing</span> +<span id="L10455" class="LineNr">10455 </span> (<a href='mu.subx.html#L10495'>populate-mu-type-offsets-in-inouts</a> *(ebp+0xc)) +<span id="L10456" class="LineNr">10456 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10457" class="LineNr">10457 </span> 50/push-eax +<span id="L10458" class="LineNr">10458 </span> 51/push-ecx +<span id="L10459" class="LineNr">10459 </span> 52/push-edx +<span id="L10460" class="LineNr">10460 </span> <span class="subxComment"># initialize some global state</span> +<span id="L10461" class="LineNr">10461 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 1/imm32 <span class="subxComment"># Important: keep this in sync with the parse phase</span> +<span id="L10462" class="LineNr">10462 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L10420'>Curr-local-stack-offset</a></span> 0/imm32 +<span id="L10463" class="LineNr">10463 </span> <span class="subxComment"># ecx = f</span> +<span id="L10464" class="LineNr">10464 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L10465" class="LineNr">10465 </span> <span class="subxComment"># var vars/edx: (stack (addr var) 256)</span> +<span id="L10466" class="LineNr">10466 </span> 81 5/subop/subtract %esp 0xc00/imm32 +<span id="L10467" class="LineNr">10467 </span> 68/push 0xc00/imm32/size +<span id="L10468" class="LineNr">10468 </span> 68/push 0/imm32/top +<span id="L10469" class="LineNr">10469 </span> 89/<- %edx 4/r32/esp +<span id="L10470" class="LineNr">10470 </span> <span class="subxComment"># var name/eax: (addr array byte) = lookup(f->name)</span> +<span id="L10471" class="LineNr">10471 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L10472" class="LineNr">10472 </span> <span class="subxComment">#</span> +<span id="L10473" class="LineNr">10473 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L10474" class="LineNr">10474 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":\n"</span>) +<span id="L10475" class="LineNr">10475 </span> (<a href='mu.subx.html#L18695'>emit-subx-prologue</a> *(ebp+8)) +<span id="L10476" class="LineNr">10476 </span> <span class="subxComment"># var body/eax: (addr block) = lookup(f->body)</span> +<span id="L10477" class="LineNr">10477 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Function-body Function-body => eax</span> +<span id="L10478" class="LineNr">10478 </span> <span class="subxComment">#</span> +<span id="L10479" class="LineNr">10479 </span> (<a href='mu.subx.html#L12587'>emit-subx-block</a> *(ebp+8) %eax %edx *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L10480" class="LineNr">10480 </span> (<a href='mu.subx.html#L18709'>emit-subx-epilogue</a> *(ebp+8)) +<span id="L10481" class="LineNr">10481 </span> <span class="subxComment"># TODO: validate that *Curr-block-depth and *Curr-local-stack-offset have</span> +<span id="L10482" class="LineNr">10482 </span> <span class="subxComment"># been cleaned up</span> +<span id="L10483" class="LineNr">10483 </span><span class="Constant">$emit-subx-function:end</span>: +<span id="L10484" class="LineNr">10484 </span> <span class="subxS1Comment"># . reclaim locals</span> +<span id="L10485" class="LineNr">10485 </span> 81 0/subop/add %esp 0xc08/imm32 +<span id="L10486" class="LineNr">10486 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10487" class="LineNr">10487 </span> 5a/pop-to-edx +<span id="L10488" class="LineNr">10488 </span> 59/pop-to-ecx +<span id="L10489" class="LineNr">10489 </span> 58/pop-to-eax +<span id="L10490" class="LineNr">10490 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10491" class="LineNr">10491 </span> 89/<- %esp 5/r32/ebp +<span id="L10492" class="LineNr">10492 </span> 5d/pop-to-ebp +<span id="L10493" class="LineNr">10493 </span> c3/return +<span id="L10494" class="LineNr">10494 </span> +<span id="L10495" class="LineNr">10495 </span><span class="subxFunction">populate-mu-type-offsets-in-inouts</span>: <span class="subxComment"># f: (addr function)</span> +<span id="L10496" class="LineNr">10496 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10497" class="LineNr">10497 </span> 55/push-ebp +<span id="L10498" class="LineNr">10498 </span> 89/<- %ebp 4/r32/esp +<span id="L10499" class="LineNr">10499 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10500" class="LineNr">10500 </span> 50/push-eax +<span id="L10501" class="LineNr">10501 </span> 51/push-ecx +<span id="L10502" class="LineNr">10502 </span> 52/push-edx +<span id="L10503" class="LineNr">10503 </span> 53/push-ebx +<span id="L10504" class="LineNr">10504 </span> 57/push-edi +<span id="L10505" class="LineNr">10505 </span> <span class="subxComment"># var next-offset/edx: int = 8</span> +<span id="L10506" class="LineNr">10506 </span> ba/copy-to-edx 8/imm32 +<span id="L10507" class="LineNr">10507 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(f->inouts)</span> +<span id="L10508" class="LineNr">10508 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10509" class="LineNr">10509 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Function-inouts Function-inouts => eax</span> +<span id="L10510" class="LineNr">10510 </span> 89/<- %ecx 0/r32/eax +<span id="L10511" class="LineNr">10511 </span> { +<span id="L10512" class="LineNr">10512 </span><span class="Constant">$populate-mu-type-offsets-in-inouts:loop</span>: +<span id="L10513" class="LineNr">10513 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L10514" class="LineNr">10514 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10515" class="LineNr">10515 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(curr->value)</span> +<span id="L10516" class="LineNr">10516 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L10517" class="LineNr">10517 </span> 89/<- %ebx 0/r32/eax +<span id="L10518" class="LineNr">10518 </span><span class="CommentedCode">#? (lookup *ebx *(ebx+4))</span> +<span id="L10519" class="LineNr">10519 </span><span class="CommentedCode">#? (write-buffered Stderr "setting offset of fn inout ")</span> +<span id="L10520" class="LineNr">10520 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L10521" class="LineNr">10521 </span><span class="CommentedCode">#? (write-buffered Stderr "@")</span> +<span id="L10522" class="LineNr">10522 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %ebx)</span> +<span id="L10523" class="LineNr">10523 </span><span class="CommentedCode">#? (write-buffered Stderr " to ")</span> +<span id="L10524" class="LineNr">10524 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %edx)</span> +<span id="L10525" class="LineNr">10525 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L10526" class="LineNr">10526 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L10527" class="LineNr">10527 </span> <span class="subxComment"># v->offset = next-offset</span> +<span id="L10528" class="LineNr">10528 </span> 89/<- *(ebx+0x14) 2/r32/edx <span class="subxComment"># Var-offset</span> +<span id="L10529" class="LineNr">10529 </span> <span class="subxComment"># next-offset += size-of(v)</span> +<span id="L10530" class="LineNr">10530 </span> (<a href='mu.subx.html#L10158'>size-of</a> %ebx) <span class="subxComment"># => eax</span> +<span id="L10531" class="LineNr">10531 </span> 01/add-to %edx 0/r32/eax +<span id="L10532" class="LineNr">10532 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L10533" class="LineNr">10533 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L10534" class="LineNr">10534 </span> 89/<- %ecx 0/r32/eax +<span id="L10535" class="LineNr">10535 </span> <span class="subxComment">#</span> +<span id="L10536" class="LineNr">10536 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L10537" class="LineNr">10537 </span> } +<span id="L10538" class="LineNr">10538 </span><span class="Constant">$populate-mu-type-offsets-in-inouts:end</span>: +<span id="L10539" class="LineNr">10539 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10540" class="LineNr">10540 </span> 5f/pop-to-edi +<span id="L10541" class="LineNr">10541 </span> 5b/pop-to-ebx +<span id="L10542" class="LineNr">10542 </span> 5a/pop-to-edx +<span id="L10543" class="LineNr">10543 </span> 59/pop-to-ecx +<span id="L10544" class="LineNr">10544 </span> 58/pop-to-eax +<span id="L10545" class="LineNr">10545 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10546" class="LineNr">10546 </span> 89/<- %esp 5/r32/ebp +<span id="L10547" class="LineNr">10547 </span> 5d/pop-to-ebp +<span id="L10548" class="LineNr">10548 </span> c3/return +<span id="L10549" class="LineNr">10549 </span> +<span id="L10550" class="LineNr">10550 </span><span class="subxFunction">emit-subx-stmt-list</span>: <span class="subxComment"># out: (addr buffered-file), stmts: (addr list stmt), vars: (addr stack live-var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L10551" class="LineNr">10551 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10552" class="LineNr">10552 </span> 55/push-ebp +<span id="L10553" class="LineNr">10553 </span> 89/<- %ebp 4/r32/esp +<span id="L10554" class="LineNr">10554 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10555" class="LineNr">10555 </span> 50/push-eax +<span id="L10556" class="LineNr">10556 </span> 51/push-ecx +<span id="L10557" class="LineNr">10557 </span> 53/push-ebx +<span id="L10558" class="LineNr">10558 </span> 56/push-esi +<span id="L10559" class="LineNr">10559 </span> <span class="subxComment"># esi = stmts</span> +<span id="L10560" class="LineNr">10560 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L10561" class="LineNr">10561 </span> <span class="subxComment">#</span> +<span id="L10562" class="LineNr">10562 </span> { +<span id="L10563" class="LineNr">10563 </span><span class="Constant">$emit-subx-stmt-list:loop</span>: +<span id="L10564" class="LineNr">10564 </span> 81 7/subop/compare %esi 0/imm32 +<span id="L10565" class="LineNr">10565 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10566" class="LineNr">10566 </span> <span class="subxComment"># var curr-stmt/ecx: (addr stmt) = lookup(stmts->value)</span> +<span id="L10567" class="LineNr">10567 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L10568" class="LineNr">10568 </span> 89/<- %ecx 0/r32/eax +<span id="L10569" class="LineNr">10569 </span> { +<span id="L10570" class="LineNr">10570 </span><span class="Constant">$emit-subx-stmt-list:check-for-block</span>: +<span id="L10571" class="LineNr">10571 </span> 81 7/subop/compare *ecx 0/imm32/block <span class="subxComment"># Stmt-tag</span> +<span id="L10572" class="LineNr">10572 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10573" class="LineNr">10573 </span><span class="Constant">$emit-subx-stmt-list:block</span>: +<span id="L10574" class="LineNr">10574 </span> (<a href='mu.subx.html#L12587'>emit-subx-block</a> *(ebp+8) %ecx *(ebp+0x10) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) +<span id="L10575" class="LineNr">10575 </span> } +<span id="L10576" class="LineNr">10576 </span> { +<span id="L10577" class="LineNr">10577 </span><span class="Constant">$emit-subx-stmt-list:check-for-stmt</span>: +<span id="L10578" class="LineNr">10578 </span> 81 7/subop/compare *ecx 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> +<span id="L10579" class="LineNr">10579 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L10580" class="LineNr">10580 </span><span class="Constant">$emit-subx-stmt-list:stmt1</span>: +<span id="L10581" class="LineNr">10581 </span> { +<span id="L10582" class="LineNr">10582 </span> (<a href='mu.subx.html#L10851'>is-mu-branch?</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L10583" class="LineNr">10583 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10584" class="LineNr">10584 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L10585" class="LineNr">10585 </span><span class="Constant">$emit-subx-stmt-list:branch-stmt</span>: +<span id="L10586" class="Folded">10586 </span><span class="Folded">+-- 27 lines: # unconditional loops -----------------------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L10613" class="Folded">10613 </span><span class="Folded">+-- 16 lines: # unconditional breaks ----------------------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L10629" class="Folded">10629 </span><span class="Folded">+-- 38 lines: # simple conditional branches without a target ----------------------------------------------------------------------------------------------------------------------------</span> +<span id="L10667" class="Folded">10667 </span><span class="Folded">+-- 19 lines: # conditional branches with an explicit target ----------------------------------------------------------------------------------------------------------------------------</span> +<span id="L10686" class="LineNr">10686 </span> } +<span id="L10687" class="LineNr">10687 </span><span class="Constant">$emit-subx-stmt-list:1-to-1</span>: +<span id="L10688" class="LineNr">10688 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> *(ebp+8) %ecx <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> *(ebp+0x18) *(ebp+0x1c)) +<span id="L10689" class="LineNr">10689 </span> e9/jump $emit-subx-stmt-list:continue/disp32 +<span id="L10690" class="LineNr">10690 </span> } +<span id="L10691" class="LineNr">10691 </span> { +<span id="L10692" class="LineNr">10692 </span><span class="Constant">$emit-subx-stmt-list:check-for-var-def</span>: +<span id="L10693" class="LineNr">10693 </span> 81 7/subop/compare *ecx 2/imm32/var-def <span class="subxComment"># Stmt-tag</span> +<span id="L10694" class="LineNr">10694 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10695" class="LineNr">10695 </span><span class="Constant">$emit-subx-stmt-list:var-def</span>: +<span id="L10696" class="LineNr">10696 </span> (<a href='mu.subx.html#L11653'>emit-subx-var-def</a> *(ebp+8) %ecx) +<span id="L10697" class="LineNr">10697 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ecx+4)) <span class="subxComment"># Vardef-var</span> +<span id="L10698" class="LineNr">10698 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(ecx+8)) <span class="subxComment"># Vardef-var</span> +<span id="L10699" class="LineNr">10699 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># Live-var-register-spilled = 0 for vars on the stack</span> +<span id="L10700" class="LineNr">10700 </span> <span class="subxComment">#</span> +<span id="L10701" class="LineNr">10701 </span> eb/jump $emit-subx-stmt-list:continue/disp8 +<span id="L10702" class="LineNr">10702 </span> } +<span id="L10703" class="LineNr">10703 </span> { +<span id="L10704" class="LineNr">10704 </span><span class="Constant">$emit-subx-stmt-list:check-for-reg-var-def</span>: +<span id="L10705" class="LineNr">10705 </span> 81 7/subop/compare *ecx 3/imm32/reg-var-def <span class="subxComment"># Stmt-tag</span> +<span id="L10706" class="LineNr">10706 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L10707" class="LineNr">10707 </span><span class="Constant">$emit-subx-stmt-list:reg-var-def</span>: +<span id="L10708" class="LineNr">10708 </span> <span class="subxComment"># TODO: ensure that there's exactly one output</span> +<span id="L10709" class="LineNr">10709 </span> (<a href='mu.subx.html#L10737'>push-output-and-maybe-emit-spill</a> *(ebp+8) %ecx *(ebp+0x10) %esi *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) +<span id="L10710" class="LineNr">10710 </span> <span class="subxComment"># emit the instruction as usual</span> +<span id="L10711" class="LineNr">10711 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> *(ebp+8) %ecx <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> *(ebp+0x18) *(ebp+0x1c)) +<span id="L10712" class="LineNr">10712 </span> <span class="subxComment">#</span> +<span id="L10713" class="LineNr">10713 </span> eb/jump $emit-subx-stmt-list:continue/disp8 +<span id="L10714" class="LineNr">10714 </span> } +<span id="L10715" class="LineNr">10715 </span><span class="Constant">$emit-subx-stmt-list:continue</span>: +<span id="L10716" class="LineNr">10716 </span> <span class="subxComment"># TODO: raise an error on unrecognized Stmt-tag</span> +<span id="L10717" class="LineNr">10717 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L10718" class="LineNr">10718 </span> 89/<- %esi 0/r32/eax +<span id="L10719" class="LineNr">10719 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L10720" class="LineNr">10720 </span> } +<span id="L10721" class="LineNr">10721 </span><span class="Constant">$emit-subx-stmt-list:emit-cleanup</span>: +<span id="L10722" class="LineNr">10722 </span> (<a href='mu.subx.html#L11001'>emit-cleanup-code-until-depth</a> *(ebp+8) *(ebp+0x10) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L10723" class="LineNr">10723 </span><span class="Constant">$emit-subx-stmt-list:clean-up</span>: +<span id="L10724" class="LineNr">10724 </span> (<a href='mu.subx.html#L11499'>clean-up-blocks</a> *(ebp+0x10) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> *(ebp+0x14)) +<span id="L10725" class="LineNr">10725 </span><span class="Constant">$emit-subx-stmt-list:end</span>: +<span id="L10726" class="LineNr">10726 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10727" class="LineNr">10727 </span> 5e/pop-to-esi +<span id="L10728" class="LineNr">10728 </span> 5b/pop-to-ebx +<span id="L10729" class="LineNr">10729 </span> 59/pop-to-ecx +<span id="L10730" class="LineNr">10730 </span> 58/pop-to-eax +<span id="L10731" class="LineNr">10731 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10732" class="LineNr">10732 </span> 89/<- %esp 5/r32/ebp +<span id="L10733" class="LineNr">10733 </span> 5d/pop-to-ebp +<span id="L10734" class="LineNr">10734 </span> c3/return +<span id="L10735" class="LineNr">10735 </span> +<span id="L10736" class="LineNr">10736 </span><span class="subxComment"># 'later-stmts' includes 'stmt', but will behave the same even without it; reg-var-def stmts are guaranteed not to write to function outputs.</span> +<span id="L10737" class="LineNr">10737 </span><span class="subxFunction">push-output-and-maybe-emit-spill</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr reg-var-def), vars: (addr stack (handle var)), later-stmts: (addr list stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L10738" class="LineNr">10738 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10739" class="LineNr">10739 </span> 55/push-ebp +<span id="L10740" class="LineNr">10740 </span> 89/<- %ebp 4/r32/esp +<span id="L10741" class="LineNr">10741 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10742" class="LineNr">10742 </span> 50/push-eax +<span id="L10743" class="LineNr">10743 </span> 51/push-ecx +<span id="L10744" class="LineNr">10744 </span> 52/push-edx +<span id="L10745" class="LineNr">10745 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L10746" class="LineNr">10746 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L10747" class="LineNr">10747 </span> <span class="subxComment"># var sv/eax: (addr stmt-var) = lookup(curr-stmt->outputs)</span> +<span id="L10748" class="LineNr">10748 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Regvardef-outputs Regvardef-outputs => eax</span> +<span id="L10749" class="LineNr">10749 </span> <span class="subxComment"># TODO: assert !sv->is-deref?</span> +<span id="L10750" class="LineNr">10750 </span> <span class="subxComment"># var v/ecx: (addr var) = lookup(sv->value)</span> +<span id="L10751" class="LineNr">10751 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10752" class="LineNr">10752 </span> 89/<- %ecx 0/r32/eax +<span id="L10753" class="LineNr">10753 </span> <span class="subxComment"># v->block-depth = *Curr-block-depth</span> +<span id="L10754" class="LineNr">10754 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax +<span id="L10755" class="LineNr">10755 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> +<span id="L10756" class="LineNr">10756 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> +<span id="L10757" class="LineNr">10757 </span><span class="CommentedCode">#? (lookup *ecx *(ecx+4))</span> +<span id="L10758" class="LineNr">10758 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L10759" class="LineNr">10759 </span><span class="CommentedCode">#? (write-buffered Stderr " at depth ")</span> +<span id="L10760" class="LineNr">10760 </span><span class="CommentedCode">#? (print-int32-buffered Stderr *(ecx+0x10))</span> +<span id="L10761" class="LineNr">10761 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L10762" class="LineNr">10762 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L10763" class="LineNr">10763 </span> <span class="subxComment"># ensure that v is in a register</span> +<span id="L10764" class="LineNr">10764 </span> 81 7/subop/compare *(ecx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L10765" class="LineNr">10765 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:abort/disp32 +<span id="L10766" class="LineNr">10766 </span> <span class="subxComment"># var emit-spill?/edx: boolean = not-yet-spilled-this-block? && will-not-write-some-register?(fn)</span> +<span id="L10767" class="LineNr">10767 </span> (<a href='mu.subx.html#L11171'>not-yet-spilled-this-block?</a> %ecx *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L10768" class="LineNr">10768 </span> 89/<- %edx 0/r32/eax +<span id="L10769" class="LineNr">10769 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10770" class="LineNr">10770 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a>/disp32 +<span id="L10771" class="LineNr">10771 </span> (<a href='mu.subx.html#L11244'>will-not-write-some-register?</a> %ecx *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> +<span id="L10772" class="LineNr">10772 </span> 89/<- %edx 0/r32/eax +<span id="L10773" class="LineNr">10773 </span> <span class="subxComment"># check emit-spill?</span> +<span id="L10774" class="LineNr">10774 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10775" class="LineNr">10775 </span> 0f 84/jump-if-= $push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a>/disp32 +<span id="L10776" class="LineNr">10776 </span> <span class="subxComment"># TODO: assert(size-of(output) == 4)</span> +<span id="L10777" class="LineNr">10777 </span> <span class="subxComment"># *Curr-local-stack-offset -= 4</span> +<span id="L10778" class="LineNr">10778 </span> 81 5/subop/subtract *<span class="SpecialChar"><a href='mu.subx.html#L10420'>Curr-local-stack-offset</a></span> 4/imm32 +<span id="L10779" class="LineNr">10779 </span> <span class="subxComment"># emit spill</span> +<span id="L10780" class="LineNr">10780 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L10781" class="LineNr">10781 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"ff 6/subop/push %"</span>) +<span id="L10782" class="LineNr">10782 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L10783" class="LineNr">10783 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L10784" class="LineNr">10784 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L10785" class="LineNr">10785 </span><span class="Constant">$push-output-and-maybe-emit-spill:<a href='../092stack.subx.html#L114'>push</a></span>: +<span id="L10786" class="LineNr">10786 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L10787" class="LineNr">10787 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Regvardef-outputs Regvardef-outputs => eax</span> +<span id="L10788" class="LineNr">10788 </span> <span class="subxComment"># push(vars, {sv->value, emit-spill?})</span> +<span id="L10789" class="LineNr">10789 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *eax) <span class="subxComment"># Stmt-var-value</span> +<span id="L10790" class="LineNr">10790 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(eax+4)) <span class="subxComment"># Stmt-var-value</span> +<span id="L10791" class="LineNr">10791 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) %edx) +<span id="L10792" class="LineNr">10792 </span><span class="Constant">$push-output-and-maybe-emit-spill:end</span>: +<span id="L10793" class="LineNr">10793 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10794" class="LineNr">10794 </span> 5a/pop-to-edx +<span id="L10795" class="LineNr">10795 </span> 59/pop-to-ecx +<span id="L10796" class="LineNr">10796 </span> 58/pop-to-eax +<span id="L10797" class="LineNr">10797 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10798" class="LineNr">10798 </span> 89/<- %esp 5/r32/ebp +<span id="L10799" class="LineNr">10799 </span> 5d/pop-to-ebp +<span id="L10800" class="LineNr">10800 </span> c3/return +<span id="L10801" class="LineNr">10801 </span> +<span id="L10802" class="LineNr">10802 </span><span class="Constant">$push-output-and-maybe-emit-spill:abort</span>: +<span id="L10803" class="LineNr">10803 </span> <span class="subxComment"># error("var '" var->name "' initialized from an instruction must live in a register\n")</span> +<span id="L10804" class="LineNr">10804 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) <span class="Constant">"var '"</span>) +<span id="L10805" class="LineNr">10805 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) *eax) <span class="subxComment"># Var-name</span> +<span id="L10806" class="LineNr">10806 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x1c) <span class="Constant">"' initialized from an instruction must live in a register\n"</span>) +<span id="L10807" class="LineNr">10807 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x1c)) +<span id="L10808" class="LineNr">10808 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x20) 1) +<span id="L10809" class="LineNr">10809 </span> <span class="subxComment"># never gets here</span> +<span id="L10810" class="LineNr">10810 </span> +<span id="L10811" class="LineNr">10811 </span><span class="subxFunction">emit-subx-cleanup-and-unconditional-nonlocal-branch</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt1), vars: (addr stack live-var)</span> +<span id="L10812" class="LineNr">10812 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10813" class="LineNr">10813 </span> 55/push-ebp +<span id="L10814" class="LineNr">10814 </span> 89/<- %ebp 4/r32/esp +<span id="L10815" class="LineNr">10815 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10816" class="LineNr">10816 </span> 50/push-eax +<span id="L10817" class="LineNr">10817 </span> 51/push-ecx +<span id="L10818" class="LineNr">10818 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L10819" class="LineNr">10819 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L10820" class="LineNr">10820 </span> <span class="subxComment"># var target/eax: (addr array byte) = curr-stmt->inouts->value->name</span> +<span id="L10821" class="LineNr">10821 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L10822" class="LineNr">10822 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L10823" class="LineNr">10823 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L10824" class="LineNr">10824 </span> <span class="subxComment"># clean up until target block</span> +<span id="L10825" class="LineNr">10825 </span> (<a href='mu.subx.html#L11090'>emit-cleanup-code-until-target</a> *(ebp+8) *(ebp+0x10) %eax) +<span id="L10826" class="LineNr">10826 </span> <span class="subxComment"># emit jump to target block</span> +<span id="L10827" class="LineNr">10827 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L10828" class="LineNr">10828 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"e9/jump "</span>) +<span id="L10829" class="LineNr">10829 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L10830" class="LineNr">10830 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L10831" class="LineNr">10831 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %eax <span class="Constant">"break"</span>) +<span id="L10832" class="LineNr">10832 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10833" class="LineNr">10833 </span> { +<span id="L10834" class="LineNr">10834 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L10835" class="LineNr">10835 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break/disp32\n"</span>) +<span id="L10836" class="LineNr">10836 </span> } +<span id="L10837" class="LineNr">10837 </span> 3d/compare-eax-and 0/imm32/false <span class="subxComment"># just in case the function call modified flags</span> +<span id="L10838" class="LineNr">10838 </span> { +<span id="L10839" class="LineNr">10839 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L10840" class="LineNr">10840 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop/disp32\n"</span>) +<span id="L10841" class="LineNr">10841 </span> } +<span id="L10842" class="LineNr">10842 </span><span class="Constant">$emit-subx-cleanup-and-unconditional-nonlocal-branch:end</span>: +<span id="L10843" class="LineNr">10843 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10844" class="LineNr">10844 </span> 59/pop-to-ecx +<span id="L10845" class="LineNr">10845 </span> 58/pop-to-eax +<span id="L10846" class="LineNr">10846 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10847" class="LineNr">10847 </span> 89/<- %esp 5/r32/ebp +<span id="L10848" class="LineNr">10848 </span> 5d/pop-to-ebp +<span id="L10849" class="LineNr">10849 </span> c3/return +<span id="L10850" class="LineNr">10850 </span> +<span id="L10851" class="LineNr">10851 </span><span class="subxFunction">is-mu-branch?</span>: <span class="subxComment"># stmt: (addr stmt1) -> result/eax: boolean</span> +<span id="L10852" class="LineNr">10852 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10853" class="LineNr">10853 </span> 55/push-ebp +<span id="L10854" class="LineNr">10854 </span> 89/<- %ebp 4/r32/esp +<span id="L10855" class="LineNr">10855 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10856" class="LineNr">10856 </span> 51/push-ecx +<span id="L10857" class="LineNr">10857 </span> <span class="subxComment"># ecx = lookup(stmt->operation)</span> +<span id="L10858" class="LineNr">10858 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L10859" class="LineNr">10859 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L10860" class="LineNr">10860 </span> 89/<- %ecx 0/r32/eax +<span id="L10861" class="LineNr">10861 </span> <span class="subxComment"># if (stmt->operation starts with "loop") return true</span> +<span id="L10862" class="LineNr">10862 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"loop"</span>) <span class="subxComment"># => eax</span> +<span id="L10863" class="LineNr">10863 </span> 3d/compare-eax-and 0/imm32/false +<span id="L10864" class="LineNr">10864 </span> 75/jump-if-not-equal $is-mu-branch?:end/disp8 +<span id="L10865" class="LineNr">10865 </span> <span class="subxComment"># otherwise return (stmt->operation starts with "break")</span> +<span id="L10866" class="LineNr">10866 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"break"</span>) <span class="subxComment"># => eax</span> +<span id="L10867" class="LineNr">10867 </span><span class="Constant">$is-mu-branch?:end</span>: +<span id="L10868" class="LineNr">10868 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10869" class="LineNr">10869 </span> 59/pop-to-ecx +<span id="L10870" class="LineNr">10870 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10871" class="LineNr">10871 </span> 89/<- %esp 5/r32/ebp +<span id="L10872" class="LineNr">10872 </span> 5d/pop-to-ebp +<span id="L10873" class="LineNr">10873 </span> c3/return +<span id="L10874" class="LineNr">10874 </span> +<span id="L10875" class="LineNr">10875 </span><span class="subxFunction">emit-reverse-break</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt1)</span> +<span id="L10876" class="LineNr">10876 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10877" class="LineNr">10877 </span> 55/push-ebp +<span id="L10878" class="LineNr">10878 </span> 89/<- %ebp 4/r32/esp +<span id="L10879" class="LineNr">10879 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10880" class="LineNr">10880 </span> 50/push-eax +<span id="L10881" class="LineNr">10881 </span> <span class="subxComment"># eax = stmt</span> +<span id="L10882" class="LineNr">10882 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L10883" class="LineNr">10883 </span> <span class="subxComment">#</span> +<span id="L10884" class="LineNr">10884 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L10885" class="LineNr">10885 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L10901'>Reverse-branch</a></span> %eax 0x10 <span class="Constant">"reverse-branch: "</span>) <span class="subxComment"># => eax: (addr handle array byte)</span> +<span id="L10886" class="LineNr">10886 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L10887" class="LineNr">10887 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L10888" class="LineNr">10888 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L10889" class="LineNr">10889 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" break/disp32\n"</span>) +<span id="L10890" class="LineNr">10890 </span><span class="Constant">$emit-reverse-break:end</span>: +<span id="L10891" class="LineNr">10891 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10892" class="LineNr">10892 </span> 58/pop-to-eax +<span id="L10893" class="LineNr">10893 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10894" class="LineNr">10894 </span> 89/<- %esp 5/r32/ebp +<span id="L10895" class="LineNr">10895 </span> 5d/pop-to-ebp +<span id="L10896" class="LineNr">10896 </span> c3/return <span id="L10897" class="LineNr">10897 </span> -<span id="L10898" class="LineNr">10898 </span>== code +<span id="L10898" class="LineNr">10898 </span>== data <span id="L10899" class="LineNr">10899 </span> -<span id="L10900" class="LineNr">10900 </span><span class="subxFunction">emit-unconditional-jump-to-depth</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), depth: int, label-suffix: (addr array byte)</span> -<span id="L10901" class="LineNr">10901 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10902" class="LineNr">10902 </span> 55/push-ebp -<span id="L10903" class="LineNr">10903 </span> 89/<- %ebp 4/r32/esp -<span id="L10904" class="LineNr">10904 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10905" class="LineNr">10905 </span> 50/push-eax -<span id="L10906" class="LineNr">10906 </span> 51/push-ecx -<span id="L10907" class="LineNr">10907 </span> 52/push-edx -<span id="L10908" class="LineNr">10908 </span> 53/push-ebx -<span id="L10909" class="LineNr">10909 </span> 56/push-esi -<span id="L10910" class="LineNr">10910 </span> <span class="subxComment"># ecx = vars</span> -<span id="L10911" class="LineNr">10911 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10912" class="LineNr">10912 </span> <span class="subxComment"># var eax: int = vars->top</span> -<span id="L10913" class="LineNr">10913 </span> 8b/-> *ecx 0/r32/eax -<span id="L10914" class="LineNr">10914 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L10915" class="LineNr">10915 </span> 8d/copy-address *(ecx+eax-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> -<span id="L10916" class="LineNr">10916 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> -<span id="L10917" class="LineNr">10917 </span> 8d/copy-address *(ecx+8) 1/r32/ecx -<span id="L10918" class="LineNr">10918 </span> <span class="subxComment"># edx = depth</span> -<span id="L10919" class="LineNr">10919 </span> 8b/-> *(ebp+0x10) 2/r32/edx -<span id="L10920" class="LineNr">10920 </span> { -<span id="L10921" class="LineNr">10921 </span><span class="Constant">$emit-unconditional-jump-to-depth:loop</span>: -<span id="L10922" class="LineNr">10922 </span> <span class="subxComment"># if (curr < min) break</span> -<span id="L10923" class="LineNr">10923 </span> 39/compare %esi 1/r32/ecx -<span id="L10924" class="LineNr">10924 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L10925" class="LineNr">10925 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(*curr)</span> -<span id="L10926" class="LineNr">10926 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> -<span id="L10927" class="LineNr">10927 </span> 89/<- %ebx 0/r32/eax -<span id="L10928" class="LineNr">10928 </span> <span class="subxComment"># if (v->block-depth < until-block-depth) break</span> -<span id="L10929" class="LineNr">10929 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> -<span id="L10930" class="LineNr">10930 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 -<span id="L10931" class="LineNr">10931 </span> { -<span id="L10932" class="LineNr">10932 </span><span class="Constant">$emit-unconditional-jump-to-depth:check</span>: -<span id="L10933" class="LineNr">10933 </span> <span class="subxComment"># if v->block-depth != until-block-depth, continue</span> -<span id="L10934" class="LineNr">10934 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> -<span id="L10935" class="LineNr">10935 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L10936" class="LineNr">10936 </span><span class="Constant">$emit-unconditional-jump-to-depth:depth-found</span>: -<span id="L10937" class="LineNr">10937 </span> <span class="subxComment"># if v is not a literal, continue</span> -<span id="L10938" class="LineNr">10938 </span> (<a href='mu.subx.html#L10128'>size-of</a> %ebx) <span class="subxComment"># => eax</span> -<span id="L10939" class="LineNr">10939 </span> 3d/compare-eax-and 0/imm32 -<span id="L10940" class="LineNr">10940 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L10941" class="LineNr">10941 </span><span class="Constant">$emit-unconditional-jump-to-depth:label-found</span>: -<span id="L10942" class="LineNr">10942 </span> <span class="subxComment"># emit unconditional jump, then return</span> -<span id="L10943" class="LineNr">10943 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L10944" class="LineNr">10944 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"e9/jump "</span>) -<span id="L10945" class="LineNr">10945 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L10946" class="LineNr">10946 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L10947" class="LineNr">10947 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":"</span>) -<span id="L10948" class="LineNr">10948 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) *(ebp+0x14)) -<span id="L10949" class="LineNr">10949 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/disp32\n"</span>) -<span id="L10950" class="LineNr">10950 </span> eb/jump $emit-unconditional-jump-to-depth:end/disp8 -<span id="L10951" class="LineNr">10951 </span> } -<span id="L10952" class="LineNr">10952 </span> <span class="subxComment"># curr -= 12</span> -<span id="L10953" class="LineNr">10953 </span> 81 5/subop/subtract %esi 0xc/imm32 -<span id="L10954" class="LineNr">10954 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L10955" class="LineNr">10955 </span> } -<span id="L10956" class="LineNr">10956 </span> <span class="subxComment"># TODO: error if no label at 'depth' was found</span> -<span id="L10957" class="LineNr">10957 </span><span class="Constant">$emit-unconditional-jump-to-depth:end</span>: -<span id="L10958" class="LineNr">10958 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L10959" class="LineNr">10959 </span> 5e/pop-to-esi -<span id="L10960" class="LineNr">10960 </span> 5b/pop-to-ebx -<span id="L10961" class="LineNr">10961 </span> 5a/pop-to-edx -<span id="L10962" class="LineNr">10962 </span> 59/pop-to-ecx -<span id="L10963" class="LineNr">10963 </span> 58/pop-to-eax -<span id="L10964" class="LineNr">10964 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L10965" class="LineNr">10965 </span> 89/<- %esp 5/r32/ebp -<span id="L10966" class="LineNr">10966 </span> 5d/pop-to-ebp -<span id="L10967" class="LineNr">10967 </span> c3/return -<span id="L10968" class="LineNr">10968 </span> -<span id="L10969" class="LineNr">10969 </span><span class="subxComment"># emit clean-up code for 'vars' until some block depth</span> -<span id="L10970" class="LineNr">10970 </span><span class="subxComment"># doesn't actually modify 'vars' so we need traverse manually inside the stack</span> -<span id="L10971" class="LineNr">10971 </span><span class="subxFunction">emit-cleanup-code-until-depth</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), until-block-depth: int</span> -<span id="L10972" class="LineNr">10972 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L10973" class="LineNr">10973 </span> 55/push-ebp -<span id="L10974" class="LineNr">10974 </span> 89/<- %ebp 4/r32/esp -<span id="L10975" class="LineNr">10975 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L10976" class="LineNr">10976 </span> 50/push-eax -<span id="L10977" class="LineNr">10977 </span> 51/push-ecx -<span id="L10978" class="LineNr">10978 </span> 52/push-edx -<span id="L10979" class="LineNr">10979 </span> 53/push-ebx -<span id="L10980" class="LineNr">10980 </span> 56/push-esi -<span id="L10981" class="LineNr">10981 </span><span class="CommentedCode">#? (write-buffered Stderr "--- cleanup\n")</span> -<span id="L10982" class="LineNr">10982 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L10983" class="LineNr">10983 </span> <span class="subxComment"># ecx = vars</span> -<span id="L10984" class="LineNr">10984 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L10985" class="LineNr">10985 </span> <span class="subxComment"># var esi: int = vars->top</span> -<span id="L10986" class="LineNr">10986 </span> 8b/-> *ecx 6/r32/esi -<span id="L10987" class="LineNr">10987 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L10988" class="LineNr">10988 </span> 8d/copy-address *(ecx+esi-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> -<span id="L10989" class="LineNr">10989 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> -<span id="L10990" class="LineNr">10990 </span> 81 0/subop/add %ecx 8/imm32 -<span id="L10991" class="LineNr">10991 </span> <span class="subxComment"># edx = until-block-depth</span> -<span id="L10992" class="LineNr">10992 </span> 8b/-> *(ebp+0x10) 2/r32/edx -<span id="L10993" class="LineNr">10993 </span> { -<span id="L10994" class="LineNr">10994 </span><span class="Constant">$emit-cleanup-code-until-depth:loop</span>: -<span id="L10995" class="LineNr">10995 </span> <span class="subxComment"># if (curr < min) break</span> -<span id="L10996" class="LineNr">10996 </span> 39/compare %esi 1/r32/ecx -<span id="L10997" class="LineNr">10997 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L10998" class="LineNr">10998 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(*curr)</span> -<span id="L10999" class="LineNr">10999 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> -<span id="L11000" class="LineNr">11000 </span> 89/<- %ebx 0/r32/eax -<span id="L11001" class="LineNr">11001 </span><span class="CommentedCode">#? (lookup *ebx *(ebx+4)) # Var-name</span> -<span id="L11002" class="LineNr">11002 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> -<span id="L11003" class="LineNr">11003 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L11004" class="LineNr">11004 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L11005" class="LineNr">11005 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L11006" class="LineNr">11006 </span> <span class="subxComment"># if (v->block-depth < until-block-depth) break</span> -<span id="L11007" class="LineNr">11007 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> -<span id="L11008" class="LineNr">11008 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 -<span id="L11009" class="LineNr">11009 </span> <span class="subxComment"># if v is in a register</span> -<span id="L11010" class="LineNr">11010 </span> 81 7/subop/compare *(ebx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L11011" class="LineNr">11011 </span> { -<span id="L11012" class="LineNr">11012 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11013" class="LineNr">11013 </span> { -<span id="L11014" class="LineNr">11014 </span><span class="Constant">$emit-cleanup-code-until-depth:check-for-previous-spill</span>: -<span id="L11015" class="LineNr">11015 </span> 8b/-> *(esi+8) 0/r32/eax <span class="subxComment"># Live-var-register-spilled</span> -<span id="L11016" class="LineNr">11016 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11017" class="LineNr">11017 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11018" class="LineNr">11018 </span><span class="Constant">$emit-cleanup-code-until-depth:reclaim-var-in-register</span>: -<span id="L11019" class="LineNr">11019 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11020" class="LineNr">11020 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8f 0/subop/pop %"</span>) -<span id="L11021" class="LineNr">11021 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11022" class="LineNr">11022 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L11023" class="LineNr">11023 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L11024" class="LineNr">11024 </span> } -<span id="L11025" class="LineNr">11025 </span> eb/jump $emit-cleanup-code-until-depth:continue/disp8 -<span id="L11026" class="LineNr">11026 </span> } -<span id="L11027" class="LineNr">11027 </span> <span class="subxComment"># otherwise v is on the stack</span> -<span id="L11028" class="LineNr">11028 </span> { -<span id="L11029" class="LineNr">11029 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11030" class="LineNr">11030 </span><span class="Constant">$emit-cleanup-code-until-depth:var-on-stack</span>: -<span id="L11031" class="LineNr">11031 </span> (<a href='mu.subx.html#L10128'>size-of</a> %ebx) <span class="subxComment"># => eax</span> -<span id="L11032" class="LineNr">11032 </span> <span class="subxComment"># don't emit code for labels</span> -<span id="L11033" class="LineNr">11033 </span> 3d/compare-eax-and 0/imm32 -<span id="L11034" class="LineNr">11034 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11035" class="LineNr">11035 </span><span class="Constant">$emit-cleanup-code-until-depth:reclaim-var-on-stack</span>: -<span id="L11036" class="LineNr">11036 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11037" class="LineNr">11037 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"81 0/subop/add %esp "</span>) -<span id="L11038" class="LineNr">11038 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L11039" class="LineNr">11039 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) -<span id="L11040" class="LineNr">11040 </span> } -<span id="L11041" class="LineNr">11041 </span><span class="Constant">$emit-cleanup-code-until-depth:continue</span>: -<span id="L11042" class="LineNr">11042 </span> <span class="subxComment"># curr -= 12</span> -<span id="L11043" class="LineNr">11043 </span> 81 5/subop/subtract %esi 0xc/imm32 -<span id="L11044" class="LineNr">11044 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L11045" class="LineNr">11045 </span> } -<span id="L11046" class="LineNr">11046 </span><span class="Constant">$emit-cleanup-code-until-depth:end</span>: -<span id="L11047" class="LineNr">11047 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11048" class="LineNr">11048 </span> 5e/pop-to-esi -<span id="L11049" class="LineNr">11049 </span> 5b/pop-to-ebx -<span id="L11050" class="LineNr">11050 </span> 5a/pop-to-edx -<span id="L11051" class="LineNr">11051 </span> 59/pop-to-ecx -<span id="L11052" class="LineNr">11052 </span> 58/pop-to-eax -<span id="L11053" class="LineNr">11053 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11054" class="LineNr">11054 </span> 89/<- %esp 5/r32/ebp -<span id="L11055" class="LineNr">11055 </span> 5d/pop-to-ebp -<span id="L11056" class="LineNr">11056 </span> c3/return -<span id="L11057" class="LineNr">11057 </span> -<span id="L11058" class="LineNr">11058 </span><span class="subxComment"># emit clean-up code for 'vars' until a given label is encountered</span> -<span id="L11059" class="LineNr">11059 </span><span class="subxComment"># doesn't actually modify 'vars' so we need traverse manually inside the stack</span> -<span id="L11060" class="LineNr">11060 </span><span class="subxFunction">emit-cleanup-code-until-target</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), until-block-label: (addr array byte)</span> -<span id="L11061" class="LineNr">11061 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11062" class="LineNr">11062 </span> 55/push-ebp -<span id="L11063" class="LineNr">11063 </span> 89/<- %ebp 4/r32/esp -<span id="L11064" class="LineNr">11064 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11065" class="LineNr">11065 </span> 50/push-eax -<span id="L11066" class="LineNr">11066 </span> 51/push-ecx -<span id="L11067" class="LineNr">11067 </span> 52/push-edx -<span id="L11068" class="LineNr">11068 </span> 53/push-ebx -<span id="L11069" class="LineNr">11069 </span> <span class="subxComment"># ecx = vars</span> -<span id="L11070" class="LineNr">11070 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L11071" class="LineNr">11071 </span> <span class="subxComment"># var eax: int = vars->top</span> -<span id="L11072" class="LineNr">11072 </span> 8b/-> *ecx 0/r32/eax -<span id="L11073" class="LineNr">11073 </span> <span class="subxComment"># var curr/edx: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L11074" class="LineNr">11074 </span> 8d/copy-address *(ecx+eax-4) 2/r32/edx <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> -<span id="L11075" class="LineNr">11075 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> -<span id="L11076" class="LineNr">11076 </span> 81 0/subop/add %ecx 8/imm32 -<span id="L11077" class="LineNr">11077 </span> { -<span id="L11078" class="LineNr">11078 </span><span class="Constant">$emit-cleanup-code-until-target:loop</span>: -<span id="L11079" class="LineNr">11079 </span> <span class="subxComment"># if (curr < min) break</span> -<span id="L11080" class="LineNr">11080 </span> 39/compare %edx 1/r32/ecx -<span id="L11081" class="LineNr">11081 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L11082" class="LineNr">11082 </span> <span class="subxComment"># var v/ebx: (handle var) = lookup(*curr)</span> -<span id="L11083" class="LineNr">11083 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># => eax</span> -<span id="L11084" class="LineNr">11084 </span> 89/<- %ebx 0/r32/eax -<span id="L11085" class="LineNr">11085 </span> <span class="subxComment"># if (v->name == until-block-label) break</span> -<span id="L11086" class="LineNr">11086 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L11087" class="LineNr">11087 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L11088" class="LineNr">11088 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11089" class="LineNr">11089 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L11090" class="LineNr">11090 </span> <span class="subxComment"># if v is in a register</span> -<span id="L11091" class="LineNr">11091 </span> 81 7/subop/compare *(ebx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L11092" class="LineNr">11092 </span> { -<span id="L11093" class="LineNr">11093 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11094" class="LineNr">11094 </span> { -<span id="L11095" class="LineNr">11095 </span><span class="Constant">$emit-cleanup-code-until-target:check-for-previous-spill</span>: -<span id="L11096" class="LineNr">11096 </span> 8b/-> *(edx+8) 0/r32/eax <span class="subxComment"># Live-var-register-spilled</span> -<span id="L11097" class="LineNr">11097 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11098" class="LineNr">11098 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11099" class="LineNr">11099 </span><span class="Constant">$emit-cleanup-code-until-target:reclaim-var-in-register</span>: -<span id="L11100" class="LineNr">11100 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11101" class="LineNr">11101 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8f 0/subop/pop %"</span>) -<span id="L11102" class="LineNr">11102 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11103" class="LineNr">11103 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L11104" class="LineNr">11104 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L11105" class="LineNr">11105 </span> } -<span id="L11106" class="LineNr">11106 </span> eb/jump $emit-cleanup-code-until-target:continue/disp8 -<span id="L11107" class="LineNr">11107 </span> } -<span id="L11108" class="LineNr">11108 </span> <span class="subxComment"># otherwise v is on the stack</span> -<span id="L11109" class="LineNr">11109 </span> { -<span id="L11110" class="LineNr">11110 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11111" class="LineNr">11111 </span><span class="Constant">$emit-cleanup-code-until-target:reclaim-var-on-stack</span>: -<span id="L11112" class="LineNr">11112 </span> (<a href='mu.subx.html#L10128'>size-of</a> %ebx) <span class="subxComment"># => eax</span> -<span id="L11113" class="LineNr">11113 </span> <span class="subxComment"># don't emit code for labels</span> -<span id="L11114" class="LineNr">11114 </span> 3d/compare-eax-and 0/imm32 -<span id="L11115" class="LineNr">11115 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11116" class="LineNr">11116 </span> <span class="subxComment">#</span> -<span id="L11117" class="LineNr">11117 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11118" class="LineNr">11118 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"81 0/subop/add %esp "</span>) -<span id="L11119" class="LineNr">11119 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L11120" class="LineNr">11120 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) -<span id="L11121" class="LineNr">11121 </span> } -<span id="L11122" class="LineNr">11122 </span><span class="Constant">$emit-cleanup-code-until-target:continue</span>: -<span id="L11123" class="LineNr">11123 </span> <span class="subxComment"># curr -= 12</span> -<span id="L11124" class="LineNr">11124 </span> 81 5/subop/subtract %edx 0xc/imm32 -<span id="L11125" class="LineNr">11125 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L11126" class="LineNr">11126 </span> } -<span id="L11127" class="LineNr">11127 </span><span class="Constant">$emit-cleanup-code-until-target:end</span>: -<span id="L11128" class="LineNr">11128 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11129" class="LineNr">11129 </span> 5b/pop-to-ebx -<span id="L11130" class="LineNr">11130 </span> 5a/pop-to-edx -<span id="L11131" class="LineNr">11131 </span> 59/pop-to-ecx -<span id="L11132" class="LineNr">11132 </span> 58/pop-to-eax -<span id="L11133" class="LineNr">11133 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11134" class="LineNr">11134 </span> 89/<- %esp 5/r32/ebp -<span id="L11135" class="LineNr">11135 </span> 5d/pop-to-ebp -<span id="L11136" class="LineNr">11136 </span> c3/return -<span id="L11137" class="LineNr">11137 </span> -<span id="L11138" class="LineNr">11138 </span><span class="subxComment"># Return true if there isn't a variable in 'vars' with the same block-depth</span> -<span id="L11139" class="LineNr">11139 </span><span class="subxComment"># and register as 'v'.</span> -<span id="L11140" class="LineNr">11140 </span><span class="subxComment"># 'v' is guaranteed not to be within 'vars'.</span> -<span id="L11141" class="LineNr">11141 </span><span class="subxFunction">not-yet-spilled-this-block?</span>: <span class="subxComment"># v: (addr var), vars: (addr stack live-var) -> result/eax: boolean</span> -<span id="L11142" class="LineNr">11142 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11143" class="LineNr">11143 </span> 55/push-ebp -<span id="L11144" class="LineNr">11144 </span> 89/<- %ebp 4/r32/esp -<span id="L11145" class="LineNr">11145 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11146" class="LineNr">11146 </span> 51/push-ecx -<span id="L11147" class="LineNr">11147 </span> 52/push-edx -<span id="L11148" class="LineNr">11148 </span> 53/push-ebx -<span id="L11149" class="LineNr">11149 </span> 56/push-esi -<span id="L11150" class="LineNr">11150 </span> 57/push-edi -<span id="L11151" class="LineNr">11151 </span> <span class="subxComment"># ecx = vars</span> -<span id="L11152" class="LineNr">11152 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L11153" class="LineNr">11153 </span> <span class="subxComment"># var eax: int = vars->top</span> -<span id="L11154" class="LineNr">11154 </span> 8b/-> *ecx 0/r32/eax -<span id="L11155" class="LineNr">11155 </span> <span class="subxComment"># var curr/edx: (addr handle var) = &vars->data[vars->top - 12]</span> -<span id="L11156" class="LineNr">11156 </span> 8d/copy-address *(ecx+eax-4) 2/r32/edx <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> -<span id="L11157" class="LineNr">11157 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> -<span id="L11158" class="LineNr">11158 </span> 8d/copy-address *(ecx+8) 1/r32/ecx -<span id="L11159" class="LineNr">11159 </span> <span class="subxComment"># var depth/ebx: int = v->block-depth</span> -<span id="L11160" class="LineNr">11160 </span> 8b/-> *(ebp+8) 3/r32/ebx -<span id="L11161" class="LineNr">11161 </span> 8b/-> *(ebx+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> -<span id="L11162" class="LineNr">11162 </span> <span class="subxComment"># var needle/esi: (addr array byte) = v->register</span> -<span id="L11163" class="LineNr">11163 </span> 8b/-> *(ebp+8) 6/r32/esi -<span id="L11164" class="LineNr">11164 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11165" class="LineNr">11165 </span> 89/<- %esi 0/r32/eax -<span id="L11166" class="LineNr">11166 </span> { -<span id="L11167" class="LineNr">11167 </span><span class="Constant">$not-yet-spilled-this-block?:loop</span>: -<span id="L11168" class="LineNr">11168 </span> <span class="subxComment"># if (curr < min) break</span> -<span id="L11169" class="LineNr">11169 </span> 39/compare %edx 1/r32/ecx -<span id="L11170" class="LineNr">11170 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L11171" class="LineNr">11171 </span> <span class="subxComment"># var cand/edi: (addr var) = lookup(*curr)</span> -<span id="L11172" class="LineNr">11172 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># => eax</span> -<span id="L11173" class="LineNr">11173 </span> 89/<- %edi 0/r32/eax -<span id="L11174" class="LineNr">11174 </span> <span class="subxComment"># if (cand->block-depth < depth) break</span> -<span id="L11175" class="LineNr">11175 </span> 39/compare *(edi+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> -<span id="L11176" class="LineNr">11176 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 -<span id="L11177" class="LineNr">11177 </span> <span class="subxComment"># var cand-reg/edi: (array array byte) = cand->reg</span> -<span id="L11178" class="LineNr">11178 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x18) *(edi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11179" class="LineNr">11179 </span> 89/<- %edi 0/r32/eax -<span id="L11180" class="LineNr">11180 </span> <span class="subxComment"># if (cand-reg == null) continue</span> -<span id="L11181" class="LineNr">11181 </span> { -<span id="L11182" class="LineNr">11182 </span><span class="Constant">$not-yet-spilled-this-block?:check-reg</span>: -<span id="L11183" class="LineNr">11183 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L11184" class="LineNr">11184 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11185" class="LineNr">11185 </span> <span class="subxComment"># if (cand-reg == needle) return true</span> -<span id="L11186" class="LineNr">11186 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %esi %edi) <span class="subxComment"># => eax</span> -<span id="L11187" class="LineNr">11187 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11188" class="LineNr">11188 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11189" class="LineNr">11189 </span><span class="Constant">$not-yet-spilled-this-block?:return-false</span>: -<span id="L11190" class="LineNr">11190 </span> b8/copy-to-eax 0/imm32/false -<span id="L11191" class="LineNr">11191 </span> eb/jump $not-yet-spilled-this-block?:end/disp8 -<span id="L11192" class="LineNr">11192 </span> } -<span id="L11193" class="LineNr">11193 </span><span class="Constant">$not-yet-spilled-this-block?:continue</span>: -<span id="L11194" class="LineNr">11194 </span> <span class="subxComment"># curr -= 12</span> -<span id="L11195" class="LineNr">11195 </span> 81 5/subop/subtract %edx 0xc/imm32 -<span id="L11196" class="LineNr">11196 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L11197" class="LineNr">11197 </span> } -<span id="L11198" class="LineNr">11198 </span><span class="Constant">$not-yet-spilled-this-block?:return-true</span>: -<span id="L11199" class="LineNr">11199 </span> <span class="subxComment"># return true</span> -<span id="L11200" class="LineNr">11200 </span> b8/copy-to-eax 1/imm32/true -<span id="L11201" class="LineNr">11201 </span><span class="Constant">$not-yet-spilled-this-block?:end</span>: -<span id="L11202" class="LineNr">11202 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11203" class="LineNr">11203 </span> 5f/pop-to-edi -<span id="L11204" class="LineNr">11204 </span> 5e/pop-to-esi -<span id="L11205" class="LineNr">11205 </span> 5b/pop-to-ebx -<span id="L11206" class="LineNr">11206 </span> 5a/pop-to-edx -<span id="L11207" class="LineNr">11207 </span> 59/pop-to-ecx -<span id="L11208" class="LineNr">11208 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11209" class="LineNr">11209 </span> 89/<- %esp 5/r32/ebp -<span id="L11210" class="LineNr">11210 </span> 5d/pop-to-ebp -<span id="L11211" class="LineNr">11211 </span> c3/return -<span id="L11212" class="LineNr">11212 </span> -<span id="L11213" class="LineNr">11213 </span><span class="subxComment"># could the register of 'v' ever be written to by one of the vars in fn-outputs?</span> -<span id="L11214" class="LineNr">11214 </span><span class="subxFunction">will-not-write-some-register?</span>: <span class="subxComment"># v: (addr var), stmts: (addr list stmt), fn: (addr function) -> result/eax: boolean</span> -<span id="L11215" class="LineNr">11215 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11216" class="LineNr">11216 </span> 55/push-ebp -<span id="L11217" class="LineNr">11217 </span> 89/<- %ebp 4/r32/esp -<span id="L11218" class="LineNr">11218 </span> <span class="subxComment"># eax = v</span> -<span id="L11219" class="LineNr">11219 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L11220" class="LineNr">11220 </span> <span class="subxComment"># var reg/eax: (addr array byte) = lookup(v->register)</span> -<span id="L11221" class="LineNr">11221 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11222" class="LineNr">11222 </span> <span class="subxComment"># var target/eax: (addr var) = find-register(fn-outputs, reg)</span> -<span id="L11223" class="LineNr">11223 </span> (<a href='mu.subx.html#L11244'>find-register</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> -<span id="L11224" class="LineNr">11224 </span> <span class="subxComment"># if (target == 0) return true</span> -<span id="L11225" class="LineNr">11225 </span> { -<span id="L11226" class="LineNr">11226 </span> 3d/compare-eax-and 0/imm32 -<span id="L11227" class="LineNr">11227 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11228" class="LineNr">11228 </span> b8/copy-to-eax 1/imm32/true -<span id="L11229" class="LineNr">11229 </span> eb/jump $will-not-write-some-register?:end/disp8 -<span id="L11230" class="LineNr">11230 </span> } -<span id="L11231" class="LineNr">11231 </span> <span class="subxComment"># return !assigns-in-stmts?(stmts, target)</span> -<span id="L11232" class="LineNr">11232 </span> (<a href='mu.subx.html#L11286'>assigns-in-stmts?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> -<span id="L11233" class="LineNr">11233 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11234" class="LineNr">11234 </span> <span class="subxComment"># assume: true = 1, so no need to mask with 0x000000ff</span> -<span id="L11235" class="LineNr">11235 </span> 0f 94/set-if-= %al -<span id="L11236" class="LineNr">11236 </span><span class="Constant">$will-not-write-some-register?:end</span>: -<span id="L11237" class="LineNr">11237 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11238" class="LineNr">11238 </span> 89/<- %esp 5/r32/ebp -<span id="L11239" class="LineNr">11239 </span> 5d/pop-to-ebp -<span id="L11240" class="LineNr">11240 </span> c3/return -<span id="L11241" class="LineNr">11241 </span> -<span id="L11242" class="LineNr">11242 </span><span class="subxComment"># return fn output with matching register</span> -<span id="L11243" class="LineNr">11243 </span><span class="subxComment"># always returns false if 'reg' is null</span> -<span id="L11244" class="LineNr">11244 </span><span class="subxFunction">find-register</span>: <span class="subxComment"># fn: (addr function), reg: (addr array byte) -> result/eax: (addr var)</span> +<span id="L10900" class="LineNr">10900 </span><span class="subxComment"># Table from Mu branch instructions to the reverse SubX opcodes for them.</span> +<span id="L10901" class="LineNr">10901 </span><span class="SpecialChar">Reverse-branch</span>: <span class="subxComment"># (table (handle array byte) (handle array byte))</span> +<span id="L10902" class="LineNr">10902 </span> <span class="subxComment"># a table is a stream</span> +<span id="L10903" class="LineNr">10903 </span> 0x140/imm32/write +<span id="L10904" class="LineNr">10904 </span> 0/imm32/read +<span id="L10905" class="LineNr">10905 </span> 0x140/imm32/size +<span id="L10906" class="LineNr">10906 </span> <span class="subxComment"># data</span> +<span id="L10907" class="LineNr">10907 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14739'>_string-break-if-=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_85_jump_label</a>/imm32 +<span id="L10908" class="LineNr">10908 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14829'>_string-loop-if-=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14981'>_string_0f_85_jump_label</a>/imm32 +<span id="L10909" class="LineNr">10909 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14754'>_string-break-if-!=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14966'>_string_0f_84_jump_label</a>/imm32 +<span id="L10910" class="LineNr">10910 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14844'>_string-loop-if-!=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14966'>_string_0f_84_jump_label</a>/imm32 +<span id="L10911" class="LineNr">10911 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14729'>_string-break-if-<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15041'>_string_0f_8d_jump_label</a>/imm32 +<span id="L10912" class="LineNr">10912 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14819'>_string-loop-if-<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15041'>_string_0f_8d_jump_label</a>/imm32 +<span id="L10913" class="LineNr">10913 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14744'>_string-break-if-></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15056'>_string_0f_8e_jump_label</a>/imm32 +<span id="L10914" class="LineNr">10914 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14834'>_string-loop-if-></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15056'>_string_0f_8e_jump_label</a>/imm32 +<span id="L10915" class="LineNr">10915 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14734'>_string-break-if-<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32 +<span id="L10916" class="LineNr">10916 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14824'>_string-loop-if-<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32 +<span id="L10917" class="LineNr">10917 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14749'>_string-break-if->=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15026'>_string_0f_8c_jump_label</a>/imm32 +<span id="L10918" class="LineNr">10918 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14839'>_string-loop-if->=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15026'>_string_0f_8c_jump_label</a>/imm32 +<span id="L10919" class="LineNr">10919 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14759'>_string-break-if-addr<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14951'>_string_0f_83_jump_label</a>/imm32 +<span id="L10920" class="LineNr">10920 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14849'>_string-loop-if-addr<</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14951'>_string_0f_83_jump_label</a>/imm32 +<span id="L10921" class="LineNr">10921 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14769'>_string-break-if-addr></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14996'>_string_0f_86_jump_label</a>/imm32 +<span id="L10922" class="LineNr">10922 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14859'>_string-loop-if-addr></a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14996'>_string_0f_86_jump_label</a>/imm32 +<span id="L10923" class="LineNr">10923 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14764'>_string-break-if-addr<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32 +<span id="L10924" class="LineNr">10924 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14854'>_string-loop-if-addr<=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32 +<span id="L10925" class="LineNr">10925 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14774'>_string-break-if-addr>=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14936'>_string_0f_82_jump_label</a>/imm32 +<span id="L10926" class="LineNr">10926 </span> 0x11/imm32/alloc-id <a href='mu.subx.html#L14864'>_string-loop-if-addr>=</a>/imm32 0x11/imm32/alloc-id <a href='mu.subx.html#L14936'>_string_0f_82_jump_label</a>/imm32 +<span id="L10927" class="LineNr">10927 </span> +<span id="L10928" class="LineNr">10928 </span>== code +<span id="L10929" class="LineNr">10929 </span> +<span id="L10930" class="LineNr">10930 </span><span class="subxFunction">emit-unconditional-jump-to-depth</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), depth: int, label-suffix: (addr array byte)</span> +<span id="L10931" class="LineNr">10931 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L10932" class="LineNr">10932 </span> 55/push-ebp +<span id="L10933" class="LineNr">10933 </span> 89/<- %ebp 4/r32/esp +<span id="L10934" class="LineNr">10934 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L10935" class="LineNr">10935 </span> 50/push-eax +<span id="L10936" class="LineNr">10936 </span> 51/push-ecx +<span id="L10937" class="LineNr">10937 </span> 52/push-edx +<span id="L10938" class="LineNr">10938 </span> 53/push-ebx +<span id="L10939" class="LineNr">10939 </span> 56/push-esi +<span id="L10940" class="LineNr">10940 </span> <span class="subxComment"># ecx = vars</span> +<span id="L10941" class="LineNr">10941 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L10942" class="LineNr">10942 </span> <span class="subxComment"># var eax: int = vars->top</span> +<span id="L10943" class="LineNr">10943 </span> 8b/-> *ecx 0/r32/eax +<span id="L10944" class="LineNr">10944 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L10945" class="LineNr">10945 </span> 8d/copy-address *(ecx+eax-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> +<span id="L10946" class="LineNr">10946 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> +<span id="L10947" class="LineNr">10947 </span> 8d/copy-address *(ecx+8) 1/r32/ecx +<span id="L10948" class="LineNr">10948 </span> <span class="subxComment"># edx = depth</span> +<span id="L10949" class="LineNr">10949 </span> 8b/-> *(ebp+0x10) 2/r32/edx +<span id="L10950" class="LineNr">10950 </span> { +<span id="L10951" class="LineNr">10951 </span><span class="Constant">$emit-unconditional-jump-to-depth:loop</span>: +<span id="L10952" class="LineNr">10952 </span> <span class="subxComment"># if (curr < min) break</span> +<span id="L10953" class="LineNr">10953 </span> 39/compare %esi 1/r32/ecx +<span id="L10954" class="LineNr">10954 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L10955" class="LineNr">10955 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(*curr)</span> +<span id="L10956" class="LineNr">10956 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> +<span id="L10957" class="LineNr">10957 </span> 89/<- %ebx 0/r32/eax +<span id="L10958" class="LineNr">10958 </span> <span class="subxComment"># if (v->block-depth < until-block-depth) break</span> +<span id="L10959" class="LineNr">10959 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> +<span id="L10960" class="LineNr">10960 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 +<span id="L10961" class="LineNr">10961 </span> { +<span id="L10962" class="LineNr">10962 </span><span class="Constant">$emit-unconditional-jump-to-depth:check</span>: +<span id="L10963" class="LineNr">10963 </span> <span class="subxComment"># if v->block-depth != until-block-depth, continue</span> +<span id="L10964" class="LineNr">10964 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> +<span id="L10965" class="LineNr">10965 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L10966" class="LineNr">10966 </span><span class="Constant">$emit-unconditional-jump-to-depth:depth-found</span>: +<span id="L10967" class="LineNr">10967 </span> <span class="subxComment"># if v is not a literal, continue</span> +<span id="L10968" class="LineNr">10968 </span> (<a href='mu.subx.html#L10158'>size-of</a> %ebx) <span class="subxComment"># => eax</span> +<span id="L10969" class="LineNr">10969 </span> 3d/compare-eax-and 0/imm32 +<span id="L10970" class="LineNr">10970 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L10971" class="LineNr">10971 </span><span class="Constant">$emit-unconditional-jump-to-depth:label-found</span>: +<span id="L10972" class="LineNr">10972 </span> <span class="subxComment"># emit unconditional jump, then return</span> +<span id="L10973" class="LineNr">10973 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L10974" class="LineNr">10974 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"e9/jump "</span>) +<span id="L10975" class="LineNr">10975 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L10976" class="LineNr">10976 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L10977" class="LineNr">10977 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":"</span>) +<span id="L10978" class="LineNr">10978 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) *(ebp+0x14)) +<span id="L10979" class="LineNr">10979 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/disp32\n"</span>) +<span id="L10980" class="LineNr">10980 </span> eb/jump $emit-unconditional-jump-to-depth:end/disp8 +<span id="L10981" class="LineNr">10981 </span> } +<span id="L10982" class="LineNr">10982 </span> <span class="subxComment"># curr -= 12</span> +<span id="L10983" class="LineNr">10983 </span> 81 5/subop/subtract %esi 0xc/imm32 +<span id="L10984" class="LineNr">10984 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L10985" class="LineNr">10985 </span> } +<span id="L10986" class="LineNr">10986 </span> <span class="subxComment"># TODO: error if no label at 'depth' was found</span> +<span id="L10987" class="LineNr">10987 </span><span class="Constant">$emit-unconditional-jump-to-depth:end</span>: +<span id="L10988" class="LineNr">10988 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L10989" class="LineNr">10989 </span> 5e/pop-to-esi +<span id="L10990" class="LineNr">10990 </span> 5b/pop-to-ebx +<span id="L10991" class="LineNr">10991 </span> 5a/pop-to-edx +<span id="L10992" class="LineNr">10992 </span> 59/pop-to-ecx +<span id="L10993" class="LineNr">10993 </span> 58/pop-to-eax +<span id="L10994" class="LineNr">10994 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L10995" class="LineNr">10995 </span> 89/<- %esp 5/r32/ebp +<span id="L10996" class="LineNr">10996 </span> 5d/pop-to-ebp +<span id="L10997" class="LineNr">10997 </span> c3/return +<span id="L10998" class="LineNr">10998 </span> +<span id="L10999" class="LineNr">10999 </span><span class="subxComment"># emit clean-up code for 'vars' until some block depth</span> +<span id="L11000" class="LineNr">11000 </span><span class="subxComment"># doesn't actually modify 'vars' so we need traverse manually inside the stack</span> +<span id="L11001" class="LineNr">11001 </span><span class="subxFunction">emit-cleanup-code-until-depth</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), until-block-depth: int</span> +<span id="L11002" class="LineNr">11002 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11003" class="LineNr">11003 </span> 55/push-ebp +<span id="L11004" class="LineNr">11004 </span> 89/<- %ebp 4/r32/esp +<span id="L11005" class="LineNr">11005 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11006" class="LineNr">11006 </span> 50/push-eax +<span id="L11007" class="LineNr">11007 </span> 51/push-ecx +<span id="L11008" class="LineNr">11008 </span> 52/push-edx +<span id="L11009" class="LineNr">11009 </span> 53/push-ebx +<span id="L11010" class="LineNr">11010 </span> 56/push-esi +<span id="L11011" class="LineNr">11011 </span><span class="CommentedCode">#? (write-buffered Stderr "--- cleanup\n")</span> +<span id="L11012" class="LineNr">11012 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L11013" class="LineNr">11013 </span> <span class="subxComment"># ecx = vars</span> +<span id="L11014" class="LineNr">11014 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L11015" class="LineNr">11015 </span> <span class="subxComment"># var esi: int = vars->top</span> +<span id="L11016" class="LineNr">11016 </span> 8b/-> *ecx 6/r32/esi +<span id="L11017" class="LineNr">11017 </span> <span class="subxComment"># var curr/esi: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L11018" class="LineNr">11018 </span> 8d/copy-address *(ecx+esi-4) 6/r32/esi <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> +<span id="L11019" class="LineNr">11019 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> +<span id="L11020" class="LineNr">11020 </span> 81 0/subop/add %ecx 8/imm32 +<span id="L11021" class="LineNr">11021 </span> <span class="subxComment"># edx = until-block-depth</span> +<span id="L11022" class="LineNr">11022 </span> 8b/-> *(ebp+0x10) 2/r32/edx +<span id="L11023" class="LineNr">11023 </span> { +<span id="L11024" class="LineNr">11024 </span><span class="Constant">$emit-cleanup-code-until-depth:loop</span>: +<span id="L11025" class="LineNr">11025 </span> <span class="subxComment"># if (curr < min) break</span> +<span id="L11026" class="LineNr">11026 </span> 39/compare %esi 1/r32/ecx +<span id="L11027" class="LineNr">11027 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L11028" class="LineNr">11028 </span> <span class="subxComment"># var v/ebx: (addr var) = lookup(*curr)</span> +<span id="L11029" class="LineNr">11029 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> +<span id="L11030" class="LineNr">11030 </span> 89/<- %ebx 0/r32/eax +<span id="L11031" class="LineNr">11031 </span><span class="CommentedCode">#? (lookup *ebx *(ebx+4)) # Var-name</span> +<span id="L11032" class="LineNr">11032 </span><span class="CommentedCode">#? (write-buffered Stderr "var ")</span> +<span id="L11033" class="LineNr">11033 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L11034" class="LineNr">11034 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L11035" class="LineNr">11035 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L11036" class="LineNr">11036 </span> <span class="subxComment"># if (v->block-depth < until-block-depth) break</span> +<span id="L11037" class="LineNr">11037 </span> 39/compare *(ebx+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> +<span id="L11038" class="LineNr">11038 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 +<span id="L11039" class="LineNr">11039 </span> <span class="subxComment"># if v is in a register</span> +<span id="L11040" class="LineNr">11040 </span> 81 7/subop/compare *(ebx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L11041" class="LineNr">11041 </span> { +<span id="L11042" class="LineNr">11042 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11043" class="LineNr">11043 </span> { +<span id="L11044" class="LineNr">11044 </span><span class="Constant">$emit-cleanup-code-until-depth:check-for-previous-spill</span>: +<span id="L11045" class="LineNr">11045 </span> 8b/-> *(esi+8) 0/r32/eax <span class="subxComment"># Live-var-register-spilled</span> +<span id="L11046" class="LineNr">11046 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11047" class="LineNr">11047 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11048" class="LineNr">11048 </span><span class="Constant">$emit-cleanup-code-until-depth:reclaim-var-in-register</span>: +<span id="L11049" class="LineNr">11049 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11050" class="LineNr">11050 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8f 0/subop/pop %"</span>) +<span id="L11051" class="LineNr">11051 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11052" class="LineNr">11052 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L11053" class="LineNr">11053 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L11054" class="LineNr">11054 </span> } +<span id="L11055" class="LineNr">11055 </span> eb/jump $emit-cleanup-code-until-depth:continue/disp8 +<span id="L11056" class="LineNr">11056 </span> } +<span id="L11057" class="LineNr">11057 </span> <span class="subxComment"># otherwise v is on the stack</span> +<span id="L11058" class="LineNr">11058 </span> { +<span id="L11059" class="LineNr">11059 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11060" class="LineNr">11060 </span><span class="Constant">$emit-cleanup-code-until-depth:var-on-stack</span>: +<span id="L11061" class="LineNr">11061 </span> (<a href='mu.subx.html#L10158'>size-of</a> %ebx) <span class="subxComment"># => eax</span> +<span id="L11062" class="LineNr">11062 </span> <span class="subxComment"># don't emit code for labels</span> +<span id="L11063" class="LineNr">11063 </span> 3d/compare-eax-and 0/imm32 +<span id="L11064" class="LineNr">11064 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11065" class="LineNr">11065 </span><span class="Constant">$emit-cleanup-code-until-depth:reclaim-var-on-stack</span>: +<span id="L11066" class="LineNr">11066 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11067" class="LineNr">11067 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"81 0/subop/add %esp "</span>) +<span id="L11068" class="LineNr">11068 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L11069" class="LineNr">11069 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) +<span id="L11070" class="LineNr">11070 </span> } +<span id="L11071" class="LineNr">11071 </span><span class="Constant">$emit-cleanup-code-until-depth:continue</span>: +<span id="L11072" class="LineNr">11072 </span> <span class="subxComment"># curr -= 12</span> +<span id="L11073" class="LineNr">11073 </span> 81 5/subop/subtract %esi 0xc/imm32 +<span id="L11074" class="LineNr">11074 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L11075" class="LineNr">11075 </span> } +<span id="L11076" class="LineNr">11076 </span><span class="Constant">$emit-cleanup-code-until-depth:end</span>: +<span id="L11077" class="LineNr">11077 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11078" class="LineNr">11078 </span> 5e/pop-to-esi +<span id="L11079" class="LineNr">11079 </span> 5b/pop-to-ebx +<span id="L11080" class="LineNr">11080 </span> 5a/pop-to-edx +<span id="L11081" class="LineNr">11081 </span> 59/pop-to-ecx +<span id="L11082" class="LineNr">11082 </span> 58/pop-to-eax +<span id="L11083" class="LineNr">11083 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11084" class="LineNr">11084 </span> 89/<- %esp 5/r32/ebp +<span id="L11085" class="LineNr">11085 </span> 5d/pop-to-ebp +<span id="L11086" class="LineNr">11086 </span> c3/return +<span id="L11087" class="LineNr">11087 </span> +<span id="L11088" class="LineNr">11088 </span><span class="subxComment"># emit clean-up code for 'vars' until a given label is encountered</span> +<span id="L11089" class="LineNr">11089 </span><span class="subxComment"># doesn't actually modify 'vars' so we need traverse manually inside the stack</span> +<span id="L11090" class="LineNr">11090 </span><span class="subxFunction">emit-cleanup-code-until-target</span>: <span class="subxComment"># out: (addr buffered-file), vars: (addr stack live-var), until-block-label: (addr array byte)</span> +<span id="L11091" class="LineNr">11091 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11092" class="LineNr">11092 </span> 55/push-ebp +<span id="L11093" class="LineNr">11093 </span> 89/<- %ebp 4/r32/esp +<span id="L11094" class="LineNr">11094 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11095" class="LineNr">11095 </span> 50/push-eax +<span id="L11096" class="LineNr">11096 </span> 51/push-ecx +<span id="L11097" class="LineNr">11097 </span> 52/push-edx +<span id="L11098" class="LineNr">11098 </span> 53/push-ebx +<span id="L11099" class="LineNr">11099 </span> <span class="subxComment"># ecx = vars</span> +<span id="L11100" class="LineNr">11100 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L11101" class="LineNr">11101 </span> <span class="subxComment"># var eax: int = vars->top</span> +<span id="L11102" class="LineNr">11102 </span> 8b/-> *ecx 0/r32/eax +<span id="L11103" class="LineNr">11103 </span> <span class="subxComment"># var curr/edx: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L11104" class="LineNr">11104 </span> 8d/copy-address *(ecx+eax-4) 2/r32/edx <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> +<span id="L11105" class="LineNr">11105 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> +<span id="L11106" class="LineNr">11106 </span> 81 0/subop/add %ecx 8/imm32 +<span id="L11107" class="LineNr">11107 </span> { +<span id="L11108" class="LineNr">11108 </span><span class="Constant">$emit-cleanup-code-until-target:loop</span>: +<span id="L11109" class="LineNr">11109 </span> <span class="subxComment"># if (curr < min) break</span> +<span id="L11110" class="LineNr">11110 </span> 39/compare %edx 1/r32/ecx +<span id="L11111" class="LineNr">11111 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L11112" class="LineNr">11112 </span> <span class="subxComment"># var v/ebx: (handle var) = lookup(*curr)</span> +<span id="L11113" class="LineNr">11113 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># => eax</span> +<span id="L11114" class="LineNr">11114 </span> 89/<- %ebx 0/r32/eax +<span id="L11115" class="LineNr">11115 </span> <span class="subxComment"># if (v->name == until-block-label) break</span> +<span id="L11116" class="LineNr">11116 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L11117" class="LineNr">11117 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L11118" class="LineNr">11118 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11119" class="LineNr">11119 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L11120" class="LineNr">11120 </span> <span class="subxComment"># if v is in a register</span> +<span id="L11121" class="LineNr">11121 </span> 81 7/subop/compare *(ebx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L11122" class="LineNr">11122 </span> { +<span id="L11123" class="LineNr">11123 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11124" class="LineNr">11124 </span> { +<span id="L11125" class="LineNr">11125 </span><span class="Constant">$emit-cleanup-code-until-target:check-for-previous-spill</span>: +<span id="L11126" class="LineNr">11126 </span> 8b/-> *(edx+8) 0/r32/eax <span class="subxComment"># Live-var-register-spilled</span> +<span id="L11127" class="LineNr">11127 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11128" class="LineNr">11128 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11129" class="LineNr">11129 </span><span class="Constant">$emit-cleanup-code-until-target:reclaim-var-in-register</span>: +<span id="L11130" class="LineNr">11130 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11131" class="LineNr">11131 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8f 0/subop/pop %"</span>) +<span id="L11132" class="LineNr">11132 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11133" class="LineNr">11133 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L11134" class="LineNr">11134 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L11135" class="LineNr">11135 </span> } +<span id="L11136" class="LineNr">11136 </span> eb/jump $emit-cleanup-code-until-target:continue/disp8 +<span id="L11137" class="LineNr">11137 </span> } +<span id="L11138" class="LineNr">11138 </span> <span class="subxComment"># otherwise v is on the stack</span> +<span id="L11139" class="LineNr">11139 </span> { +<span id="L11140" class="LineNr">11140 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11141" class="LineNr">11141 </span><span class="Constant">$emit-cleanup-code-until-target:reclaim-var-on-stack</span>: +<span id="L11142" class="LineNr">11142 </span> (<a href='mu.subx.html#L10158'>size-of</a> %ebx) <span class="subxComment"># => eax</span> +<span id="L11143" class="LineNr">11143 </span> <span class="subxComment"># don't emit code for labels</span> +<span id="L11144" class="LineNr">11144 </span> 3d/compare-eax-and 0/imm32 +<span id="L11145" class="LineNr">11145 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11146" class="LineNr">11146 </span> <span class="subxComment">#</span> +<span id="L11147" class="LineNr">11147 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11148" class="LineNr">11148 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"81 0/subop/add %esp "</span>) +<span id="L11149" class="LineNr">11149 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L11150" class="LineNr">11150 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) +<span id="L11151" class="LineNr">11151 </span> } +<span id="L11152" class="LineNr">11152 </span><span class="Constant">$emit-cleanup-code-until-target:continue</span>: +<span id="L11153" class="LineNr">11153 </span> <span class="subxComment"># curr -= 12</span> +<span id="L11154" class="LineNr">11154 </span> 81 5/subop/subtract %edx 0xc/imm32 +<span id="L11155" class="LineNr">11155 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L11156" class="LineNr">11156 </span> } +<span id="L11157" class="LineNr">11157 </span><span class="Constant">$emit-cleanup-code-until-target:end</span>: +<span id="L11158" class="LineNr">11158 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11159" class="LineNr">11159 </span> 5b/pop-to-ebx +<span id="L11160" class="LineNr">11160 </span> 5a/pop-to-edx +<span id="L11161" class="LineNr">11161 </span> 59/pop-to-ecx +<span id="L11162" class="LineNr">11162 </span> 58/pop-to-eax +<span id="L11163" class="LineNr">11163 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11164" class="LineNr">11164 </span> 89/<- %esp 5/r32/ebp +<span id="L11165" class="LineNr">11165 </span> 5d/pop-to-ebp +<span id="L11166" class="LineNr">11166 </span> c3/return +<span id="L11167" class="LineNr">11167 </span> +<span id="L11168" class="LineNr">11168 </span><span class="subxComment"># Return true if there isn't a variable in 'vars' with the same block-depth</span> +<span id="L11169" class="LineNr">11169 </span><span class="subxComment"># and register as 'v'.</span> +<span id="L11170" class="LineNr">11170 </span><span class="subxComment"># 'v' is guaranteed not to be within 'vars'.</span> +<span id="L11171" class="LineNr">11171 </span><span class="subxFunction">not-yet-spilled-this-block?</span>: <span class="subxComment"># v: (addr var), vars: (addr stack live-var) -> result/eax: boolean</span> +<span id="L11172" class="LineNr">11172 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11173" class="LineNr">11173 </span> 55/push-ebp +<span id="L11174" class="LineNr">11174 </span> 89/<- %ebp 4/r32/esp +<span id="L11175" class="LineNr">11175 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11176" class="LineNr">11176 </span> 51/push-ecx +<span id="L11177" class="LineNr">11177 </span> 52/push-edx +<span id="L11178" class="LineNr">11178 </span> 53/push-ebx +<span id="L11179" class="LineNr">11179 </span> 56/push-esi +<span id="L11180" class="LineNr">11180 </span> 57/push-edi +<span id="L11181" class="LineNr">11181 </span> <span class="subxComment"># ecx = vars</span> +<span id="L11182" class="LineNr">11182 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L11183" class="LineNr">11183 </span> <span class="subxComment"># var eax: int = vars->top</span> +<span id="L11184" class="LineNr">11184 </span> 8b/-> *ecx 0/r32/eax +<span id="L11185" class="LineNr">11185 </span> <span class="subxComment"># var curr/edx: (addr handle var) = &vars->data[vars->top - 12]</span> +<span id="L11186" class="LineNr">11186 </span> 8d/copy-address *(ecx+eax-4) 2/r32/edx <span class="subxComment"># vars + 8 + vars->top - 12/Live-var-size</span> +<span id="L11187" class="LineNr">11187 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> +<span id="L11188" class="LineNr">11188 </span> 8d/copy-address *(ecx+8) 1/r32/ecx +<span id="L11189" class="LineNr">11189 </span> <span class="subxComment"># var depth/ebx: int = v->block-depth</span> +<span id="L11190" class="LineNr">11190 </span> 8b/-> *(ebp+8) 3/r32/ebx +<span id="L11191" class="LineNr">11191 </span> 8b/-> *(ebx+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> +<span id="L11192" class="LineNr">11192 </span> <span class="subxComment"># var needle/esi: (addr array byte) = v->register</span> +<span id="L11193" class="LineNr">11193 </span> 8b/-> *(ebp+8) 6/r32/esi +<span id="L11194" class="LineNr">11194 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11195" class="LineNr">11195 </span> 89/<- %esi 0/r32/eax +<span id="L11196" class="LineNr">11196 </span> { +<span id="L11197" class="LineNr">11197 </span><span class="Constant">$not-yet-spilled-this-block?:loop</span>: +<span id="L11198" class="LineNr">11198 </span> <span class="subxComment"># if (curr < min) break</span> +<span id="L11199" class="LineNr">11199 </span> 39/compare %edx 1/r32/ecx +<span id="L11200" class="LineNr">11200 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L11201" class="LineNr">11201 </span> <span class="subxComment"># var cand/edi: (addr var) = lookup(*curr)</span> +<span id="L11202" class="LineNr">11202 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># => eax</span> +<span id="L11203" class="LineNr">11203 </span> 89/<- %edi 0/r32/eax +<span id="L11204" class="LineNr">11204 </span> <span class="subxComment"># if (cand->block-depth < depth) break</span> +<span id="L11205" class="LineNr">11205 </span> 39/compare *(edi+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> +<span id="L11206" class="LineNr">11206 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 +<span id="L11207" class="LineNr">11207 </span> <span class="subxComment"># var cand-reg/edi: (array array byte) = cand->reg</span> +<span id="L11208" class="LineNr">11208 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x18) *(edi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11209" class="LineNr">11209 </span> 89/<- %edi 0/r32/eax +<span id="L11210" class="LineNr">11210 </span> <span class="subxComment"># if (cand-reg == null) continue</span> +<span id="L11211" class="LineNr">11211 </span> { +<span id="L11212" class="LineNr">11212 </span><span class="Constant">$not-yet-spilled-this-block?:check-reg</span>: +<span id="L11213" class="LineNr">11213 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L11214" class="LineNr">11214 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11215" class="LineNr">11215 </span> <span class="subxComment"># if (cand-reg == needle) return true</span> +<span id="L11216" class="LineNr">11216 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %esi %edi) <span class="subxComment"># => eax</span> +<span id="L11217" class="LineNr">11217 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11218" class="LineNr">11218 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11219" class="LineNr">11219 </span><span class="Constant">$not-yet-spilled-this-block?:return-false</span>: +<span id="L11220" class="LineNr">11220 </span> b8/copy-to-eax 0/imm32/false +<span id="L11221" class="LineNr">11221 </span> eb/jump $not-yet-spilled-this-block?:end/disp8 +<span id="L11222" class="LineNr">11222 </span> } +<span id="L11223" class="LineNr">11223 </span><span class="Constant">$not-yet-spilled-this-block?:continue</span>: +<span id="L11224" class="LineNr">11224 </span> <span class="subxComment"># curr -= 12</span> +<span id="L11225" class="LineNr">11225 </span> 81 5/subop/subtract %edx 0xc/imm32 +<span id="L11226" class="LineNr">11226 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L11227" class="LineNr">11227 </span> } +<span id="L11228" class="LineNr">11228 </span><span class="Constant">$not-yet-spilled-this-block?:return-true</span>: +<span id="L11229" class="LineNr">11229 </span> <span class="subxComment"># return true</span> +<span id="L11230" class="LineNr">11230 </span> b8/copy-to-eax 1/imm32/true +<span id="L11231" class="LineNr">11231 </span><span class="Constant">$not-yet-spilled-this-block?:end</span>: +<span id="L11232" class="LineNr">11232 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11233" class="LineNr">11233 </span> 5f/pop-to-edi +<span id="L11234" class="LineNr">11234 </span> 5e/pop-to-esi +<span id="L11235" class="LineNr">11235 </span> 5b/pop-to-ebx +<span id="L11236" class="LineNr">11236 </span> 5a/pop-to-edx +<span id="L11237" class="LineNr">11237 </span> 59/pop-to-ecx +<span id="L11238" class="LineNr">11238 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11239" class="LineNr">11239 </span> 89/<- %esp 5/r32/ebp +<span id="L11240" class="LineNr">11240 </span> 5d/pop-to-ebp +<span id="L11241" class="LineNr">11241 </span> c3/return +<span id="L11242" class="LineNr">11242 </span> +<span id="L11243" class="LineNr">11243 </span><span class="subxComment"># could the register of 'v' ever be written to by one of the vars in fn-outputs?</span> +<span id="L11244" class="LineNr">11244 </span><span class="subxFunction">will-not-write-some-register?</span>: <span class="subxComment"># v: (addr var), stmts: (addr list stmt), fn: (addr function) -> result/eax: boolean</span> <span id="L11245" class="LineNr">11245 </span> <span class="subxS1Comment"># . prologue</span> <span id="L11246" class="LineNr">11246 </span> 55/push-ebp <span id="L11247" class="LineNr">11247 </span> 89/<- %ebp 4/r32/esp -<span id="L11248" class="LineNr">11248 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11249" class="LineNr">11249 </span> 51/push-ecx -<span id="L11250" class="LineNr">11250 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> -<span id="L11251" class="LineNr">11251 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11252" class="LineNr">11252 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> -<span id="L11253" class="LineNr">11253 </span> 89/<- %ecx 0/r32/eax -<span id="L11254" class="LineNr">11254 </span> { -<span id="L11255" class="LineNr">11255 </span><span class="Constant">$find-register:loop</span>: -<span id="L11256" class="LineNr">11256 </span> <span class="subxComment"># if (curr == 0) break</span> -<span id="L11257" class="LineNr">11257 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L11258" class="LineNr">11258 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11259" class="LineNr">11259 </span> <span class="subxComment"># eax = curr->value->register</span> -<span id="L11260" class="LineNr">11260 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L11261" class="LineNr">11261 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11262" class="LineNr">11262 </span> <span class="subxComment"># if (eax == reg) return curr->value</span> -<span id="L11263" class="LineNr">11263 </span><span class="Constant">$find-register:compare</span>: -<span id="L11264" class="LineNr">11264 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> -<span id="L11265" class="LineNr">11265 </span> { -<span id="L11266" class="LineNr">11266 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11267" class="LineNr">11267 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11268" class="LineNr">11268 </span><span class="Constant">$find-register:found</span>: -<span id="L11269" class="LineNr">11269 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L11270" class="LineNr">11270 </span> eb/jump $find-register:end/disp8 -<span id="L11271" class="LineNr">11271 </span> } -<span id="L11272" class="LineNr">11272 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L11273" class="LineNr">11273 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L11274" class="LineNr">11274 </span> 89/<- %ecx 0/r32/eax -<span id="L11275" class="LineNr">11275 </span> <span class="subxComment">#</span> -<span id="L11276" class="LineNr">11276 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11277" class="LineNr">11277 </span> } -<span id="L11278" class="LineNr">11278 </span><span class="Constant">$find-register:end</span>: -<span id="L11279" class="LineNr">11279 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11280" class="LineNr">11280 </span> 59/pop-to-ecx -<span id="L11281" class="LineNr">11281 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11282" class="LineNr">11282 </span> 89/<- %esp 5/r32/ebp -<span id="L11283" class="LineNr">11283 </span> 5d/pop-to-ebp -<span id="L11284" class="LineNr">11284 </span> c3/return -<span id="L11285" class="LineNr">11285 </span> -<span id="L11286" class="LineNr">11286 </span><span class="subxFunction">assigns-in-stmts?</span>: <span class="subxComment"># stmts: (addr list stmt), v: (addr var) -> result/eax: boolean</span> -<span id="L11287" class="LineNr">11287 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11288" class="LineNr">11288 </span> 55/push-ebp -<span id="L11289" class="LineNr">11289 </span> 89/<- %ebp 4/r32/esp -<span id="L11290" class="LineNr">11290 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11291" class="LineNr">11291 </span> 51/push-ecx -<span id="L11292" class="LineNr">11292 </span> <span class="subxComment"># var curr/ecx: (addr list stmt) = stmts</span> -<span id="L11293" class="LineNr">11293 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11294" class="LineNr">11294 </span> { -<span id="L11295" class="LineNr">11295 </span> <span class="subxComment"># if (curr == 0) break</span> -<span id="L11296" class="LineNr">11296 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L11297" class="LineNr">11297 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11298" class="LineNr">11298 </span> <span class="subxComment"># if assigns-in-stmt?(curr->value, v) return true</span> -<span id="L11299" class="LineNr">11299 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L11300" class="LineNr">11300 </span> (<a href='mu.subx.html#L11317'>assigns-in-stmt?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L11301" class="LineNr">11301 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11302" class="LineNr">11302 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11303" class="LineNr">11303 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L11304" class="LineNr">11304 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L11305" class="LineNr">11305 </span> 89/<- %ecx 0/r32/eax -<span id="L11306" class="LineNr">11306 </span> <span class="subxComment">#</span> -<span id="L11307" class="LineNr">11307 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11308" class="LineNr">11308 </span> } -<span id="L11309" class="LineNr">11309 </span><span class="Constant">$assigns-in-stmts?:end</span>: -<span id="L11310" class="LineNr">11310 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11311" class="LineNr">11311 </span> 59/pop-to-ecx -<span id="L11312" class="LineNr">11312 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11313" class="LineNr">11313 </span> 89/<- %esp 5/r32/ebp -<span id="L11314" class="LineNr">11314 </span> 5d/pop-to-ebp -<span id="L11315" class="LineNr">11315 </span> c3/return -<span id="L11316" class="LineNr">11316 </span> -<span id="L11317" class="LineNr">11317 </span><span class="subxFunction">assigns-in-stmt?</span>: <span class="subxComment"># stmt: (addr stmt), v: (addr var) -> result/eax: boolean</span> -<span id="L11318" class="LineNr">11318 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11319" class="LineNr">11319 </span> 55/push-ebp -<span id="L11320" class="LineNr">11320 </span> 89/<- %ebp 4/r32/esp -<span id="L11321" class="LineNr">11321 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11322" class="LineNr">11322 </span> 51/push-ecx -<span id="L11323" class="LineNr">11323 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L11324" class="LineNr">11324 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11325" class="LineNr">11325 </span> <span class="subxComment"># if stmt is a stmt1, return assigns-in-stmt-vars?(stmt->outputs, v)</span> -<span id="L11326" class="LineNr">11326 </span> { -<span id="L11327" class="LineNr">11327 </span> 81 7/subop/compare *ecx 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> -<span id="L11328" class="LineNr">11328 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11329" class="LineNr">11329 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L11330" class="LineNr">11330 </span> (<a href='mu.subx.html#L11351'>assigns-in-stmt-vars?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L11331" class="LineNr">11331 </span> eb/jump $assigns-in-stmt?:end/disp8 -<span id="L11332" class="LineNr">11332 </span> } -<span id="L11333" class="LineNr">11333 </span> <span class="subxComment"># if stmt is a block, return assigns-in-stmts?(stmt->stmts, v)</span> -<span id="L11334" class="LineNr">11334 </span> { -<span id="L11335" class="LineNr">11335 </span> 81 7/subop/compare *ecx 0/imm32/block <span class="subxComment"># Stmt-tag</span> -<span id="L11336" class="LineNr">11336 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11337" class="LineNr">11337 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> -<span id="L11338" class="LineNr">11338 </span> (<a href='mu.subx.html#L11286'>assigns-in-stmts?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L11339" class="LineNr">11339 </span> eb/jump $assigns-in-stmt?:end/disp8 -<span id="L11340" class="LineNr">11340 </span> } -<span id="L11341" class="LineNr">11341 </span> <span class="subxComment"># otherwise return false</span> -<span id="L11342" class="LineNr">11342 </span> b8/copy 0/imm32/false -<span id="L11343" class="LineNr">11343 </span><span class="Constant">$assigns-in-stmt?:end</span>: -<span id="L11344" class="LineNr">11344 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11345" class="LineNr">11345 </span> 59/pop-to-ecx -<span id="L11346" class="LineNr">11346 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11347" class="LineNr">11347 </span> 89/<- %esp 5/r32/ebp -<span id="L11348" class="LineNr">11348 </span> 5d/pop-to-ebp -<span id="L11349" class="LineNr">11349 </span> c3/return -<span id="L11350" class="LineNr">11350 </span> -<span id="L11351" class="LineNr">11351 </span><span class="subxFunction">assigns-in-stmt-vars?</span>: <span class="subxComment"># stmt-var: (addr stmt-var), v: (addr var) -> result/eax: boolean</span> -<span id="L11352" class="LineNr">11352 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11353" class="LineNr">11353 </span> 55/push-ebp -<span id="L11354" class="LineNr">11354 </span> 89/<- %ebp 4/r32/esp -<span id="L11355" class="LineNr">11355 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11356" class="LineNr">11356 </span> 51/push-ecx -<span id="L11357" class="LineNr">11357 </span> <span class="subxComment"># var curr/ecx: (addr stmt-var) = stmt-var</span> -<span id="L11358" class="LineNr">11358 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11359" class="LineNr">11359 </span> { -<span id="L11360" class="LineNr">11360 </span> <span class="subxComment"># if (curr == 0) break</span> -<span id="L11361" class="LineNr">11361 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L11362" class="LineNr">11362 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11363" class="LineNr">11363 </span> <span class="subxComment"># eax = lookup(curr->value)</span> -<span id="L11364" class="LineNr">11364 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L11365" class="LineNr">11365 </span> <span class="subxComment"># if (eax == v && curr->is-deref? == false) return true</span> -<span id="L11366" class="LineNr">11366 </span> { -<span id="L11367" class="LineNr">11367 </span> 39/compare *(ebp+0xc) 0/r32/eax -<span id="L11368" class="LineNr">11368 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11369" class="LineNr">11369 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L11370" class="LineNr">11370 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11371" class="LineNr">11371 </span> b8/copy-to-eax 1/imm32/true -<span id="L11372" class="LineNr">11372 </span> eb/jump $assigns-in-stmt-vars?:end/disp8 -<span id="L11373" class="LineNr">11373 </span> } -<span id="L11374" class="LineNr">11374 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L11375" class="LineNr">11375 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L11376" class="LineNr">11376 </span> 89/<- %ecx 0/r32/eax -<span id="L11377" class="LineNr">11377 </span> <span class="subxComment">#</span> -<span id="L11378" class="LineNr">11378 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11379" class="LineNr">11379 </span> } -<span id="L11380" class="LineNr">11380 </span><span class="Constant">$assigns-in-stmt-vars?:end</span>: -<span id="L11381" class="LineNr">11381 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11382" class="LineNr">11382 </span> 59/pop-to-ecx -<span id="L11383" class="LineNr">11383 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11384" class="LineNr">11384 </span> 89/<- %esp 5/r32/ebp -<span id="L11385" class="LineNr">11385 </span> 5d/pop-to-ebp -<span id="L11386" class="LineNr">11386 </span> c3/return -<span id="L11387" class="LineNr">11387 </span> -<span id="L11388" class="LineNr">11388 </span><span class="subxComment"># is there a var before 'v' with the same block-depth and register on the 'vars' stack?</span> -<span id="L11389" class="LineNr">11389 </span><span class="subxComment"># v is guaranteed to be within vars</span> -<span id="L11390" class="LineNr">11390 </span><span class="subxComment"># 'start' is provided as an optimization, a pointer within vars</span> -<span id="L11391" class="LineNr">11391 </span><span class="subxComment"># *start == v</span> -<span id="L11392" class="LineNr">11392 </span><span class="subxFunction">same-register-spilled-before?</span>: <span class="subxComment"># v: (addr var), vars: (addr stack (handle var)), start: (addr var) -> result/eax: boolean</span> -<span id="L11393" class="LineNr">11393 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11394" class="LineNr">11394 </span> 55/push-ebp -<span id="L11395" class="LineNr">11395 </span> 89/<- %ebp 4/r32/esp -<span id="L11396" class="LineNr">11396 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11397" class="LineNr">11397 </span> 51/push-ecx -<span id="L11398" class="LineNr">11398 </span> 52/push-edx -<span id="L11399" class="LineNr">11399 </span> 53/push-ebx -<span id="L11400" class="LineNr">11400 </span> 56/push-esi -<span id="L11401" class="LineNr">11401 </span> 57/push-edi -<span id="L11402" class="LineNr">11402 </span> <span class="subxComment"># ecx = v</span> -<span id="L11403" class="LineNr">11403 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11404" class="LineNr">11404 </span> <span class="subxComment"># var reg/edx: (addr array byte) = lookup(v->register)</span> -<span id="L11405" class="LineNr">11405 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11406" class="LineNr">11406 </span> 89/<- %edx 0/r32/eax -<span id="L11407" class="LineNr">11407 </span> <span class="subxComment"># var depth/ebx: int = v->block-depth</span> -<span id="L11408" class="LineNr">11408 </span> 8b/-> *(ecx+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> -<span id="L11409" class="LineNr">11409 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> -<span id="L11410" class="LineNr">11410 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L11411" class="LineNr">11411 </span> 81 0/subop/add %ecx 8/imm32 -<span id="L11412" class="LineNr">11412 </span> <span class="subxComment"># TODO: check that start >= min and start < &vars->data[top]</span> -<span id="L11413" class="LineNr">11413 </span> <span class="subxComment"># TODO: check that *start == v</span> -<span id="L11414" class="LineNr">11414 </span> <span class="subxComment"># var curr/esi: (addr handle var) = start</span> -<span id="L11415" class="LineNr">11415 </span> 8b/-> *(ebp+0x10) 6/r32/esi -<span id="L11416" class="LineNr">11416 </span> <span class="subxComment"># curr -= 8</span> -<span id="L11417" class="LineNr">11417 </span> 81 5/subop/subtract %esi 8/imm32 -<span id="L11418" class="LineNr">11418 </span> { -<span id="L11419" class="LineNr">11419 </span><span class="Constant">$same-register-spilled-before?:loop</span>: -<span id="L11420" class="LineNr">11420 </span> <span class="subxComment"># if (curr < min) break</span> -<span id="L11421" class="LineNr">11421 </span> 39/compare %esi 1/r32/ecx -<span id="L11422" class="LineNr">11422 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 -<span id="L11423" class="LineNr">11423 </span> <span class="subxComment"># var x/eax: (addr var) = lookup(*curr)</span> -<span id="L11424" class="LineNr">11424 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> -<span id="L11425" class="LineNr">11425 </span> <span class="subxComment"># if (x->block-depth < depth) break</span> -<span id="L11426" class="LineNr">11426 </span> 39/compare *(eax+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> -<span id="L11427" class="LineNr">11427 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 -<span id="L11428" class="LineNr">11428 </span> <span class="subxComment"># if (x->register == 0) continue</span> -<span id="L11429" class="LineNr">11429 </span> 81 7/subop/compare *(eax+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L11430" class="LineNr">11430 </span> 74/jump-if-= $same-register-spilled-before?:continue/disp8 -<span id="L11431" class="LineNr">11431 </span> <span class="subxComment"># if (x->register == reg) return true</span> -<span id="L11432" class="LineNr">11432 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11433" class="LineNr">11433 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %edx) <span class="subxComment"># => eax</span> -<span id="L11434" class="LineNr">11434 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11435" class="LineNr">11435 </span> b8/copy-to-eax 1/imm32/true -<span id="L11436" class="LineNr">11436 </span> 75/jump-if-!= $same-register-spilled-before?:end/disp8 -<span id="L11437" class="LineNr">11437 </span><span class="Constant">$same-register-spilled-before?:continue</span>: -<span id="L11438" class="LineNr">11438 </span> <span class="subxComment"># curr -= 8</span> -<span id="L11439" class="LineNr">11439 </span> 81 5/subop/subtract %esi 8/imm32 -<span id="L11440" class="LineNr">11440 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L11441" class="LineNr">11441 </span> } -<span id="L11442" class="LineNr">11442 </span><span class="Constant">$same-register-spilled-before?:false</span>: -<span id="L11443" class="LineNr">11443 </span> b8/copy-to-eax 0/imm32/false -<span id="L11444" class="LineNr">11444 </span><span class="Constant">$same-register-spilled-before?:end</span>: -<span id="L11445" class="LineNr">11445 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11446" class="LineNr">11446 </span> 5f/pop-to-edi -<span id="L11447" class="LineNr">11447 </span> 5e/pop-to-esi -<span id="L11448" class="LineNr">11448 </span> 5b/pop-to-ebx -<span id="L11449" class="LineNr">11449 </span> 5a/pop-to-edx -<span id="L11450" class="LineNr">11450 </span> 59/pop-to-ecx -<span id="L11451" class="LineNr">11451 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11452" class="LineNr">11452 </span> 89/<- %esp 5/r32/ebp -<span id="L11453" class="LineNr">11453 </span> 5d/pop-to-ebp -<span id="L11454" class="LineNr">11454 </span> c3/return -<span id="L11455" class="LineNr">11455 </span> -<span id="L11456" class="LineNr">11456 </span><span class="subxComment"># Clean up global state for 'vars' until some block depth (inclusive).</span> -<span id="L11457" class="LineNr">11457 </span><span class="subxComment">#</span> -<span id="L11458" class="LineNr">11458 </span><span class="subxComment"># This would be a simple series of pops, if it wasn't for fn outputs, which</span> -<span id="L11459" class="LineNr">11459 </span><span class="subxComment"># can occur anywhere in the stack.</span> -<span id="L11460" class="LineNr">11460 </span><span class="subxComment"># So we have to _compact_ the entire array underlying the stack.</span> -<span id="L11461" class="LineNr">11461 </span><span class="subxComment">#</span> -<span id="L11462" class="LineNr">11462 </span><span class="subxComment"># We want to allow a fn output register to be written to by locals before the</span> -<span id="L11463" class="LineNr">11463 </span><span class="subxComment"># output is set.</span> -<span id="L11464" class="LineNr">11464 </span><span class="subxComment"># So fn outputs can't just be pushed at the start of the function.</span> -<span id="L11465" class="LineNr">11465 </span><span class="subxComment">#</span> -<span id="L11466" class="LineNr">11466 </span><span class="subxComment"># We want to allow other locals to shadow a fn output register after the</span> -<span id="L11467" class="LineNr">11467 </span><span class="subxComment"># output is set.</span> -<span id="L11468" class="LineNr">11468 </span><span class="subxComment"># So the output can't just always override anything in the stack. Sequence matters.</span> -<span id="L11469" class="LineNr">11469 </span><span class="subxFunction">clean-up-blocks</span>: <span class="subxComment"># vars: (addr stack live-var), until-block-depth: int, fn: (addr function)</span> -<span id="L11470" class="LineNr">11470 </span> <span class="subxComment"># pseudocode:</span> -<span id="L11471" class="LineNr">11471 </span> <span class="subxComment"># to = vars->top (which points outside the stack)</span> -<span id="L11472" class="LineNr">11472 </span> <span class="subxComment"># while true</span> -<span id="L11473" class="LineNr">11473 </span> <span class="subxComment"># if to <= 0</span> -<span id="L11474" class="LineNr">11474 </span> <span class="subxComment"># break</span> -<span id="L11475" class="LineNr">11475 </span> <span class="subxComment"># var v = vars->data[to-1]</span> -<span id="L11476" class="LineNr">11476 </span> <span class="subxComment"># if v.depth < until and !in-function-outputs?(fn, v)</span> -<span id="L11477" class="LineNr">11477 </span> <span class="subxComment"># break</span> -<span id="L11478" class="LineNr">11478 </span> <span class="subxComment"># --to</span> -<span id="L11479" class="LineNr">11479 </span> <span class="subxComment"># from = to</span> -<span id="L11480" class="LineNr">11480 </span> <span class="subxComment"># while true</span> -<span id="L11481" class="LineNr">11481 </span> <span class="subxComment"># if from >= vars->top</span> -<span id="L11482" class="LineNr">11482 </span> <span class="subxComment"># break</span> -<span id="L11483" class="LineNr">11483 </span> <span class="subxComment"># assert(from >= to)</span> -<span id="L11484" class="LineNr">11484 </span> <span class="subxComment"># v = vars->data[from]</span> -<span id="L11485" class="LineNr">11485 </span> <span class="subxComment"># if in-function-outputs?(fn, v)</span> -<span id="L11486" class="LineNr">11486 </span> <span class="subxComment"># if from > to</span> -<span id="L11487" class="LineNr">11487 </span> <span class="subxComment"># vars->data[to] = vars->data[from]</span> -<span id="L11488" class="LineNr">11488 </span> <span class="subxComment"># ++to</span> -<span id="L11489" class="LineNr">11489 </span> <span class="subxComment"># ++from</span> -<span id="L11490" class="LineNr">11490 </span> <span class="subxComment"># vars->top = to</span> -<span id="L11491" class="LineNr">11491 </span> <span class="subxComment">#</span> -<span id="L11492" class="LineNr">11492 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11493" class="LineNr">11493 </span> 55/push-ebp -<span id="L11494" class="LineNr">11494 </span> 89/<- %ebp 4/r32/esp -<span id="L11495" class="LineNr">11495 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11496" class="LineNr">11496 </span> 50/push-eax -<span id="L11497" class="LineNr">11497 </span> 52/push-edx -<span id="L11498" class="LineNr">11498 </span> 53/push-ebx -<span id="L11499" class="LineNr">11499 </span> 56/push-esi -<span id="L11500" class="LineNr">11500 </span> 57/push-edi -<span id="L11501" class="LineNr">11501 </span> <span class="subxComment"># ebx = vars</span> -<span id="L11502" class="LineNr">11502 </span> 8b/-> *(ebp+8) 3/r32/ebx -<span id="L11503" class="LineNr">11503 </span> <span class="subxComment"># edx = until-block-depth</span> -<span id="L11504" class="LineNr">11504 </span> 8b/-> *(ebp+0xc) 2/r32/edx -<span id="L11505" class="LineNr">11505 </span><span class="Constant">$clean-up-blocks:phase1</span>: -<span id="L11506" class="LineNr">11506 </span> <span class="subxComment"># var to/edi: int = vars->top</span> -<span id="L11507" class="LineNr">11507 </span> 8b/-> *ebx 7/r32/edi -<span id="L11508" class="LineNr">11508 </span> { -<span id="L11509" class="LineNr">11509 </span><span class="Constant">$clean-up-blocks:loop1</span>: -<span id="L11510" class="LineNr">11510 </span> <span class="subxComment"># if (to <= 0) break</span> -<span id="L11511" class="LineNr">11511 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L11512" class="LineNr">11512 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 -<span id="L11513" class="LineNr">11513 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(vars->data[to-1]->var)</span> -<span id="L11514" class="LineNr">11514 </span> 8d/copy-address *(ebx+edi-4) 0/r32/eax <span class="subxComment"># vars + 8 + to - 12</span> -<span id="L11515" class="LineNr">11515 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L11516" class="LineNr">11516 </span> <span class="subxComment"># if (v->block-depth >= until-block-depth) continue</span> -<span id="L11517" class="LineNr">11517 </span> 39/compare *(eax+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> -<span id="L11518" class="LineNr">11518 </span> { -<span id="L11519" class="LineNr">11519 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 -<span id="L11520" class="LineNr">11520 </span> <span class="subxComment"># if (!in-function-outputs?(fn, v)) break</span> -<span id="L11521" class="LineNr">11521 </span> (<a href='mu.subx.html#L11588'>in-function-outputs?</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> -<span id="L11522" class="LineNr">11522 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11523" class="LineNr">11523 </span> 74/jump-if-= $clean-up-blocks:phase2/disp8 -<span id="L11524" class="LineNr">11524 </span> } -<span id="L11525" class="LineNr">11525 </span><span class="Constant">$clean-up-blocks:loop1-continue</span>: -<span id="L11526" class="LineNr">11526 </span> <span class="subxComment"># --to</span> -<span id="L11527" class="LineNr">11527 </span> 81 5/subop/subtract %edi 0xc/imm32 -<span id="L11528" class="LineNr">11528 </span> <span class="subxComment">#</span> -<span id="L11529" class="LineNr">11529 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11530" class="LineNr">11530 </span> } -<span id="L11531" class="LineNr">11531 </span><span class="Constant">$clean-up-blocks:phase2</span>: -<span id="L11532" class="LineNr">11532 </span> <span class="subxComment"># var from/esi: int = to</span> -<span id="L11533" class="LineNr">11533 </span> 89/<- %esi 7/r32/edi -<span id="L11534" class="LineNr">11534 </span> { -<span id="L11535" class="LineNr">11535 </span><span class="Constant">$clean-up-blocks:loop2</span>: -<span id="L11536" class="LineNr">11536 </span> <span class="subxComment"># if (from >= vars->top) break</span> -<span id="L11537" class="LineNr">11537 </span> 3b/compare 6/r32/esi *ebx -<span id="L11538" class="LineNr">11538 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 -<span id="L11539" class="LineNr">11539 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(vars->data[from]->var)</span> -<span id="L11540" class="LineNr">11540 </span> 8d/copy-address *(ebx+esi+8) 0/r32/eax -<span id="L11541" class="LineNr">11541 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> -<span id="L11542" class="LineNr">11542 </span> <span class="subxComment"># if !in-function-outputs?(fn, v) continue</span> -<span id="L11543" class="LineNr">11543 </span> (<a href='mu.subx.html#L11588'>in-function-outputs?</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> -<span id="L11544" class="LineNr">11544 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11545" class="LineNr">11545 </span> 74/jump-if-= $clean-up-blocks:loop2-continue/disp8 -<span id="L11546" class="LineNr">11546 </span> <span class="subxComment"># invariant: from >= to</span> -<span id="L11547" class="LineNr">11547 </span> <span class="subxComment"># if (from > to) vars->data[to] = vars->data[from]</span> +<span id="L11248" class="LineNr">11248 </span> <span class="subxComment"># eax = v</span> +<span id="L11249" class="LineNr">11249 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L11250" class="LineNr">11250 </span> <span class="subxComment"># var reg/eax: (addr array byte) = lookup(v->register)</span> +<span id="L11251" class="LineNr">11251 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11252" class="LineNr">11252 </span> <span class="subxComment"># var target/eax: (addr var) = find-register(fn-outputs, reg)</span> +<span id="L11253" class="LineNr">11253 </span> (<a href='mu.subx.html#L11274'>find-register</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> +<span id="L11254" class="LineNr">11254 </span> <span class="subxComment"># if (target == 0) return true</span> +<span id="L11255" class="LineNr">11255 </span> { +<span id="L11256" class="LineNr">11256 </span> 3d/compare-eax-and 0/imm32 +<span id="L11257" class="LineNr">11257 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11258" class="LineNr">11258 </span> b8/copy-to-eax 1/imm32/true +<span id="L11259" class="LineNr">11259 </span> eb/jump $will-not-write-some-register?:end/disp8 +<span id="L11260" class="LineNr">11260 </span> } +<span id="L11261" class="LineNr">11261 </span> <span class="subxComment"># return !assigns-in-stmts?(stmts, target)</span> +<span id="L11262" class="LineNr">11262 </span> (<a href='mu.subx.html#L11316'>assigns-in-stmts?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> +<span id="L11263" class="LineNr">11263 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11264" class="LineNr">11264 </span> <span class="subxComment"># assume: true = 1, so no need to mask with 0x000000ff</span> +<span id="L11265" class="LineNr">11265 </span> 0f 94/set-if-= %al +<span id="L11266" class="LineNr">11266 </span><span class="Constant">$will-not-write-some-register?:end</span>: +<span id="L11267" class="LineNr">11267 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11268" class="LineNr">11268 </span> 89/<- %esp 5/r32/ebp +<span id="L11269" class="LineNr">11269 </span> 5d/pop-to-ebp +<span id="L11270" class="LineNr">11270 </span> c3/return +<span id="L11271" class="LineNr">11271 </span> +<span id="L11272" class="LineNr">11272 </span><span class="subxComment"># return fn output with matching register</span> +<span id="L11273" class="LineNr">11273 </span><span class="subxComment"># always returns false if 'reg' is null</span> +<span id="L11274" class="LineNr">11274 </span><span class="subxFunction">find-register</span>: <span class="subxComment"># fn: (addr function), reg: (addr array byte) -> result/eax: (addr var)</span> +<span id="L11275" class="LineNr">11275 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11276" class="LineNr">11276 </span> 55/push-ebp +<span id="L11277" class="LineNr">11277 </span> 89/<- %ebp 4/r32/esp +<span id="L11278" class="LineNr">11278 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11279" class="LineNr">11279 </span> 51/push-ecx +<span id="L11280" class="LineNr">11280 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> +<span id="L11281" class="LineNr">11281 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11282" class="LineNr">11282 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> +<span id="L11283" class="LineNr">11283 </span> 89/<- %ecx 0/r32/eax +<span id="L11284" class="LineNr">11284 </span> { +<span id="L11285" class="LineNr">11285 </span><span class="Constant">$find-register:loop</span>: +<span id="L11286" class="LineNr">11286 </span> <span class="subxComment"># if (curr == 0) break</span> +<span id="L11287" class="LineNr">11287 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L11288" class="LineNr">11288 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11289" class="LineNr">11289 </span> <span class="subxComment"># eax = curr->value->register</span> +<span id="L11290" class="LineNr">11290 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L11291" class="LineNr">11291 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11292" class="LineNr">11292 </span> <span class="subxComment"># if (eax == reg) return curr->value</span> +<span id="L11293" class="LineNr">11293 </span><span class="Constant">$find-register:compare</span>: +<span id="L11294" class="LineNr">11294 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> *(ebp+0xc) %eax) <span class="subxComment"># => eax</span> +<span id="L11295" class="LineNr">11295 </span> { +<span id="L11296" class="LineNr">11296 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11297" class="LineNr">11297 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11298" class="LineNr">11298 </span><span class="Constant">$find-register:found</span>: +<span id="L11299" class="LineNr">11299 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L11300" class="LineNr">11300 </span> eb/jump $find-register:end/disp8 +<span id="L11301" class="LineNr">11301 </span> } +<span id="L11302" class="LineNr">11302 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L11303" class="LineNr">11303 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L11304" class="LineNr">11304 </span> 89/<- %ecx 0/r32/eax +<span id="L11305" class="LineNr">11305 </span> <span class="subxComment">#</span> +<span id="L11306" class="LineNr">11306 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11307" class="LineNr">11307 </span> } +<span id="L11308" class="LineNr">11308 </span><span class="Constant">$find-register:end</span>: +<span id="L11309" class="LineNr">11309 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11310" class="LineNr">11310 </span> 59/pop-to-ecx +<span id="L11311" class="LineNr">11311 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11312" class="LineNr">11312 </span> 89/<- %esp 5/r32/ebp +<span id="L11313" class="LineNr">11313 </span> 5d/pop-to-ebp +<span id="L11314" class="LineNr">11314 </span> c3/return +<span id="L11315" class="LineNr">11315 </span> +<span id="L11316" class="LineNr">11316 </span><span class="subxFunction">assigns-in-stmts?</span>: <span class="subxComment"># stmts: (addr list stmt), v: (addr var) -> result/eax: boolean</span> +<span id="L11317" class="LineNr">11317 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11318" class="LineNr">11318 </span> 55/push-ebp +<span id="L11319" class="LineNr">11319 </span> 89/<- %ebp 4/r32/esp +<span id="L11320" class="LineNr">11320 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11321" class="LineNr">11321 </span> 51/push-ecx +<span id="L11322" class="LineNr">11322 </span> <span class="subxComment"># var curr/ecx: (addr list stmt) = stmts</span> +<span id="L11323" class="LineNr">11323 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11324" class="LineNr">11324 </span> { +<span id="L11325" class="LineNr">11325 </span> <span class="subxComment"># if (curr == 0) break</span> +<span id="L11326" class="LineNr">11326 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L11327" class="LineNr">11327 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11328" class="LineNr">11328 </span> <span class="subxComment"># if assigns-in-stmt?(curr->value, v) return true</span> +<span id="L11329" class="LineNr">11329 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L11330" class="LineNr">11330 </span> (<a href='mu.subx.html#L11347'>assigns-in-stmt?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L11331" class="LineNr">11331 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11332" class="LineNr">11332 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11333" class="LineNr">11333 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L11334" class="LineNr">11334 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L11335" class="LineNr">11335 </span> 89/<- %ecx 0/r32/eax +<span id="L11336" class="LineNr">11336 </span> <span class="subxComment">#</span> +<span id="L11337" class="LineNr">11337 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11338" class="LineNr">11338 </span> } +<span id="L11339" class="LineNr">11339 </span><span class="Constant">$assigns-in-stmts?:end</span>: +<span id="L11340" class="LineNr">11340 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11341" class="LineNr">11341 </span> 59/pop-to-ecx +<span id="L11342" class="LineNr">11342 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11343" class="LineNr">11343 </span> 89/<- %esp 5/r32/ebp +<span id="L11344" class="LineNr">11344 </span> 5d/pop-to-ebp +<span id="L11345" class="LineNr">11345 </span> c3/return +<span id="L11346" class="LineNr">11346 </span> +<span id="L11347" class="LineNr">11347 </span><span class="subxFunction">assigns-in-stmt?</span>: <span class="subxComment"># stmt: (addr stmt), v: (addr var) -> result/eax: boolean</span> +<span id="L11348" class="LineNr">11348 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11349" class="LineNr">11349 </span> 55/push-ebp +<span id="L11350" class="LineNr">11350 </span> 89/<- %ebp 4/r32/esp +<span id="L11351" class="LineNr">11351 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11352" class="LineNr">11352 </span> 51/push-ecx +<span id="L11353" class="LineNr">11353 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L11354" class="LineNr">11354 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11355" class="LineNr">11355 </span> <span class="subxComment"># if stmt is a stmt1, return assigns-in-stmt-vars?(stmt->outputs, v)</span> +<span id="L11356" class="LineNr">11356 </span> { +<span id="L11357" class="LineNr">11357 </span> 81 7/subop/compare *ecx 1/imm32/stmt1 <span class="subxComment"># Stmt-tag</span> +<span id="L11358" class="LineNr">11358 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11359" class="LineNr">11359 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L11360" class="LineNr">11360 </span> (<a href='mu.subx.html#L11381'>assigns-in-stmt-vars?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L11361" class="LineNr">11361 </span> eb/jump $assigns-in-stmt?:end/disp8 +<span id="L11362" class="LineNr">11362 </span> } +<span id="L11363" class="LineNr">11363 </span> <span class="subxComment"># if stmt is a block, return assigns-in-stmts?(stmt->stmts, v)</span> +<span id="L11364" class="LineNr">11364 </span> { +<span id="L11365" class="LineNr">11365 </span> 81 7/subop/compare *ecx 0/imm32/block <span class="subxComment"># Stmt-tag</span> +<span id="L11366" class="LineNr">11366 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11367" class="LineNr">11367 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> +<span id="L11368" class="LineNr">11368 </span> (<a href='mu.subx.html#L11316'>assigns-in-stmts?</a> %eax *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L11369" class="LineNr">11369 </span> eb/jump $assigns-in-stmt?:end/disp8 +<span id="L11370" class="LineNr">11370 </span> } +<span id="L11371" class="LineNr">11371 </span> <span class="subxComment"># otherwise return false</span> +<span id="L11372" class="LineNr">11372 </span> b8/copy 0/imm32/false +<span id="L11373" class="LineNr">11373 </span><span class="Constant">$assigns-in-stmt?:end</span>: +<span id="L11374" class="LineNr">11374 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11375" class="LineNr">11375 </span> 59/pop-to-ecx +<span id="L11376" class="LineNr">11376 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11377" class="LineNr">11377 </span> 89/<- %esp 5/r32/ebp +<span id="L11378" class="LineNr">11378 </span> 5d/pop-to-ebp +<span id="L11379" class="LineNr">11379 </span> c3/return +<span id="L11380" class="LineNr">11380 </span> +<span id="L11381" class="LineNr">11381 </span><span class="subxFunction">assigns-in-stmt-vars?</span>: <span class="subxComment"># stmt-var: (addr stmt-var), v: (addr var) -> result/eax: boolean</span> +<span id="L11382" class="LineNr">11382 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11383" class="LineNr">11383 </span> 55/push-ebp +<span id="L11384" class="LineNr">11384 </span> 89/<- %ebp 4/r32/esp +<span id="L11385" class="LineNr">11385 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11386" class="LineNr">11386 </span> 51/push-ecx +<span id="L11387" class="LineNr">11387 </span> <span class="subxComment"># var curr/ecx: (addr stmt-var) = stmt-var</span> +<span id="L11388" class="LineNr">11388 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11389" class="LineNr">11389 </span> { +<span id="L11390" class="LineNr">11390 </span> <span class="subxComment"># if (curr == 0) break</span> +<span id="L11391" class="LineNr">11391 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L11392" class="LineNr">11392 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11393" class="LineNr">11393 </span> <span class="subxComment"># eax = lookup(curr->value)</span> +<span id="L11394" class="LineNr">11394 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L11395" class="LineNr">11395 </span> <span class="subxComment"># if (eax == v && curr->is-deref? == false) return true</span> +<span id="L11396" class="LineNr">11396 </span> { +<span id="L11397" class="LineNr">11397 </span> 39/compare *(ebp+0xc) 0/r32/eax +<span id="L11398" class="LineNr">11398 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11399" class="LineNr">11399 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L11400" class="LineNr">11400 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11401" class="LineNr">11401 </span> b8/copy-to-eax 1/imm32/true +<span id="L11402" class="LineNr">11402 </span> eb/jump $assigns-in-stmt-vars?:end/disp8 +<span id="L11403" class="LineNr">11403 </span> } +<span id="L11404" class="LineNr">11404 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L11405" class="LineNr">11405 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L11406" class="LineNr">11406 </span> 89/<- %ecx 0/r32/eax +<span id="L11407" class="LineNr">11407 </span> <span class="subxComment">#</span> +<span id="L11408" class="LineNr">11408 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11409" class="LineNr">11409 </span> } +<span id="L11410" class="LineNr">11410 </span><span class="Constant">$assigns-in-stmt-vars?:end</span>: +<span id="L11411" class="LineNr">11411 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11412" class="LineNr">11412 </span> 59/pop-to-ecx +<span id="L11413" class="LineNr">11413 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11414" class="LineNr">11414 </span> 89/<- %esp 5/r32/ebp +<span id="L11415" class="LineNr">11415 </span> 5d/pop-to-ebp +<span id="L11416" class="LineNr">11416 </span> c3/return +<span id="L11417" class="LineNr">11417 </span> +<span id="L11418" class="LineNr">11418 </span><span class="subxComment"># is there a var before 'v' with the same block-depth and register on the 'vars' stack?</span> +<span id="L11419" class="LineNr">11419 </span><span class="subxComment"># v is guaranteed to be within vars</span> +<span id="L11420" class="LineNr">11420 </span><span class="subxComment"># 'start' is provided as an optimization, a pointer within vars</span> +<span id="L11421" class="LineNr">11421 </span><span class="subxComment"># *start == v</span> +<span id="L11422" class="LineNr">11422 </span><span class="subxFunction">same-register-spilled-before?</span>: <span class="subxComment"># v: (addr var), vars: (addr stack (handle var)), start: (addr var) -> result/eax: boolean</span> +<span id="L11423" class="LineNr">11423 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11424" class="LineNr">11424 </span> 55/push-ebp +<span id="L11425" class="LineNr">11425 </span> 89/<- %ebp 4/r32/esp +<span id="L11426" class="LineNr">11426 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11427" class="LineNr">11427 </span> 51/push-ecx +<span id="L11428" class="LineNr">11428 </span> 52/push-edx +<span id="L11429" class="LineNr">11429 </span> 53/push-ebx +<span id="L11430" class="LineNr">11430 </span> 56/push-esi +<span id="L11431" class="LineNr">11431 </span> 57/push-edi +<span id="L11432" class="LineNr">11432 </span> <span class="subxComment"># ecx = v</span> +<span id="L11433" class="LineNr">11433 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11434" class="LineNr">11434 </span> <span class="subxComment"># var reg/edx: (addr array byte) = lookup(v->register)</span> +<span id="L11435" class="LineNr">11435 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11436" class="LineNr">11436 </span> 89/<- %edx 0/r32/eax +<span id="L11437" class="LineNr">11437 </span> <span class="subxComment"># var depth/ebx: int = v->block-depth</span> +<span id="L11438" class="LineNr">11438 </span> 8b/-> *(ecx+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> +<span id="L11439" class="LineNr">11439 </span> <span class="subxComment"># var min/ecx: (addr handle var) = vars->data</span> +<span id="L11440" class="LineNr">11440 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L11441" class="LineNr">11441 </span> 81 0/subop/add %ecx 8/imm32 +<span id="L11442" class="LineNr">11442 </span> <span class="subxComment"># TODO: check that start >= min and start < &vars->data[top]</span> +<span id="L11443" class="LineNr">11443 </span> <span class="subxComment"># TODO: check that *start == v</span> +<span id="L11444" class="LineNr">11444 </span> <span class="subxComment"># var curr/esi: (addr handle var) = start</span> +<span id="L11445" class="LineNr">11445 </span> 8b/-> *(ebp+0x10) 6/r32/esi +<span id="L11446" class="LineNr">11446 </span> <span class="subxComment"># curr -= 8</span> +<span id="L11447" class="LineNr">11447 </span> 81 5/subop/subtract %esi 8/imm32 +<span id="L11448" class="LineNr">11448 </span> { +<span id="L11449" class="LineNr">11449 </span><span class="Constant">$same-register-spilled-before?:loop</span>: +<span id="L11450" class="LineNr">11450 </span> <span class="subxComment"># if (curr < min) break</span> +<span id="L11451" class="LineNr">11451 </span> 39/compare %esi 1/r32/ecx +<span id="L11452" class="LineNr">11452 </span> 0f 82/jump-if-addr< <span class="Constant">break</span>/disp32 +<span id="L11453" class="LineNr">11453 </span> <span class="subxComment"># var x/eax: (addr var) = lookup(*curr)</span> +<span id="L11454" class="LineNr">11454 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># => eax</span> +<span id="L11455" class="LineNr">11455 </span> <span class="subxComment"># if (x->block-depth < depth) break</span> +<span id="L11456" class="LineNr">11456 </span> 39/compare *(eax+0x10) 3/r32/ebx <span class="subxComment"># Var-block-depth</span> +<span id="L11457" class="LineNr">11457 </span> 0f 8c/jump-if-< <span class="Constant">break</span>/disp32 +<span id="L11458" class="LineNr">11458 </span> <span class="subxComment"># if (x->register == 0) continue</span> +<span id="L11459" class="LineNr">11459 </span> 81 7/subop/compare *(eax+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L11460" class="LineNr">11460 </span> 74/jump-if-= $same-register-spilled-before?:continue/disp8 +<span id="L11461" class="LineNr">11461 </span> <span class="subxComment"># if (x->register == reg) return true</span> +<span id="L11462" class="LineNr">11462 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11463" class="LineNr">11463 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %edx) <span class="subxComment"># => eax</span> +<span id="L11464" class="LineNr">11464 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11465" class="LineNr">11465 </span> b8/copy-to-eax 1/imm32/true +<span id="L11466" class="LineNr">11466 </span> 75/jump-if-!= $same-register-spilled-before?:end/disp8 +<span id="L11467" class="LineNr">11467 </span><span class="Constant">$same-register-spilled-before?:continue</span>: +<span id="L11468" class="LineNr">11468 </span> <span class="subxComment"># curr -= 8</span> +<span id="L11469" class="LineNr">11469 </span> 81 5/subop/subtract %esi 8/imm32 +<span id="L11470" class="LineNr">11470 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L11471" class="LineNr">11471 </span> } +<span id="L11472" class="LineNr">11472 </span><span class="Constant">$same-register-spilled-before?:false</span>: +<span id="L11473" class="LineNr">11473 </span> b8/copy-to-eax 0/imm32/false +<span id="L11474" class="LineNr">11474 </span><span class="Constant">$same-register-spilled-before?:end</span>: +<span id="L11475" class="LineNr">11475 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11476" class="LineNr">11476 </span> 5f/pop-to-edi +<span id="L11477" class="LineNr">11477 </span> 5e/pop-to-esi +<span id="L11478" class="LineNr">11478 </span> 5b/pop-to-ebx +<span id="L11479" class="LineNr">11479 </span> 5a/pop-to-edx +<span id="L11480" class="LineNr">11480 </span> 59/pop-to-ecx +<span id="L11481" class="LineNr">11481 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11482" class="LineNr">11482 </span> 89/<- %esp 5/r32/ebp +<span id="L11483" class="LineNr">11483 </span> 5d/pop-to-ebp +<span id="L11484" class="LineNr">11484 </span> c3/return +<span id="L11485" class="LineNr">11485 </span> +<span id="L11486" class="LineNr">11486 </span><span class="subxComment"># Clean up global state for 'vars' until some block depth (inclusive).</span> +<span id="L11487" class="LineNr">11487 </span><span class="subxComment">#</span> +<span id="L11488" class="LineNr">11488 </span><span class="subxComment"># This would be a simple series of pops, if it wasn't for fn outputs, which</span> +<span id="L11489" class="LineNr">11489 </span><span class="subxComment"># can occur anywhere in the stack.</span> +<span id="L11490" class="LineNr">11490 </span><span class="subxComment"># So we have to _compact_ the entire array underlying the stack.</span> +<span id="L11491" class="LineNr">11491 </span><span class="subxComment">#</span> +<span id="L11492" class="LineNr">11492 </span><span class="subxComment"># We want to allow a fn output register to be written to by locals before the</span> +<span id="L11493" class="LineNr">11493 </span><span class="subxComment"># output is set.</span> +<span id="L11494" class="LineNr">11494 </span><span class="subxComment"># So fn outputs can't just be pushed at the start of the function.</span> +<span id="L11495" class="LineNr">11495 </span><span class="subxComment">#</span> +<span id="L11496" class="LineNr">11496 </span><span class="subxComment"># We want to allow other locals to shadow a fn output register after the</span> +<span id="L11497" class="LineNr">11497 </span><span class="subxComment"># output is set.</span> +<span id="L11498" class="LineNr">11498 </span><span class="subxComment"># So the output can't just always override anything in the stack. Sequence matters.</span> +<span id="L11499" class="LineNr">11499 </span><span class="subxFunction">clean-up-blocks</span>: <span class="subxComment"># vars: (addr stack live-var), until-block-depth: int, fn: (addr function)</span> +<span id="L11500" class="LineNr">11500 </span> <span class="subxComment"># pseudocode:</span> +<span id="L11501" class="LineNr">11501 </span> <span class="subxComment"># to = vars->top (which points outside the stack)</span> +<span id="L11502" class="LineNr">11502 </span> <span class="subxComment"># while true</span> +<span id="L11503" class="LineNr">11503 </span> <span class="subxComment"># if to <= 0</span> +<span id="L11504" class="LineNr">11504 </span> <span class="subxComment"># break</span> +<span id="L11505" class="LineNr">11505 </span> <span class="subxComment"># var v = vars->data[to-1]</span> +<span id="L11506" class="LineNr">11506 </span> <span class="subxComment"># if v.depth < until and !in-function-outputs?(fn, v)</span> +<span id="L11507" class="LineNr">11507 </span> <span class="subxComment"># break</span> +<span id="L11508" class="LineNr">11508 </span> <span class="subxComment"># --to</span> +<span id="L11509" class="LineNr">11509 </span> <span class="subxComment"># from = to</span> +<span id="L11510" class="LineNr">11510 </span> <span class="subxComment"># while true</span> +<span id="L11511" class="LineNr">11511 </span> <span class="subxComment"># if from >= vars->top</span> +<span id="L11512" class="LineNr">11512 </span> <span class="subxComment"># break</span> +<span id="L11513" class="LineNr">11513 </span> <span class="subxComment"># assert(from >= to)</span> +<span id="L11514" class="LineNr">11514 </span> <span class="subxComment"># v = vars->data[from]</span> +<span id="L11515" class="LineNr">11515 </span> <span class="subxComment"># if in-function-outputs?(fn, v)</span> +<span id="L11516" class="LineNr">11516 </span> <span class="subxComment"># if from > to</span> +<span id="L11517" class="LineNr">11517 </span> <span class="subxComment"># vars->data[to] = vars->data[from]</span> +<span id="L11518" class="LineNr">11518 </span> <span class="subxComment"># ++to</span> +<span id="L11519" class="LineNr">11519 </span> <span class="subxComment"># ++from</span> +<span id="L11520" class="LineNr">11520 </span> <span class="subxComment"># vars->top = to</span> +<span id="L11521" class="LineNr">11521 </span> <span class="subxComment">#</span> +<span id="L11522" class="LineNr">11522 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11523" class="LineNr">11523 </span> 55/push-ebp +<span id="L11524" class="LineNr">11524 </span> 89/<- %ebp 4/r32/esp +<span id="L11525" class="LineNr">11525 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11526" class="LineNr">11526 </span> 50/push-eax +<span id="L11527" class="LineNr">11527 </span> 52/push-edx +<span id="L11528" class="LineNr">11528 </span> 53/push-ebx +<span id="L11529" class="LineNr">11529 </span> 56/push-esi +<span id="L11530" class="LineNr">11530 </span> 57/push-edi +<span id="L11531" class="LineNr">11531 </span> <span class="subxComment"># ebx = vars</span> +<span id="L11532" class="LineNr">11532 </span> 8b/-> *(ebp+8) 3/r32/ebx +<span id="L11533" class="LineNr">11533 </span> <span class="subxComment"># edx = until-block-depth</span> +<span id="L11534" class="LineNr">11534 </span> 8b/-> *(ebp+0xc) 2/r32/edx +<span id="L11535" class="LineNr">11535 </span><span class="Constant">$clean-up-blocks:phase1</span>: +<span id="L11536" class="LineNr">11536 </span> <span class="subxComment"># var to/edi: int = vars->top</span> +<span id="L11537" class="LineNr">11537 </span> 8b/-> *ebx 7/r32/edi +<span id="L11538" class="LineNr">11538 </span> { +<span id="L11539" class="LineNr">11539 </span><span class="Constant">$clean-up-blocks:loop1</span>: +<span id="L11540" class="LineNr">11540 </span> <span class="subxComment"># if (to <= 0) break</span> +<span id="L11541" class="LineNr">11541 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L11542" class="LineNr">11542 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 +<span id="L11543" class="LineNr">11543 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(vars->data[to-1]->var)</span> +<span id="L11544" class="LineNr">11544 </span> 8d/copy-address *(ebx+edi-4) 0/r32/eax <span class="subxComment"># vars + 8 + to - 12</span> +<span id="L11545" class="LineNr">11545 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L11546" class="LineNr">11546 </span> <span class="subxComment"># if (v->block-depth >= until-block-depth) continue</span> +<span id="L11547" class="LineNr">11547 </span> 39/compare *(eax+0x10) 2/r32/edx <span class="subxComment"># Var-block-depth</span> <span id="L11548" class="LineNr">11548 </span> { -<span id="L11549" class="LineNr">11549 </span> 39/compare %esi 7/r32/edi -<span id="L11550" class="LineNr">11550 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 -<span id="L11551" class="LineNr">11551 </span> 56/push-esi -<span id="L11552" class="LineNr">11552 </span> 57/push-edi -<span id="L11553" class="LineNr">11553 </span> <span class="subxS1Comment"># . var from/esi: (addr byte) = &vars->data[from]</span> -<span id="L11554" class="LineNr">11554 </span> 8d/copy-address *(ebx+esi+8) 6/r32/esi -<span id="L11555" class="LineNr">11555 </span> <span class="subxS1Comment"># . var to/edi: (addr byte) = &vars->data[to]</span> -<span id="L11556" class="LineNr">11556 </span> 8d/copy-address *(ebx+edi+8) 7/r32/edi -<span id="L11557" class="LineNr">11557 </span> <span class="subxS1Comment"># .</span> -<span id="L11558" class="LineNr">11558 </span> 8b/-> *esi 0/r32/eax -<span id="L11559" class="LineNr">11559 </span> 89/<- *edi 0/r32/eax -<span id="L11560" class="LineNr">11560 </span> 8b/-> *(esi+4) 0/r32/eax -<span id="L11561" class="LineNr">11561 </span> 89/<- *(edi+4) 0/r32/eax -<span id="L11562" class="LineNr">11562 </span> 8b/-> *(esi+8) 0/r32/eax -<span id="L11563" class="LineNr">11563 </span> 89/<- *(edi+8) 0/r32/eax -<span id="L11564" class="LineNr">11564 </span> 5f/pop-to-edi -<span id="L11565" class="LineNr">11565 </span> 5e/pop-to-esi -<span id="L11566" class="LineNr">11566 </span> } -<span id="L11567" class="LineNr">11567 </span> <span class="subxComment"># ++to</span> -<span id="L11568" class="LineNr">11568 </span> 81 0/subop/add %edi 0xc/imm32 -<span id="L11569" class="LineNr">11569 </span><span class="Constant">$clean-up-blocks:loop2-continue</span>: -<span id="L11570" class="LineNr">11570 </span> <span class="subxComment"># ++from</span> -<span id="L11571" class="LineNr">11571 </span> 81 0/subop/add %esi 0xc/imm32 -<span id="L11572" class="LineNr">11572 </span> <span class="subxComment">#</span> -<span id="L11573" class="LineNr">11573 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11574" class="LineNr">11574 </span> } -<span id="L11575" class="LineNr">11575 </span> 89/<- *ebx 7/r32/edi -<span id="L11576" class="LineNr">11576 </span><span class="Constant">$clean-up-blocks:end</span>: -<span id="L11577" class="LineNr">11577 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11578" class="LineNr">11578 </span> 5f/pop-to-edi -<span id="L11579" class="LineNr">11579 </span> 5e/pop-to-esi -<span id="L11580" class="LineNr">11580 </span> 5b/pop-to-ebx -<span id="L11581" class="LineNr">11581 </span> 5a/pop-to-edx -<span id="L11582" class="LineNr">11582 </span> 58/pop-to-eax -<span id="L11583" class="LineNr">11583 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11584" class="LineNr">11584 </span> 89/<- %esp 5/r32/ebp -<span id="L11585" class="LineNr">11585 </span> 5d/pop-to-ebp -<span id="L11586" class="LineNr">11586 </span> c3/return -<span id="L11587" class="LineNr">11587 </span> -<span id="L11588" class="LineNr">11588 </span><span class="subxFunction">in-function-outputs?</span>: <span class="subxComment"># fn: (addr function), target: (addr var) -> result/eax: boolean</span> -<span id="L11589" class="LineNr">11589 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11590" class="LineNr">11590 </span> 55/push-ebp -<span id="L11591" class="LineNr">11591 </span> 89/<- %ebp 4/r32/esp -<span id="L11592" class="LineNr">11592 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11593" class="LineNr">11593 </span> 51/push-ecx -<span id="L11594" class="LineNr">11594 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> -<span id="L11595" class="LineNr">11595 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L11596" class="LineNr">11596 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> -<span id="L11597" class="LineNr">11597 </span> 89/<- %ecx 0/r32/eax -<span id="L11598" class="LineNr">11598 </span> <span class="subxComment"># while curr != null</span> -<span id="L11599" class="LineNr">11599 </span> { -<span id="L11600" class="LineNr">11600 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L11601" class="LineNr">11601 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11602" class="LineNr">11602 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(curr->value)</span> -<span id="L11603" class="LineNr">11603 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L11604" class="LineNr">11604 </span> <span class="subxComment"># if (v == target) return true</span> -<span id="L11605" class="LineNr">11605 </span> 39/compare *(ebp+0xc) 0/r32/eax -<span id="L11606" class="LineNr">11606 </span> b8/copy-to-eax 1/imm32/true -<span id="L11607" class="LineNr">11607 </span> 74/jump-if-= $in-function-outputs?:end/disp8 -<span id="L11608" class="LineNr">11608 </span> <span class="subxComment"># curr = curr->next</span> -<span id="L11609" class="LineNr">11609 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L11610" class="LineNr">11610 </span> 89/<- %ecx 0/r32/eax -<span id="L11611" class="LineNr">11611 </span> <span class="subxComment">#</span> -<span id="L11612" class="LineNr">11612 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11613" class="LineNr">11613 </span> } -<span id="L11614" class="LineNr">11614 </span> b8/copy-to-eax 0/imm32 -<span id="L11615" class="LineNr">11615 </span><span class="Constant">$in-function-outputs?:end</span>: -<span id="L11616" class="LineNr">11616 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11617" class="LineNr">11617 </span> 59/pop-to-ecx -<span id="L11618" class="LineNr">11618 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11619" class="LineNr">11619 </span> 89/<- %esp 5/r32/ebp -<span id="L11620" class="LineNr">11620 </span> 5d/pop-to-ebp -<span id="L11621" class="LineNr">11621 </span> c3/return -<span id="L11622" class="LineNr">11622 </span> -<span id="L11623" class="LineNr">11623 </span><span class="subxFunction">emit-subx-var-def</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> -<span id="L11624" class="LineNr">11624 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11625" class="LineNr">11625 </span> 55/push-ebp -<span id="L11626" class="LineNr">11626 </span> 89/<- %ebp 4/r32/esp -<span id="L11627" class="LineNr">11627 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11628" class="LineNr">11628 </span> 50/push-eax -<span id="L11629" class="LineNr">11629 </span> 51/push-ecx -<span id="L11630" class="LineNr">11630 </span> 52/push-edx -<span id="L11631" class="LineNr">11631 </span> <span class="subxComment"># eax = stmt</span> -<span id="L11632" class="LineNr">11632 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L11633" class="LineNr">11633 </span> <span class="subxComment"># var v/ecx: (addr var)</span> -<span id="L11634" class="LineNr">11634 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Vardef-var Vardef-var => eax</span> -<span id="L11635" class="LineNr">11635 </span> 89/<- %ecx 0/r32/eax -<span id="L11636" class="LineNr">11636 </span> <span class="subxComment"># v->block-depth = *Curr-block-depth</span> -<span id="L11637" class="LineNr">11637 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax -<span id="L11638" class="LineNr">11638 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> -<span id="L11639" class="LineNr">11639 </span> <span class="subxComment"># var n/edx: int = size-of(stmt->var)</span> -<span id="L11640" class="LineNr">11640 </span> (<a href='mu.subx.html#L10128'>size-of</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L11641" class="LineNr">11641 </span> 89/<- %edx 0/r32/eax -<span id="L11642" class="LineNr">11642 </span> <span class="subxComment"># *Curr-local-stack-offset -= n</span> -<span id="L11643" class="LineNr">11643 </span> 29/subtract-from *<span class="SpecialChar"><a href='mu.subx.html#L10390'>Curr-local-stack-offset</a></span> 2/r32/edx -<span id="L11644" class="LineNr">11644 </span> <span class="subxComment"># v->offset = *Curr-local-stack-offset</span> -<span id="L11645" class="LineNr">11645 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L10390'>Curr-local-stack-offset</a></span> 0/r32/eax -<span id="L11646" class="LineNr">11646 </span> 89/<- *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> -<span id="L11647" class="LineNr">11647 </span> <span class="subxComment"># if v is an array, do something special</span> -<span id="L11648" class="LineNr">11648 </span> { -<span id="L11649" class="LineNr">11649 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L11650" class="LineNr">11650 </span> (<a href='mu.subx.html#L10209'>is-mu-array?</a> %eax) <span class="subxComment"># => eax</span> -<span id="L11651" class="LineNr">11651 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11652" class="LineNr">11652 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11653" class="LineNr">11653 </span> <span class="subxComment"># var array-size-without-size/edx: int = n-4</span> -<span id="L11654" class="LineNr">11654 </span> 81 5/subop/subtract %edx 4/imm32 -<span id="L11655" class="LineNr">11655 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11656" class="LineNr">11656 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"(<a href='../101stack_allocate.subx.html#L34'>push-n-zero-bytes</a> "</span>) -<span id="L11657" class="LineNr">11657 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) -<span id="L11658" class="LineNr">11658 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")\n"</span>) -<span id="L11659" class="LineNr">11659 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11660" class="LineNr">11660 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"68/push "</span>) -<span id="L11661" class="LineNr">11661 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) -<span id="L11662" class="LineNr">11662 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) -<span id="L11663" class="LineNr">11663 </span> eb/jump $emit-subx-var-def:end/disp8 -<span id="L11664" class="LineNr">11664 </span> } -<span id="L11665" class="LineNr">11665 </span> <span class="subxComment"># while n > 0</span> -<span id="L11666" class="LineNr">11666 </span> { -<span id="L11667" class="LineNr">11667 </span> 81 7/subop/compare %edx 0/imm32 -<span id="L11668" class="LineNr">11668 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 -<span id="L11669" class="LineNr">11669 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11670" class="LineNr">11670 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"68/push 0/imm32\n"</span>) -<span id="L11671" class="LineNr">11671 </span> <span class="subxComment"># n -= 4</span> -<span id="L11672" class="LineNr">11672 </span> 81 5/subop/subtract %edx 4/imm32 -<span id="L11673" class="LineNr">11673 </span> <span class="subxComment">#</span> -<span id="L11674" class="LineNr">11674 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L11675" class="LineNr">11675 </span> } -<span id="L11676" class="LineNr">11676 </span><span class="Constant">$emit-subx-var-def:end</span>: -<span id="L11677" class="LineNr">11677 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11678" class="LineNr">11678 </span> 5a/pop-to-edx -<span id="L11679" class="LineNr">11679 </span> 59/pop-to-ecx -<span id="L11680" class="LineNr">11680 </span> 58/pop-to-eax -<span id="L11681" class="LineNr">11681 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11682" class="LineNr">11682 </span> 89/<- %esp 5/r32/ebp -<span id="L11683" class="LineNr">11683 </span> 5d/pop-to-ebp -<span id="L11684" class="LineNr">11684 </span> c3/return -<span id="L11685" class="LineNr">11685 </span> -<span id="L11686" class="LineNr">11686 </span><span class="subxFunction">emit-subx-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), primitives: (addr primitive), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L11687" class="LineNr">11687 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11688" class="LineNr">11688 </span> 55/push-ebp -<span id="L11689" class="LineNr">11689 </span> 89/<- %ebp 4/r32/esp -<span id="L11690" class="LineNr">11690 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11691" class="LineNr">11691 </span> 50/push-eax -<span id="L11692" class="LineNr">11692 </span> 51/push-ecx -<span id="L11693" class="LineNr">11693 </span> <span class="subxH1Comment"># - some special-case primitives that don't actually use the 'primitives' data structure</span> -<span id="L11694" class="LineNr">11694 </span> <span class="subxComment"># var op/ecx: (addr array byte) = lookup(stmt->operation)</span> -<span id="L11695" class="LineNr">11695 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L11696" class="LineNr">11696 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L11697" class="LineNr">11697 </span> 89/<- %ecx 0/r32/eax -<span id="L11698" class="LineNr">11698 </span> <span class="subxComment"># array size</span> -<span id="L11699" class="LineNr">11699 </span> { -<span id="L11700" class="LineNr">11700 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "length")) break</span> -<span id="L11701" class="LineNr">11701 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"length"</span>) <span class="subxComment"># => eax</span> -<span id="L11702" class="LineNr">11702 </span> 3d/compare-eax-and 0/imm32 -<span id="L11703" class="LineNr">11703 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11704" class="LineNr">11704 </span> (<a href='mu.subx.html#L11758'>translate-mu-length-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) -<span id="L11705" class="LineNr">11705 </span> e9/jump $emit-subx-stmt:end/disp32 -<span id="L11706" class="LineNr">11706 </span> } -<span id="L11707" class="LineNr">11707 </span> <span class="subxComment"># index into array</span> -<span id="L11708" class="LineNr">11708 </span> { -<span id="L11709" class="LineNr">11709 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "index")) break</span> -<span id="L11710" class="LineNr">11710 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"index"</span>) <span class="subxComment"># => eax</span> -<span id="L11711" class="LineNr">11711 </span> 3d/compare-eax-and 0/imm32 -<span id="L11712" class="LineNr">11712 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11713" class="LineNr">11713 </span> (<a href='mu.subx.html#L11978'>translate-mu-index-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) -<span id="L11714" class="LineNr">11714 </span> e9/jump $emit-subx-stmt:end/disp32 -<span id="L11715" class="LineNr">11715 </span> } -<span id="L11716" class="LineNr">11716 </span> <span class="subxComment"># compute-offset for index into array</span> -<span id="L11717" class="LineNr">11717 </span> { -<span id="L11718" class="LineNr">11718 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "compute-offset")) break</span> -<span id="L11719" class="LineNr">11719 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"compute-offset"</span>) <span class="subxComment"># => eax</span> -<span id="L11720" class="LineNr">11720 </span> 3d/compare-eax-and 0/imm32 -<span id="L11721" class="LineNr">11721 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11722" class="LineNr">11722 </span> (<a href='mu.subx.html#L12261'>translate-mu-compute-index-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) -<span id="L11723" class="LineNr">11723 </span> e9/jump $emit-subx-stmt:end/disp32 -<span id="L11724" class="LineNr">11724 </span> } -<span id="L11725" class="LineNr">11725 </span> <span class="subxComment"># get field from record</span> -<span id="L11726" class="LineNr">11726 </span> { -<span id="L11727" class="LineNr">11727 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "get")) break</span> -<span id="L11728" class="LineNr">11728 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"get"</span>) <span class="subxComment"># => eax</span> -<span id="L11729" class="LineNr">11729 </span> 3d/compare-eax-and 0/imm32 -<span id="L11730" class="LineNr">11730 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L11731" class="LineNr">11731 </span> (<a href='mu.subx.html#L12309'>translate-mu-get-stmt</a> *(ebp+8) *(ebp+0xc)) -<span id="L11732" class="LineNr">11732 </span> e9/jump $emit-subx-stmt:end/disp32 -<span id="L11733" class="LineNr">11733 </span> } -<span id="L11734" class="LineNr">11734 </span> <span class="subxH1Comment"># - if stmt matches a primitive, emit it</span> -<span id="L11735" class="LineNr">11735 </span> { -<span id="L11736" class="LineNr">11736 </span><span class="Constant">$emit-subx-stmt:check-for-primitive</span>: -<span id="L11737" class="LineNr">11737 </span> <span class="subxComment"># var curr/eax: (addr primitive)</span> -<span id="L11738" class="LineNr">11738 </span> (<a href='mu.subx.html#L16055'>find-matching-primitive</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># primitives, stmt => eax</span> -<span id="L11739" class="LineNr">11739 </span> 3d/compare-eax-and 0/imm32 -<span id="L11740" class="LineNr">11740 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11741" class="LineNr">11741 </span><span class="Constant">$emit-subx-stmt:primitive</span>: -<span id="L11742" class="LineNr">11742 </span> (<a href='mu.subx.html#L15604'>emit-subx-primitive</a> *(ebp+8) *(ebp+0xc) %eax) <span class="subxComment"># out, stmt, curr</span> -<span id="L11743" class="LineNr">11743 </span> e9/jump $emit-subx-stmt:end/disp32 -<span id="L11744" class="LineNr">11744 </span> } -<span id="L11745" class="LineNr">11745 </span> <span class="subxH1Comment"># - otherwise emit a call</span> -<span id="L11746" class="LineNr">11746 </span> <span class="subxComment"># TODO: type-checking</span> -<span id="L11747" class="LineNr">11747 </span><span class="Constant">$emit-subx-stmt:call</span>: -<span id="L11748" class="LineNr">11748 </span> (<a href='mu.subx.html#L15806'>emit-call</a> *(ebp+8) *(ebp+0xc)) -<span id="L11749" class="LineNr">11749 </span><span class="Constant">$emit-subx-stmt:end</span>: -<span id="L11750" class="LineNr">11750 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11751" class="LineNr">11751 </span> 59/pop-to-ecx -<span id="L11752" class="LineNr">11752 </span> 58/pop-to-eax -<span id="L11753" class="LineNr">11753 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11754" class="LineNr">11754 </span> 89/<- %esp 5/r32/ebp -<span id="L11755" class="LineNr">11755 </span> 5d/pop-to-ebp -<span id="L11756" class="LineNr">11756 </span> c3/return -<span id="L11757" class="LineNr">11757 </span> -<span id="L11758" class="LineNr">11758 </span><span class="subxFunction">translate-mu-length-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L11759" class="LineNr">11759 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11760" class="LineNr">11760 </span> 55/push-ebp -<span id="L11761" class="LineNr">11761 </span> 89/<- %ebp 4/r32/esp -<span id="L11762" class="LineNr">11762 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11763" class="LineNr">11763 </span> 50/push-eax -<span id="L11764" class="LineNr">11764 </span> 51/push-ecx -<span id="L11765" class="LineNr">11765 </span> 52/push-edx -<span id="L11766" class="LineNr">11766 </span> 53/push-ebx -<span id="L11767" class="LineNr">11767 </span> 56/push-esi -<span id="L11768" class="LineNr">11768 </span> <span class="subxComment"># esi = stmt</span> -<span id="L11769" class="LineNr">11769 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L11770" class="LineNr">11770 </span> <span class="subxComment"># var base/ebx: (addr var) = stmt->inouts[0]->value</span> -<span id="L11771" class="LineNr">11771 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L11772" class="LineNr">11772 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L11773" class="LineNr">11773 </span> 89/<- %ebx 0/r32/eax -<span id="L11774" class="LineNr">11774 </span> <span class="subxComment"># var elemsize/ecx: int = array-element-size(base)</span> -<span id="L11775" class="LineNr">11775 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L11776" class="LineNr">11776 </span> 89/<- %ecx 0/r32/eax -<span id="L11777" class="LineNr">11777 </span> <span class="subxComment"># var outreg/edx: (addr array byte) = stmt->outputs[0]->value->register</span> -<span id="L11778" class="LineNr">11778 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x14) *(esi+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L11779" class="LineNr">11779 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L11780" class="LineNr">11780 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11781" class="LineNr">11781 </span> 89/<- %edx 0/r32/eax -<span id="L11782" class="LineNr">11782 </span> <span class="subxComment"># if elemsize == 1</span> -<span id="L11783" class="LineNr">11783 </span> { -<span id="L11784" class="LineNr">11784 </span> 81 7/subop/compare %ecx 1/imm32 -<span id="L11785" class="LineNr">11785 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11786" class="LineNr">11786 </span><span class="Constant">$translate-mu-length-stmt:size-1</span>: -<span id="L11787" class="LineNr">11787 </span> (<a href='mu.subx.html#L11913'>emit-save-size-to</a> *(ebp+8) %ebx %edx) -<span id="L11788" class="LineNr">11788 </span> e9/jump $translate-mu-length-stmt:end/disp32 -<span id="L11789" class="LineNr">11789 </span> } -<span id="L11790" class="LineNr">11790 </span> <span class="subxComment"># if elemsize is a power of 2 less than 256</span> -<span id="L11791" class="LineNr">11791 </span> { -<span id="L11792" class="LineNr">11792 </span> (<a href='mu.subx.html#L12469'>power-of-2?</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L11793" class="LineNr">11793 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11794" class="LineNr">11794 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11795" class="LineNr">11795 </span> 81 7/subop/compare %ecx 0xff/imm32 -<span id="L11796" class="LineNr">11796 </span> 7f/jump-if-> <span class="Constant">break</span>/disp8 -<span id="L11797" class="LineNr">11797 </span><span class="Constant">$translate-mu-length-stmt:size-power-of-2</span>: -<span id="L11798" class="LineNr">11798 </span> (<a href='mu.subx.html#L11913'>emit-save-size-to</a> *(ebp+8) %ebx %edx) -<span id="L11799" class="LineNr">11799 </span> (<a href='mu.subx.html#L11956'>emit-divide-by-shift-right</a> *(ebp+8) %edx %ecx) -<span id="L11800" class="LineNr">11800 </span> e9/jump $translate-mu-length-stmt:end/disp32 -<span id="L11801" class="LineNr">11801 </span> } -<span id="L11802" class="LineNr">11802 </span> <span class="subxComment"># otherwise, the complex case</span> -<span id="L11803" class="LineNr">11803 </span> <span class="subxS1Comment"># . emit register spills</span> -<span id="L11804" class="LineNr">11804 </span> { -<span id="L11805" class="LineNr">11805 </span><span class="Constant">$translate-mu-length-stmt:complex</span>: -<span id="L11806" class="LineNr">11806 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> -<span id="L11807" class="LineNr">11807 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11808" class="LineNr">11808 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11809" class="LineNr">11809 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11810" class="LineNr">11810 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"50/push-eax\n"</span>) -<span id="L11811" class="LineNr">11811 </span> } -<span id="L11812" class="LineNr">11812 </span> { -<span id="L11813" class="LineNr">11813 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"ecx"</span>) <span class="subxComment"># => eax</span> -<span id="L11814" class="LineNr">11814 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11815" class="LineNr">11815 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11816" class="LineNr">11816 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11817" class="LineNr">11817 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"51/push-ecx\n"</span>) -<span id="L11818" class="LineNr">11818 </span> } -<span id="L11819" class="LineNr">11819 </span> { -<span id="L11820" class="LineNr">11820 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"edx"</span>) <span class="subxComment"># => eax</span> -<span id="L11821" class="LineNr">11821 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11822" class="LineNr">11822 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11823" class="LineNr">11823 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11824" class="LineNr">11824 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"52/push-edx\n"</span>) -<span id="L11825" class="LineNr">11825 </span> } -<span id="L11826" class="LineNr">11826 </span> <span class="subxS1Comment"># .</span> -<span id="L11827" class="LineNr">11827 </span> (<a href='mu.subx.html#L11913'>emit-save-size-to</a> *(ebp+8) %ebx <span class="Constant">"eax"</span>) -<span id="L11828" class="LineNr">11828 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11829" class="LineNr">11829 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"31/xor %edx 2/r32/edx\n"</span>) -<span id="L11830" class="LineNr">11830 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11831" class="LineNr">11831 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"b9/copy-to-ecx "</span>) -<span id="L11832" class="LineNr">11832 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %ecx) -<span id="L11833" class="LineNr">11833 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) -<span id="L11834" class="LineNr">11834 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11835" class="LineNr">11835 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"f7 7/subop/idiv-eax-edx-by %ecx\n"</span>) -<span id="L11836" class="LineNr">11836 </span> { -<span id="L11837" class="LineNr">11837 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> -<span id="L11838" class="LineNr">11838 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11839" class="LineNr">11839 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11840" class="LineNr">11840 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11841" class="LineNr">11841 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"89/<- %"</span>) -<span id="L11842" class="LineNr">11842 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %edx) -<span id="L11843" class="LineNr">11843 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 0/r32/eax\n"</span>) -<span id="L11844" class="LineNr">11844 </span> } -<span id="L11845" class="LineNr">11845 </span> <span class="subxS1Comment"># . emit register restores</span> -<span id="L11846" class="LineNr">11846 </span> { -<span id="L11847" class="LineNr">11847 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"edx"</span>) <span class="subxComment"># => eax</span> -<span id="L11848" class="LineNr">11848 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11849" class="LineNr">11849 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11850" class="LineNr">11850 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11851" class="LineNr">11851 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"5a/pop-to-edx\n"</span>) -<span id="L11852" class="LineNr">11852 </span> } -<span id="L11853" class="LineNr">11853 </span> { -<span id="L11854" class="LineNr">11854 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"ecx"</span>) <span class="subxComment"># => eax</span> -<span id="L11855" class="LineNr">11855 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11856" class="LineNr">11856 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11857" class="LineNr">11857 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11858" class="LineNr">11858 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"59/pop-to-ecx\n"</span>) -<span id="L11859" class="LineNr">11859 </span> } -<span id="L11860" class="LineNr">11860 </span> { -<span id="L11861" class="LineNr">11861 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> -<span id="L11862" class="LineNr">11862 </span> 3d/compare-eax-and 0/imm32/false -<span id="L11863" class="LineNr">11863 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 -<span id="L11864" class="LineNr">11864 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11865" class="LineNr">11865 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"58/pop-to-eax\n"</span>) -<span id="L11866" class="LineNr">11866 </span> } -<span id="L11867" class="LineNr">11867 </span><span class="Constant">$translate-mu-length-stmt:end</span>: -<span id="L11868" class="LineNr">11868 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11869" class="LineNr">11869 </span> 5e/pop-to-esi -<span id="L11870" class="LineNr">11870 </span> 5b/pop-to-ebx -<span id="L11871" class="LineNr">11871 </span> 5a/pop-to-edx -<span id="L11872" class="LineNr">11872 </span> 59/pop-to-ecx -<span id="L11873" class="LineNr">11873 </span> 58/pop-to-eax -<span id="L11874" class="LineNr">11874 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11875" class="LineNr">11875 </span> 89/<- %esp 5/r32/ebp -<span id="L11876" class="LineNr">11876 </span> 5d/pop-to-ebp -<span id="L11877" class="LineNr">11877 </span> c3/return -<span id="L11878" class="LineNr">11878 </span> -<span id="L11879" class="LineNr">11879 </span><span class="subxFunction">array-element-size</span>: <span class="subxComment"># arr: (addr var), err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: int</span> -<span id="L11880" class="LineNr">11880 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11881" class="LineNr">11881 </span> 55/push-ebp -<span id="L11882" class="LineNr">11882 </span> 89/<- %ebp 4/r32/esp -<span id="L11883" class="LineNr">11883 </span> <span class="subxComment">#</span> -<span id="L11884" class="LineNr">11884 </span> (<a href='mu.subx.html#L12371'>array-element-type-id</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L11885" class="LineNr">11885 </span> (<a href='mu.subx.html#L11892'>size-of-type-id-as-array-element</a> %eax) <span class="subxComment"># => eax</span> -<span id="L11886" class="LineNr">11886 </span><span class="Constant">$array-element-size:end</span>: -<span id="L11887" class="LineNr">11887 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11888" class="LineNr">11888 </span> 89/<- %esp 5/r32/ebp -<span id="L11889" class="LineNr">11889 </span> 5d/pop-to-ebp -<span id="L11890" class="LineNr">11890 </span> c3/return -<span id="L11891" class="LineNr">11891 </span> -<span id="L11892" class="LineNr">11892 </span><span class="subxFunction">size-of-type-id-as-array-element</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> -<span id="L11893" class="LineNr">11893 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11894" class="LineNr">11894 </span> 55/push-ebp -<span id="L11895" class="LineNr">11895 </span> 89/<- %ebp 4/r32/esp -<span id="L11896" class="LineNr">11896 </span> <span class="subxComment"># eax = t</span> -<span id="L11897" class="LineNr">11897 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L11898" class="LineNr">11898 </span> <span class="subxComment"># if t is 'byte', size is 1</span> -<span id="L11899" class="LineNr">11899 </span> 3d/compare-eax-and 8/imm32/byte -<span id="L11900" class="LineNr">11900 </span> { -<span id="L11901" class="LineNr">11901 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L11902" class="LineNr">11902 </span> b8/copy-to-eax 1/imm32 -<span id="L11903" class="LineNr">11903 </span> eb/jump $array-element-size:end/disp8 -<span id="L11904" class="LineNr">11904 </span> } -<span id="L11905" class="LineNr">11905 </span> <span class="subxComment"># otherwise proceed as usual</span> -<span id="L11906" class="LineNr">11906 </span> (<a href='mu.subx.html#L10271'>size-of-type-id</a> %eax) <span class="subxComment"># => eax</span> -<span id="L11907" class="LineNr">11907 </span><span class="Constant">$size-of-type-id-as-array-element:end</span>: -<span id="L11908" class="LineNr">11908 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11909" class="LineNr">11909 </span> 89/<- %esp 5/r32/ebp -<span id="L11910" class="LineNr">11910 </span> 5d/pop-to-ebp -<span id="L11911" class="LineNr">11911 </span> c3/return -<span id="L11912" class="LineNr">11912 </span> -<span id="L11913" class="LineNr">11913 </span><span class="subxFunction">emit-save-size-to</span>: <span class="subxComment"># out: (addr buffered-file), base: (addr var), outreg: (addr array byte)</span> -<span id="L11914" class="LineNr">11914 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11915" class="LineNr">11915 </span> 55/push-ebp -<span id="L11916" class="LineNr">11916 </span> 89/<- %ebp 4/r32/esp -<span id="L11917" class="LineNr">11917 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11918" class="LineNr">11918 </span> 50/push-eax -<span id="L11919" class="LineNr">11919 </span> 53/push-ebx -<span id="L11920" class="LineNr">11920 </span> <span class="subxComment"># ebx = base</span> -<span id="L11921" class="LineNr">11921 </span> 8b/-> *(ebp+0xc) 3/r32/ebx -<span id="L11922" class="LineNr">11922 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11923" class="LineNr">11923 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8b/-> *"</span>) -<span id="L11924" class="LineNr">11924 </span> <span class="subxComment"># if base is an (addr array ...) in a register</span> -<span id="L11925" class="LineNr">11925 </span> { -<span id="L11926" class="LineNr">11926 </span> 81 7/subop/compare *(ebx+0x18)) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L11927" class="LineNr">11927 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11928" class="LineNr">11928 </span><span class="Constant">$emit-save-size-to:emit-base-from-register</span>: -<span id="L11929" class="LineNr">11929 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L11930" class="LineNr">11930 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L11931" class="LineNr">11931 </span> eb/jump $emit-save-size-to:emit-output/disp8 -<span id="L11932" class="LineNr">11932 </span> } -<span id="L11933" class="LineNr">11933 </span> <span class="subxComment"># otherwise if base is an (array ...) on the stack</span> -<span id="L11934" class="LineNr">11934 </span> { -<span id="L11935" class="LineNr">11935 </span> 81 7/subop/compare *(ebx+0x14)) 0/imm32 <span class="subxComment"># Var-offset</span> -<span id="L11936" class="LineNr">11936 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11937" class="LineNr">11937 </span><span class="Constant">$emit-save-size-to:emit-base-from-stack</span>: -<span id="L11938" class="LineNr">11938 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"(ebp+"</span>) -<span id="L11939" class="LineNr">11939 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *(ebx+0x14)) <span class="subxComment"># Var-offset</span> -<span id="L11940" class="LineNr">11940 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) -<span id="L11941" class="LineNr">11941 </span> } -<span id="L11942" class="LineNr">11942 </span><span class="Constant">$emit-save-size-to:emit-output</span>: -<span id="L11943" class="LineNr">11943 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" "</span>) -<span id="L11944" class="LineNr">11944 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> *(ebp+0x10) 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax</span> -<span id="L11945" class="LineNr">11945 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L11946" class="LineNr">11946 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) -<span id="L11947" class="LineNr">11947 </span><span class="Constant">$emit-save-size-to:end</span>: -<span id="L11948" class="LineNr">11948 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11949" class="LineNr">11949 </span> 5b/pop-to-ebx -<span id="L11950" class="LineNr">11950 </span> 58/pop-to-eax -<span id="L11951" class="LineNr">11951 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11952" class="LineNr">11952 </span> 89/<- %esp 5/r32/ebp -<span id="L11953" class="LineNr">11953 </span> 5d/pop-to-ebp -<span id="L11954" class="LineNr">11954 </span> c3/return -<span id="L11955" class="LineNr">11955 </span> -<span id="L11956" class="LineNr">11956 </span><span class="subxFunction">emit-divide-by-shift-right</span>: <span class="subxComment"># out: (addr buffered-file), reg: (addr array byte), size: int</span> -<span id="L11957" class="LineNr">11957 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11958" class="LineNr">11958 </span> 55/push-ebp -<span id="L11959" class="LineNr">11959 </span> 89/<- %ebp 4/r32/esp -<span id="L11960" class="LineNr">11960 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11961" class="LineNr">11961 </span> 50/push-eax -<span id="L11962" class="LineNr">11962 </span> <span class="subxComment">#</span> -<span id="L11963" class="LineNr">11963 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L11964" class="LineNr">11964 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"c1/shift 5/subop/>> %"</span>) -<span id="L11965" class="LineNr">11965 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) *(ebp+0xc)) -<span id="L11966" class="LineNr">11966 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L11967" class="LineNr">11967 </span> (<a href='mu.subx.html#L12499'>num-shift-rights</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L11968" class="LineNr">11968 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L11969" class="LineNr">11969 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm8\n"</span>) -<span id="L11970" class="LineNr">11970 </span><span class="Constant">$emit-divide-by-shift-right:end</span>: -<span id="L11971" class="LineNr">11971 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L11972" class="LineNr">11972 </span> 58/pop-to-eax -<span id="L11973" class="LineNr">11973 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L11974" class="LineNr">11974 </span> 89/<- %esp 5/r32/ebp -<span id="L11975" class="LineNr">11975 </span> 5d/pop-to-ebp -<span id="L11976" class="LineNr">11976 </span> c3/return -<span id="L11977" class="LineNr">11977 </span> -<span id="L11978" class="LineNr">11978 </span><span class="subxFunction">translate-mu-index-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L11979" class="LineNr">11979 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L11980" class="LineNr">11980 </span> 55/push-ebp -<span id="L11981" class="LineNr">11981 </span> 89/<- %ebp 4/r32/esp -<span id="L11982" class="LineNr">11982 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L11983" class="LineNr">11983 </span> 51/push-ecx -<span id="L11984" class="LineNr">11984 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L11985" class="LineNr">11985 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L11986" class="LineNr">11986 </span> <span class="subxComment"># var base/ecx: (addr var) = stmt->inouts[0]</span> -<span id="L11987" class="LineNr">11987 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L11988" class="LineNr">11988 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L11989" class="LineNr">11989 </span> 89/<- %ecx 0/r32/eax -<span id="L11990" class="LineNr">11990 </span> <span class="subxComment"># if (var->register) do one thing</span> -<span id="L11991" class="LineNr">11991 </span> { -<span id="L11992" class="LineNr">11992 </span> 81 7/subop/compare *(ecx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L11993" class="LineNr">11993 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L11994" class="LineNr">11994 </span> <span class="subxComment"># TODO: ensure there's no dereference</span> -<span id="L11995" class="LineNr">11995 </span> (<a href='mu.subx.html#L12026'>translate-mu-index-stmt-with-array-in-register</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L11996" class="LineNr">11996 </span> eb/jump $translate-mu-index-stmt:end/disp8 -<span id="L11997" class="LineNr">11997 </span> } -<span id="L11998" class="LineNr">11998 </span> <span class="subxComment"># if (var->offset) do a different thing</span> -<span id="L11999" class="LineNr">11999 </span> { -<span id="L12000" class="LineNr">12000 </span> 81 7/subop/compare *(ecx+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> -<span id="L12001" class="LineNr">12001 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L12002" class="LineNr">12002 </span> <span class="subxComment"># TODO: ensure there's no dereference</span> -<span id="L12003" class="LineNr">12003 </span> (<a href='mu.subx.html#L12142'>translate-mu-index-stmt-with-array-on-stack</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) -<span id="L12004" class="LineNr">12004 </span> eb/jump $translate-mu-index-stmt:end/disp8 -<span id="L12005" class="LineNr">12005 </span> } -<span id="L12006" class="LineNr">12006 </span><span class="Constant">$translate-mu-index-stmt:end</span>: -<span id="L12007" class="LineNr">12007 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12008" class="LineNr">12008 </span> 59/pop-to-ecx -<span id="L12009" class="LineNr">12009 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12010" class="LineNr">12010 </span> 89/<- %esp 5/r32/ebp -<span id="L12011" class="LineNr">12011 </span> 5d/pop-to-ebp -<span id="L12012" class="LineNr">12012 </span> c3/return -<span id="L12013" class="LineNr">12013 </span> -<span id="L12014" class="LineNr">12014 </span><span class="Constant">$translate-mu-index-stmt-with-array:error1</span>: -<span id="L12015" class="LineNr">12015 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"couldn't translate an index instruction. second (index) input must either lie in a register or be a literal\n"</span>) -<span id="L12016" class="LineNr">12016 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L12017" class="LineNr">12017 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L12018" class="LineNr">12018 </span> <span class="subxComment"># never gets here</span> -<span id="L12019" class="LineNr">12019 </span> -<span id="L12020" class="LineNr">12020 </span><span class="Constant">$translate-mu-index-stmt-with-array:error2</span>: -<span id="L12021" class="LineNr">12021 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"couldn't translate an index instruction. second (index) input when in a register must be an int or offset\n"</span>) -<span id="L12022" class="LineNr">12022 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L12023" class="LineNr">12023 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L12024" class="LineNr">12024 </span> <span class="subxComment"># never gets here</span> -<span id="L12025" class="LineNr">12025 </span> -<span id="L12026" class="LineNr">12026 </span><span class="subxFunction">translate-mu-index-stmt-with-array-in-register</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L12027" class="LineNr">12027 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12028" class="LineNr">12028 </span> 55/push-ebp -<span id="L12029" class="LineNr">12029 </span> 89/<- %ebp 4/r32/esp -<span id="L12030" class="LineNr">12030 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12031" class="LineNr">12031 </span> 50/push-eax -<span id="L12032" class="LineNr">12032 </span> 51/push-ecx -<span id="L12033" class="LineNr">12033 </span> 52/push-edx -<span id="L12034" class="LineNr">12034 </span> 53/push-ebx -<span id="L12035" class="LineNr">12035 </span> <span class="subxComment">#</span> -<span id="L12036" class="LineNr">12036 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12037" class="LineNr">12037 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address *("</span>) -<span id="L12038" class="LineNr">12038 </span> <span class="subxComment"># TODO: ensure inouts[0] is in a register and not dereferenced</span> -<span id="L12039" class="LineNr">12039 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-base</span>: -<span id="L12040" class="LineNr">12040 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L12041" class="LineNr">12041 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L12042" class="LineNr">12042 </span> <span class="subxComment"># var base/ebx: (addr var) = inouts[0]</span> -<span id="L12043" class="LineNr">12043 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12044" class="LineNr">12044 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12045" class="LineNr">12045 </span> 89/<- %ebx 0/r32/eax -<span id="L12046" class="LineNr">12046 </span> <span class="subxComment"># print base->register " + "</span> -<span id="L12047" class="LineNr">12047 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12048" class="LineNr">12048 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12049" class="LineNr">12049 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) -<span id="L12050" class="LineNr">12050 </span> <span class="subxComment"># var index/edx: (addr var) = inouts[1]</span> -<span id="L12051" class="LineNr">12051 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12052" class="LineNr">12052 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L12053" class="LineNr">12053 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12054" class="LineNr">12054 </span> 89/<- %edx 0/r32/eax -<span id="L12055" class="LineNr">12055 </span> <span class="subxComment"># if index->register</span> -<span id="L12056" class="LineNr">12056 </span> 81 7/subop/compare *(edx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L12057" class="LineNr">12057 </span> { -<span id="L12058" class="LineNr">12058 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12059" class="LineNr">12059 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-register-index</span>: -<span id="L12060" class="LineNr">12060 </span> <span class="subxComment"># if index is an int</span> -<span id="L12061" class="LineNr">12061 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12062" class="LineNr">12062 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 1) <span class="subxComment"># int => eax</span> -<span id="L12063" class="LineNr">12063 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12064" class="LineNr">12064 </span> { -<span id="L12065" class="LineNr">12065 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12066" class="LineNr">12066 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-int-register-index</span>: -<span id="L12067" class="LineNr">12067 </span> <span class="subxComment"># print index->register "<<" log2(array-element-size(base)) " + 4) "</span> -<span id="L12068" class="LineNr">12068 </span> <span class="subxS1Comment"># . index->register "<<"</span> -<span id="L12069" class="LineNr">12069 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12070" class="LineNr">12070 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12071" class="LineNr">12071 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"<<"</span>) -<span id="L12072" class="LineNr">12072 </span> <span class="subxS1Comment"># . log2(array-element-size(base->type))</span> -<span id="L12073" class="LineNr">12073 </span> <span class="subxComment"># TODO: ensure size is a power of 2</span> -<span id="L12074" class="LineNr">12074 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L12075" class="LineNr">12075 </span> (<a href='mu.subx.html#L12499'>num-shift-rights</a> %eax) <span class="subxComment"># => eax</span> -<span id="L12076" class="LineNr">12076 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12077" class="LineNr">12077 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-register-index-done/disp32 -<span id="L12078" class="LineNr">12078 </span> } -<span id="L12079" class="LineNr">12079 </span> <span class="subxComment"># if index->type is any other atom, abort</span> -<span id="L12080" class="LineNr">12080 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12081" class="LineNr">12081 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L12082" class="LineNr">12082 </span> 0f 85/jump-if-!= $translate-mu-index-stmt-with-array:error2/disp32 -<span id="L12083" class="LineNr">12083 </span> <span class="subxComment"># if index has type (offset ...)</span> -<span id="L12084" class="LineNr">12084 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L12085" class="LineNr">12085 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 7) <span class="subxComment"># => eax</span> -<span id="L12086" class="LineNr">12086 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12087" class="LineNr">12087 </span> { -<span id="L12088" class="LineNr">12088 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12089" class="LineNr">12089 </span> <span class="subxComment"># print index->register</span> -<span id="L12090" class="LineNr">12090 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-offset-register-index</span>: -<span id="L12091" class="LineNr">12091 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12092" class="LineNr">12092 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12093" class="LineNr">12093 </span> } -<span id="L12094" class="LineNr">12094 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-register-index-done</span>: -<span id="L12095" class="LineNr">12095 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + 4) "</span>) -<span id="L12096" class="LineNr">12096 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-output/disp32 -<span id="L12097" class="LineNr">12097 </span> } -<span id="L12098" class="LineNr">12098 </span> <span class="subxComment"># otherwise if index is a literal</span> -<span id="L12099" class="LineNr">12099 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12100" class="LineNr">12100 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 0) <span class="subxComment"># => eax</span> -<span id="L12101" class="LineNr">12101 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12102" class="LineNr">12102 </span> { -<span id="L12103" class="LineNr">12103 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12104" class="LineNr">12104 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-literal-index</span>: -<span id="L12105" class="LineNr">12105 </span> <span class="subxComment"># var index-value/edx: int = parse-hex-int(index->name)</span> -<span id="L12106" class="LineNr">12106 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12107" class="LineNr">12107 </span> (<a href='../067parse-hex.subx.html#L354'>parse-hex-int</a> %eax) <span class="subxComment"># => eax</span> -<span id="L12108" class="LineNr">12108 </span> 89/<- %edx 0/r32/eax -<span id="L12109" class="LineNr">12109 </span> <span class="subxComment"># offset = idx-value * array-element-size(base->type)</span> -<span id="L12110" class="LineNr">12110 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L12111" class="LineNr">12111 </span> f7 4/subop/multiply-into-eax %edx <span class="subxComment"># clobbers edx</span> -<span id="L12112" class="LineNr">12112 </span> <span class="subxComment"># offset += 4 for array size</span> -<span id="L12113" class="LineNr">12113 </span> 05/add-to-eax 4/imm32 -<span id="L12114" class="LineNr">12114 </span> <span class="subxComment"># TODO: check edx for overflow</span> -<span id="L12115" class="LineNr">12115 </span> <span class="subxComment"># print offset</span> -<span id="L12116" class="LineNr">12116 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12117" class="LineNr">12117 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) -<span id="L12118" class="LineNr">12118 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-output/disp32 -<span id="L12119" class="LineNr">12119 </span> } -<span id="L12120" class="LineNr">12120 </span> <span class="subxComment"># otherwise abort</span> -<span id="L12121" class="LineNr">12121 </span> e9/jump $translate-mu-index-stmt-with-array:error1/disp32 -<span id="L12122" class="LineNr">12122 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-output</span>: -<span id="L12123" class="LineNr">12123 </span> <span class="subxComment"># outputs[0] "/r32"</span> -<span id="L12124" class="LineNr">12124 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L12125" class="LineNr">12125 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L12126" class="LineNr">12126 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12127" class="LineNr">12127 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12128" class="LineNr">12128 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> -<span id="L12129" class="LineNr">12129 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L12130" class="LineNr">12130 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) -<span id="L12131" class="LineNr">12131 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:end</span>: -<span id="L12132" class="LineNr">12132 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12133" class="LineNr">12133 </span> 5b/pop-to-ebx -<span id="L12134" class="LineNr">12134 </span> 5a/pop-to-edx -<span id="L12135" class="LineNr">12135 </span> 59/pop-to-ecx -<span id="L12136" class="LineNr">12136 </span> 58/pop-to-eax -<span id="L12137" class="LineNr">12137 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12138" class="LineNr">12138 </span> 89/<- %esp 5/r32/ebp -<span id="L12139" class="LineNr">12139 </span> 5d/pop-to-ebp -<span id="L12140" class="LineNr">12140 </span> c3/return -<span id="L12141" class="LineNr">12141 </span> -<span id="L12142" class="LineNr">12142 </span><span class="subxFunction">translate-mu-index-stmt-with-array-on-stack</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L12143" class="LineNr">12143 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12144" class="LineNr">12144 </span> 55/push-ebp -<span id="L12145" class="LineNr">12145 </span> 89/<- %ebp 4/r32/esp -<span id="L12146" class="LineNr">12146 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12147" class="LineNr">12147 </span> 50/push-eax -<span id="L12148" class="LineNr">12148 </span> 51/push-ecx -<span id="L12149" class="LineNr">12149 </span> 52/push-edx -<span id="L12150" class="LineNr">12150 </span> 53/push-ebx -<span id="L12151" class="LineNr">12151 </span> <span class="subxComment">#</span> -<span id="L12152" class="LineNr">12152 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12153" class="LineNr">12153 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address *(ebp + "</span>) -<span id="L12154" class="LineNr">12154 </span> <span class="subxComment"># var curr/edx: (addr stmt-var) = lookup(stmt->inouts)</span> -<span id="L12155" class="LineNr">12155 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L12156" class="LineNr">12156 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12157" class="LineNr">12157 </span> 89/<- %edx 0/r32/eax -<span id="L12158" class="LineNr">12158 </span> <span class="subxComment"># var base/ecx: (addr var) = lookup(curr->value)</span> -<span id="L12159" class="LineNr">12159 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12160" class="LineNr">12160 </span> 89/<- %ecx 0/r32/eax -<span id="L12161" class="LineNr">12161 </span> <span class="subxComment"># var curr2/eax: (addr stmt-var) = lookup(curr->next)</span> -<span id="L12162" class="LineNr">12162 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L12163" class="LineNr">12163 </span> <span class="subxComment"># var index/edx: (handle var) = curr2->value</span> -<span id="L12164" class="LineNr">12164 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12165" class="LineNr">12165 </span> 89/<- %edx 0/r32/eax -<span id="L12166" class="LineNr">12166 </span> <span class="subxComment"># if index->register</span> -<span id="L12167" class="LineNr">12167 </span> 81 7/subop/compare *(edx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L12168" class="LineNr">12168 </span> { -<span id="L12169" class="LineNr">12169 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12170" class="LineNr">12170 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-register-index</span>: -<span id="L12171" class="LineNr">12171 </span> <span class="subxComment"># if index is an int</span> -<span id="L12172" class="LineNr">12172 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12173" class="LineNr">12173 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 1) <span class="subxComment"># int => eax</span> -<span id="L12174" class="LineNr">12174 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12175" class="LineNr">12175 </span> { -<span id="L12176" class="LineNr">12176 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12177" class="LineNr">12177 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-int-register-index</span>: -<span id="L12178" class="LineNr">12178 </span> <span class="subxComment"># print index->register "<<" log2(array-element-size(base)) " + " base->offset+4</span> -<span id="L12179" class="LineNr">12179 </span> <span class="subxS1Comment"># . inouts[1]->register "<<"</span> -<span id="L12180" class="LineNr">12180 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12181" class="LineNr">12181 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12182" class="LineNr">12182 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"<<"</span>) -<span id="L12183" class="LineNr">12183 </span> <span class="subxS1Comment"># . log2(array-element-size(base))</span> -<span id="L12184" class="LineNr">12184 </span> <span class="subxComment"># TODO: ensure size is a power of 2</span> -<span id="L12185" class="LineNr">12185 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L12186" class="LineNr">12186 </span> (<a href='mu.subx.html#L12499'>num-shift-rights</a> %eax) <span class="subxComment"># => eax</span> -<span id="L12187" class="LineNr">12187 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12188" class="LineNr">12188 </span> <span class="subxComment">#</span> -<span id="L12189" class="LineNr">12189 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) -<span id="L12190" class="LineNr">12190 </span> <span class="subxComment">#</span> -<span id="L12191" class="LineNr">12191 </span> 8b/-> *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> -<span id="L12192" class="LineNr">12192 </span> 05/add-to-eax 4/imm32 <span class="subxComment"># for array length</span> -<span id="L12193" class="LineNr">12193 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12194" class="LineNr">12194 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-register-index-done/disp32 -<span id="L12195" class="LineNr">12195 </span> } -<span id="L12196" class="LineNr">12196 </span> <span class="subxComment"># if index->type is any other atom, abort</span> -<span id="L12197" class="LineNr">12197 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12198" class="LineNr">12198 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L12199" class="LineNr">12199 </span> 0f 85/jump-if-!= $translate-mu-index-stmt-with-array:error2/disp32 -<span id="L12200" class="LineNr">12200 </span> <span class="subxComment"># if index has type (offset ...)</span> -<span id="L12201" class="LineNr">12201 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L12202" class="LineNr">12202 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 7) <span class="subxComment"># => eax</span> -<span id="L12203" class="LineNr">12203 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12204" class="LineNr">12204 </span> { -<span id="L12205" class="LineNr">12205 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12206" class="LineNr">12206 </span> <span class="subxComment"># print index->register</span> -<span id="L12207" class="LineNr">12207 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-offset-register-index</span>: -<span id="L12208" class="LineNr">12208 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12209" class="LineNr">12209 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12210" class="LineNr">12210 </span> } -<span id="L12211" class="LineNr">12211 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-register-index-done</span>: -<span id="L12212" class="LineNr">12212 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) -<span id="L12213" class="LineNr">12213 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-output/disp32 -<span id="L12214" class="LineNr">12214 </span> } -<span id="L12215" class="LineNr">12215 </span> <span class="subxComment"># otherwise if index is a literal</span> -<span id="L12216" class="LineNr">12216 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12217" class="LineNr">12217 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 0) <span class="subxComment"># => eax</span> -<span id="L12218" class="LineNr">12218 </span> 3d/compare-eax-and 0/imm32/false -<span id="L12219" class="LineNr">12219 </span> { -<span id="L12220" class="LineNr">12220 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12221" class="LineNr">12221 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-literal-index</span>: -<span id="L12222" class="LineNr">12222 </span> <span class="subxComment"># var idx-value/edx: int = parse-hex-int(index->name)</span> -<span id="L12223" class="LineNr">12223 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12224" class="LineNr">12224 </span> (<a href='../067parse-hex.subx.html#L354'>parse-hex-int</a> %eax) <span class="subxComment"># Var-name => eax</span> -<span id="L12225" class="LineNr">12225 </span> 89/<- %edx 0/r32/eax -<span id="L12226" class="LineNr">12226 </span> <span class="subxComment"># offset = idx-value * array-element-size(base)</span> -<span id="L12227" class="LineNr">12227 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L12228" class="LineNr">12228 </span> f7 4/subop/multiply-into-eax %edx <span class="subxComment"># clobbers edx</span> -<span id="L12229" class="LineNr">12229 </span> <span class="subxComment"># offset += base->offset</span> -<span id="L12230" class="LineNr">12230 </span> 03/add *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> -<span id="L12231" class="LineNr">12231 </span> <span class="subxComment"># offset += 4 for array size</span> -<span id="L12232" class="LineNr">12232 </span> 05/add-to-eax 4/imm32 -<span id="L12233" class="LineNr">12233 </span> <span class="subxComment"># TODO: check edx for overflow</span> -<span id="L12234" class="LineNr">12234 </span> <span class="subxComment"># print offset</span> -<span id="L12235" class="LineNr">12235 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12236" class="LineNr">12236 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) -<span id="L12237" class="LineNr">12237 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-output/disp32 -<span id="L12238" class="LineNr">12238 </span> } -<span id="L12239" class="LineNr">12239 </span> <span class="subxComment"># otherwise abort</span> -<span id="L12240" class="LineNr">12240 </span> e9/jump $translate-mu-index-stmt-with-array:error1/disp32 -<span id="L12241" class="LineNr">12241 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-output</span>: -<span id="L12242" class="LineNr">12242 </span> <span class="subxComment"># outputs[0] "/r32"</span> -<span id="L12243" class="LineNr">12243 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L12244" class="LineNr">12244 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x14) *(eax+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L12245" class="LineNr">12245 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12246" class="LineNr">12246 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12247" class="LineNr">12247 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> -<span id="L12248" class="LineNr">12248 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L12249" class="LineNr">12249 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) -<span id="L12250" class="LineNr">12250 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:end</span>: -<span id="L12251" class="LineNr">12251 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12252" class="LineNr">12252 </span> 5b/pop-to-ebx -<span id="L12253" class="LineNr">12253 </span> 5a/pop-to-edx -<span id="L12254" class="LineNr">12254 </span> 59/pop-to-ecx -<span id="L12255" class="LineNr">12255 </span> 58/pop-to-eax -<span id="L12256" class="LineNr">12256 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12257" class="LineNr">12257 </span> 89/<- %esp 5/r32/ebp -<span id="L12258" class="LineNr">12258 </span> 5d/pop-to-ebp -<span id="L12259" class="LineNr">12259 </span> c3/return -<span id="L12260" class="LineNr">12260 </span> -<span id="L12261" class="LineNr">12261 </span><span class="subxFunction">translate-mu-compute-index-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L12262" class="LineNr">12262 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12263" class="LineNr">12263 </span> 55/push-ebp -<span id="L12264" class="LineNr">12264 </span> 89/<- %ebp 4/r32/esp -<span id="L12265" class="LineNr">12265 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12266" class="LineNr">12266 </span> 50/push-eax -<span id="L12267" class="LineNr">12267 </span> 51/push-ecx -<span id="L12268" class="LineNr">12268 </span> 52/push-edx -<span id="L12269" class="LineNr">12269 </span> 53/push-ebx -<span id="L12270" class="LineNr">12270 </span> <span class="subxComment">#</span> -<span id="L12271" class="LineNr">12271 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12272" class="LineNr">12272 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"69/multiply"</span>) -<span id="L12273" class="LineNr">12273 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L12274" class="LineNr">12274 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L12275" class="LineNr">12275 </span> <span class="subxComment"># var first-inout/ebx: (addr stmt-var) = stmt->inouts[0]</span> -<span id="L12276" class="LineNr">12276 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12277" class="LineNr">12277 </span> 89/<- %ebx 0/r32/eax -<span id="L12278" class="LineNr">12278 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-index</span>: -<span id="L12279" class="LineNr">12279 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+8) *(ebx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L12280" class="LineNr">12280 </span> (<a href='mu.subx.html#L15996'>emit-subx-var-as-rm32</a> *(ebp+8) %eax) -<span id="L12281" class="LineNr">12281 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L12282" class="LineNr">12282 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-elem-size</span>: -<span id="L12283" class="LineNr">12283 </span> <span class="subxComment"># var base/ebx: (addr var)</span> -<span id="L12284" class="LineNr">12284 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12285" class="LineNr">12285 </span> 89/<- %ebx 0/r32/eax -<span id="L12286" class="LineNr">12286 </span> <span class="subxComment"># print array-element-size(base)</span> -<span id="L12287" class="LineNr">12287 </span> (<a href='mu.subx.html#L11879'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> -<span id="L12288" class="LineNr">12288 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L12289" class="LineNr">12289 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32 "</span>) -<span id="L12290" class="LineNr">12290 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-output</span>: -<span id="L12291" class="LineNr">12291 </span> <span class="subxComment"># outputs[0] "/r32"</span> -<span id="L12292" class="LineNr">12292 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L12293" class="LineNr">12293 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12294" class="LineNr">12294 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12295" class="LineNr">12295 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> -<span id="L12296" class="LineNr">12296 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L12297" class="LineNr">12297 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) -<span id="L12298" class="LineNr">12298 </span><span class="Constant">$translate-mu-compute-index-stmt:end</span>: -<span id="L12299" class="LineNr">12299 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12300" class="LineNr">12300 </span> 5b/pop-to-ebx -<span id="L12301" class="LineNr">12301 </span> 5a/pop-to-edx -<span id="L12302" class="LineNr">12302 </span> 59/pop-to-ecx -<span id="L12303" class="LineNr">12303 </span> 58/pop-to-eax -<span id="L12304" class="LineNr">12304 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12305" class="LineNr">12305 </span> 89/<- %esp 5/r32/ebp -<span id="L12306" class="LineNr">12306 </span> 5d/pop-to-ebp -<span id="L12307" class="LineNr">12307 </span> c3/return -<span id="L12308" class="LineNr">12308 </span> -<span id="L12309" class="LineNr">12309 </span><span class="subxFunction">translate-mu-get-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> -<span id="L12310" class="LineNr">12310 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12311" class="LineNr">12311 </span> 55/push-ebp -<span id="L12312" class="LineNr">12312 </span> 89/<- %ebp 4/r32/esp -<span id="L12313" class="LineNr">12313 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12314" class="LineNr">12314 </span> 50/push-eax -<span id="L12315" class="LineNr">12315 </span> 51/push-ecx -<span id="L12316" class="LineNr">12316 </span> 52/push-edx -<span id="L12317" class="LineNr">12317 </span> <span class="subxComment">#</span> -<span id="L12318" class="LineNr">12318 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12319" class="LineNr">12319 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address "</span>) -<span id="L12320" class="LineNr">12320 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L12321" class="LineNr">12321 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L12322" class="LineNr">12322 </span> <span class="subxComment"># var offset/edx: int = get offset of stmt</span> -<span id="L12323" class="LineNr">12323 </span> (<a href='mu.subx.html#L12526'>mu-get-offset</a> %ecx) <span class="subxComment"># => eax</span> -<span id="L12324" class="LineNr">12324 </span> 89/<- %edx 0/r32/eax -<span id="L12325" class="LineNr">12325 </span> <span class="subxComment"># var base/eax: (addr var) = stmt->inouts->value</span> -<span id="L12326" class="LineNr">12326 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12327" class="LineNr">12327 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12328" class="LineNr">12328 </span> <span class="subxComment"># if base is in a register</span> -<span id="L12329" class="LineNr">12329 </span> 81 7/subop/compare *(eax+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L12330" class="LineNr">12330 </span> { -<span id="L12331" class="LineNr">12331 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12332" class="LineNr">12332 </span><span class="Constant">$translate-mu-get-stmt:emit-register-input</span>: -<span id="L12333" class="LineNr">12333 </span> <span class="subxComment"># emit "*(" base->register " + " offset ") "</span> -<span id="L12334" class="LineNr">12334 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*("</span>) -<span id="L12335" class="LineNr">12335 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12336" class="LineNr">12336 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12337" class="LineNr">12337 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) -<span id="L12338" class="LineNr">12338 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) -<span id="L12339" class="LineNr">12339 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) -<span id="L12340" class="LineNr">12340 </span> e9/jump $translate-mu-get-stmt:emit-output/disp32 -<span id="L12341" class="LineNr">12341 </span> } -<span id="L12342" class="LineNr">12342 </span> <span class="subxComment"># otherwise base is on the stack</span> -<span id="L12343" class="LineNr">12343 </span> { -<span id="L12344" class="LineNr">12344 </span><span class="Constant">$translate-mu-get-stmt:emit-stack-input</span>: -<span id="L12345" class="LineNr">12345 </span> <span class="subxComment"># emit "*(ebp + " inouts[0]->stack-offset + offset ") "</span> -<span id="L12346" class="LineNr">12346 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*(ebp+"</span>) -<span id="L12347" class="LineNr">12347 </span> 03/add *(eax+0x14) 2/r32/edx <span class="subxComment"># Var-offset</span> -<span id="L12348" class="LineNr">12348 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) -<span id="L12349" class="LineNr">12349 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) -<span id="L12350" class="LineNr">12350 </span> eb/jump $translate-mu-get-stmt:emit-output/disp8 -<span id="L12351" class="LineNr">12351 </span> } -<span id="L12352" class="LineNr">12352 </span><span class="Constant">$translate-mu-get-stmt:emit-output</span>: -<span id="L12353" class="LineNr">12353 </span> <span class="subxComment"># var output/eax: (addr var) = stmt->outputs->value</span> -<span id="L12354" class="LineNr">12354 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L12355" class="LineNr">12355 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12356" class="LineNr">12356 </span> <span class="subxComment"># emit offset->register "/r32"</span> -<span id="L12357" class="LineNr">12357 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L12358" class="LineNr">12358 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> -<span id="L12359" class="LineNr">12359 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L12360" class="LineNr">12360 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) -<span id="L12361" class="LineNr">12361 </span><span class="Constant">$translate-mu-get-stmt:end</span>: -<span id="L12362" class="LineNr">12362 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12363" class="LineNr">12363 </span> 5a/pop-to-edx -<span id="L12364" class="LineNr">12364 </span> 59/pop-to-ecx -<span id="L12365" class="LineNr">12365 </span> 58/pop-to-eax -<span id="L12366" class="LineNr">12366 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12367" class="LineNr">12367 </span> 89/<- %esp 5/r32/ebp -<span id="L12368" class="LineNr">12368 </span> 5d/pop-to-ebp -<span id="L12369" class="LineNr">12369 </span> c3/return -<span id="L12370" class="LineNr">12370 </span> -<span id="L12371" class="LineNr">12371 </span><span class="subxFunction">array-element-type-id</span>: <span class="subxComment"># v: (addr var), err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: type-id</span> -<span id="L12372" class="LineNr">12372 </span> <span class="subxComment"># precondition: n is positive</span> -<span id="L12373" class="LineNr">12373 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12374" class="LineNr">12374 </span> 55/push-ebp -<span id="L12375" class="LineNr">12375 </span> 89/<- %ebp 4/r32/esp -<span id="L12376" class="LineNr">12376 </span> <span class="subxComment">#</span> -<span id="L12377" class="LineNr">12377 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12378" class="LineNr">12378 </span> <span class="subxComment"># var t/eax: (addr tree type-id)</span> -<span id="L12379" class="LineNr">12379 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L12380" class="LineNr">12380 </span> <span class="subxComment"># if t == 0 abort</span> -<span id="L12381" class="LineNr">12381 </span> 3d/compare-eax-with 0/imm32 -<span id="L12382" class="LineNr">12382 </span> 0f 84/jump-if-== $array-element-type-id:error0/disp32 -<span id="L12383" class="LineNr">12383 </span> <span class="subxComment"># if t->is-atom? abort</span> -<span id="L12384" class="LineNr">12384 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L12385" class="LineNr">12385 </span> 0f 85/jump-if-!= $array-element-type-id:error1/disp32 -<span id="L12386" class="LineNr">12386 </span> <span class="subxComment"># if (t->left == addr) t = t->right</span> -<span id="L12387" class="LineNr">12387 </span> { -<span id="L12388" class="LineNr">12388 </span> 50/push-eax -<span id="L12389" class="LineNr">12389 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L12390" class="LineNr">12390 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 2) <span class="subxComment"># addr => eax</span> -<span id="L12391" class="LineNr">12391 </span> 3d/compare-eax-with 0/imm32/false -<span id="L12392" class="LineNr">12392 </span> 58/pop-to-eax -<span id="L12393" class="LineNr">12393 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L12394" class="LineNr">12394 </span><span class="Constant">$array-element-type-id:skip-addr</span>: -<span id="L12395" class="LineNr">12395 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L12396" class="LineNr">12396 </span> } -<span id="L12397" class="LineNr">12397 </span> <span class="subxComment"># if t == 0 abort</span> -<span id="L12398" class="LineNr">12398 </span> 3d/compare-eax-with 0/imm32 -<span id="L12399" class="LineNr">12399 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 -<span id="L12400" class="LineNr">12400 </span> <span class="subxComment"># if t->is-atom? abort</span> -<span id="L12401" class="LineNr">12401 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L12402" class="LineNr">12402 </span> 0f 85/jump-if-!= $array-element-type-id:error2/disp32 -<span id="L12403" class="LineNr">12403 </span> <span class="subxComment"># if t->left != array abort</span> -<span id="L12404" class="LineNr">12404 </span> { -<span id="L12405" class="LineNr">12405 </span> 50/push-eax -<span id="L12406" class="LineNr">12406 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L12407" class="LineNr">12407 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> %eax 3) <span class="subxComment"># array => eax</span> -<span id="L12408" class="LineNr">12408 </span> 3d/compare-eax-with 0/imm32/false -<span id="L12409" class="LineNr">12409 </span> 58/pop-to-eax -<span id="L12410" class="LineNr">12410 </span><span class="Constant">$array-element-type-id:no-array</span>: -<span id="L12411" class="LineNr">12411 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 -<span id="L12412" class="LineNr">12412 </span> } -<span id="L12413" class="LineNr">12413 </span><span class="Constant">$array-element-type-id:skip-array</span>: -<span id="L12414" class="LineNr">12414 </span> <span class="subxComment"># t = t->right</span> -<span id="L12415" class="LineNr">12415 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> -<span id="L12416" class="LineNr">12416 </span> <span class="subxComment"># if t == 0 abort</span> -<span id="L12417" class="LineNr">12417 </span> 3d/compare-eax-with 0/imm32 -<span id="L12418" class="LineNr">12418 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 -<span id="L12419" class="LineNr">12419 </span> <span class="subxComment"># if t->is-atom? abort</span> -<span id="L12420" class="LineNr">12420 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> -<span id="L12421" class="LineNr">12421 </span> 0f 85/jump-if-!= $array-element-type-id:error2/disp32 -<span id="L12422" class="LineNr">12422 </span> <span class="subxComment"># return t->left->value</span> -<span id="L12423" class="LineNr">12423 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> -<span id="L12424" class="LineNr">12424 </span> 8b/-> *(eax+4) 0/r32/eax <span class="subxComment"># Tree-value</span> -<span id="L12425" class="LineNr">12425 </span><span class="Constant">$array-element-type-id:end</span>: -<span id="L12426" class="LineNr">12426 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12427" class="LineNr">12427 </span> 89/<- %esp 5/r32/ebp -<span id="L12428" class="LineNr">12428 </span> 5d/pop-to-ebp -<span id="L12429" class="LineNr">12429 </span> c3/return -<span id="L12430" class="LineNr">12430 </span> -<span id="L12431" class="LineNr">12431 </span><span class="Constant">$array-element-type-id:error0</span>: -<span id="L12432" class="LineNr">12432 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) -<span id="L12433" class="LineNr">12433 </span> 50/push-eax -<span id="L12434" class="LineNr">12434 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12435" class="LineNr">12435 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12436" class="LineNr">12436 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) -<span id="L12437" class="LineNr">12437 </span> 58/pop-to-eax -<span id="L12438" class="LineNr">12438 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has no type\n"</span>) -<span id="L12439" class="LineNr">12439 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) -<span id="L12440" class="LineNr">12440 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) -<span id="L12441" class="LineNr">12441 </span> <span class="subxComment"># never gets here</span> -<span id="L12442" class="LineNr">12442 </span> -<span id="L12443" class="LineNr">12443 </span><span class="Constant">$array-element-type-id:error1</span>: -<span id="L12444" class="LineNr">12444 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) -<span id="L12445" class="LineNr">12445 </span> 50/push-eax -<span id="L12446" class="LineNr">12446 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12447" class="LineNr">12447 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12448" class="LineNr">12448 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) -<span id="L12449" class="LineNr">12449 </span> 58/pop-to-eax -<span id="L12450" class="LineNr">12450 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has atomic type "</span>) -<span id="L12451" class="LineNr">12451 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0xc) *(eax+4)) <span class="subxComment"># Tree-value</span> -<span id="L12452" class="LineNr">12452 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L12453" class="LineNr">12453 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) -<span id="L12454" class="LineNr">12454 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) -<span id="L12455" class="LineNr">12455 </span> <span class="subxComment"># never gets here</span> -<span id="L12456" class="LineNr">12456 </span> -<span id="L12457" class="LineNr">12457 </span><span class="Constant">$array-element-type-id:error2</span>: -<span id="L12458" class="LineNr">12458 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) -<span id="L12459" class="LineNr">12459 </span> 50/push-eax -<span id="L12460" class="LineNr">12460 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12461" class="LineNr">12461 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12462" class="LineNr">12462 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) -<span id="L12463" class="LineNr">12463 </span> 58/pop-to-eax -<span id="L12464" class="LineNr">12464 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has non-array type\n"</span>) -<span id="L12465" class="LineNr">12465 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) -<span id="L12466" class="LineNr">12466 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) -<span id="L12467" class="LineNr">12467 </span> <span class="subxComment"># never gets here</span> -<span id="L12468" class="LineNr">12468 </span> -<span id="L12469" class="LineNr">12469 </span><span class="subxFunction">power-of-2?</span>: <span class="subxComment"># n: int, err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: boolean</span> -<span id="L12470" class="LineNr">12470 </span> <span class="subxComment"># precondition: n is positive</span> -<span id="L12471" class="LineNr">12471 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12472" class="LineNr">12472 </span> 55/push-ebp -<span id="L12473" class="LineNr">12473 </span> 89/<- %ebp 4/r32/esp -<span id="L12474" class="LineNr">12474 </span> <span class="subxComment"># eax = n</span> -<span id="L12475" class="LineNr">12475 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12476" class="LineNr">12476 </span> <span class="subxComment"># if (n < 0) abort</span> -<span id="L12477" class="LineNr">12477 </span> 3d/compare-eax-with 0/imm32 -<span id="L12478" class="LineNr">12478 </span> 0f 8c/jump-if-< $power-of-2?:abort/disp32 -<span id="L12479" class="LineNr">12479 </span> <span class="subxComment"># var tmp/eax: int = n-1</span> -<span id="L12480" class="LineNr">12480 </span> 48/decrement-eax -<span id="L12481" class="LineNr">12481 </span> <span class="subxComment"># var tmp2/eax: int = n & tmp</span> -<span id="L12482" class="LineNr">12482 </span> 23/and-> *(ebp+8) 0/r32/eax -<span id="L12483" class="LineNr">12483 </span> <span class="subxComment"># return (tmp2 == 0)</span> -<span id="L12484" class="LineNr">12484 </span> 3d/compare-eax-and 0/imm32 -<span id="L12485" class="LineNr">12485 </span> 0f 94/set-byte-if-= %al -<span id="L12486" class="LineNr">12486 </span> 81 4/subop/and %eax 0xff/imm32 -<span id="L12487" class="LineNr">12487 </span><span class="Constant">$power-of-2?:end</span>: -<span id="L12488" class="LineNr">12488 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12489" class="LineNr">12489 </span> 89/<- %esp 5/r32/ebp -<span id="L12490" class="LineNr">12490 </span> 5d/pop-to-ebp -<span id="L12491" class="LineNr">12491 </span> c3/return -<span id="L12492" class="LineNr">12492 </span> -<span id="L12493" class="LineNr">12493 </span><span class="Constant">$power-of-2?:abort</span>: -<span id="L12494" class="LineNr">12494 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"power-of-2?: negative number\n"</span>) +<span id="L11549" class="LineNr">11549 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 +<span id="L11550" class="LineNr">11550 </span> <span class="subxComment"># if (!in-function-outputs?(fn, v)) break</span> +<span id="L11551" class="LineNr">11551 </span> (<a href='mu.subx.html#L11618'>in-function-outputs?</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> +<span id="L11552" class="LineNr">11552 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11553" class="LineNr">11553 </span> 74/jump-if-= $clean-up-blocks:phase2/disp8 +<span id="L11554" class="LineNr">11554 </span> } +<span id="L11555" class="LineNr">11555 </span><span class="Constant">$clean-up-blocks:loop1-continue</span>: +<span id="L11556" class="LineNr">11556 </span> <span class="subxComment"># --to</span> +<span id="L11557" class="LineNr">11557 </span> 81 5/subop/subtract %edi 0xc/imm32 +<span id="L11558" class="LineNr">11558 </span> <span class="subxComment">#</span> +<span id="L11559" class="LineNr">11559 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11560" class="LineNr">11560 </span> } +<span id="L11561" class="LineNr">11561 </span><span class="Constant">$clean-up-blocks:phase2</span>: +<span id="L11562" class="LineNr">11562 </span> <span class="subxComment"># var from/esi: int = to</span> +<span id="L11563" class="LineNr">11563 </span> 89/<- %esi 7/r32/edi +<span id="L11564" class="LineNr">11564 </span> { +<span id="L11565" class="LineNr">11565 </span><span class="Constant">$clean-up-blocks:loop2</span>: +<span id="L11566" class="LineNr">11566 </span> <span class="subxComment"># if (from >= vars->top) break</span> +<span id="L11567" class="LineNr">11567 </span> 3b/compare 6/r32/esi *ebx +<span id="L11568" class="LineNr">11568 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 +<span id="L11569" class="LineNr">11569 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(vars->data[from]->var)</span> +<span id="L11570" class="LineNr">11570 </span> 8d/copy-address *(ebx+esi+8) 0/r32/eax +<span id="L11571" class="LineNr">11571 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># => eax</span> +<span id="L11572" class="LineNr">11572 </span> <span class="subxComment"># if !in-function-outputs?(fn, v) continue</span> +<span id="L11573" class="LineNr">11573 </span> (<a href='mu.subx.html#L11618'>in-function-outputs?</a> *(ebp+0x10) %eax) <span class="subxComment"># => eax</span> +<span id="L11574" class="LineNr">11574 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11575" class="LineNr">11575 </span> 74/jump-if-= $clean-up-blocks:loop2-continue/disp8 +<span id="L11576" class="LineNr">11576 </span> <span class="subxComment"># invariant: from >= to</span> +<span id="L11577" class="LineNr">11577 </span> <span class="subxComment"># if (from > to) vars->data[to] = vars->data[from]</span> +<span id="L11578" class="LineNr">11578 </span> { +<span id="L11579" class="LineNr">11579 </span> 39/compare %esi 7/r32/edi +<span id="L11580" class="LineNr">11580 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 +<span id="L11581" class="LineNr">11581 </span> 56/push-esi +<span id="L11582" class="LineNr">11582 </span> 57/push-edi +<span id="L11583" class="LineNr">11583 </span> <span class="subxS1Comment"># . var from/esi: (addr byte) = &vars->data[from]</span> +<span id="L11584" class="LineNr">11584 </span> 8d/copy-address *(ebx+esi+8) 6/r32/esi +<span id="L11585" class="LineNr">11585 </span> <span class="subxS1Comment"># . var to/edi: (addr byte) = &vars->data[to]</span> +<span id="L11586" class="LineNr">11586 </span> 8d/copy-address *(ebx+edi+8) 7/r32/edi +<span id="L11587" class="LineNr">11587 </span> <span class="subxS1Comment"># .</span> +<span id="L11588" class="LineNr">11588 </span> 8b/-> *esi 0/r32/eax +<span id="L11589" class="LineNr">11589 </span> 89/<- *edi 0/r32/eax +<span id="L11590" class="LineNr">11590 </span> 8b/-> *(esi+4) 0/r32/eax +<span id="L11591" class="LineNr">11591 </span> 89/<- *(edi+4) 0/r32/eax +<span id="L11592" class="LineNr">11592 </span> 8b/-> *(esi+8) 0/r32/eax +<span id="L11593" class="LineNr">11593 </span> 89/<- *(edi+8) 0/r32/eax +<span id="L11594" class="LineNr">11594 </span> 5f/pop-to-edi +<span id="L11595" class="LineNr">11595 </span> 5e/pop-to-esi +<span id="L11596" class="LineNr">11596 </span> } +<span id="L11597" class="LineNr">11597 </span> <span class="subxComment"># ++to</span> +<span id="L11598" class="LineNr">11598 </span> 81 0/subop/add %edi 0xc/imm32 +<span id="L11599" class="LineNr">11599 </span><span class="Constant">$clean-up-blocks:loop2-continue</span>: +<span id="L11600" class="LineNr">11600 </span> <span class="subxComment"># ++from</span> +<span id="L11601" class="LineNr">11601 </span> 81 0/subop/add %esi 0xc/imm32 +<span id="L11602" class="LineNr">11602 </span> <span class="subxComment">#</span> +<span id="L11603" class="LineNr">11603 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11604" class="LineNr">11604 </span> } +<span id="L11605" class="LineNr">11605 </span> 89/<- *ebx 7/r32/edi +<span id="L11606" class="LineNr">11606 </span><span class="Constant">$clean-up-blocks:end</span>: +<span id="L11607" class="LineNr">11607 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11608" class="LineNr">11608 </span> 5f/pop-to-edi +<span id="L11609" class="LineNr">11609 </span> 5e/pop-to-esi +<span id="L11610" class="LineNr">11610 </span> 5b/pop-to-ebx +<span id="L11611" class="LineNr">11611 </span> 5a/pop-to-edx +<span id="L11612" class="LineNr">11612 </span> 58/pop-to-eax +<span id="L11613" class="LineNr">11613 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11614" class="LineNr">11614 </span> 89/<- %esp 5/r32/ebp +<span id="L11615" class="LineNr">11615 </span> 5d/pop-to-ebp +<span id="L11616" class="LineNr">11616 </span> c3/return +<span id="L11617" class="LineNr">11617 </span> +<span id="L11618" class="LineNr">11618 </span><span class="subxFunction">in-function-outputs?</span>: <span class="subxComment"># fn: (addr function), target: (addr var) -> result/eax: boolean</span> +<span id="L11619" class="LineNr">11619 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11620" class="LineNr">11620 </span> 55/push-ebp +<span id="L11621" class="LineNr">11621 </span> 89/<- %ebp 4/r32/esp +<span id="L11622" class="LineNr">11622 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11623" class="LineNr">11623 </span> 51/push-ecx +<span id="L11624" class="LineNr">11624 </span> <span class="subxComment"># var curr/ecx: (addr list var) = lookup(fn->outputs)</span> +<span id="L11625" class="LineNr">11625 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L11626" class="LineNr">11626 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x10) *(ecx+0x14)) <span class="subxComment"># Function-outputs Function-outputs => eax</span> +<span id="L11627" class="LineNr">11627 </span> 89/<- %ecx 0/r32/eax +<span id="L11628" class="LineNr">11628 </span> <span class="subxComment"># while curr != null</span> +<span id="L11629" class="LineNr">11629 </span> { +<span id="L11630" class="LineNr">11630 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L11631" class="LineNr">11631 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11632" class="LineNr">11632 </span> <span class="subxComment"># var v/eax: (addr var) = lookup(curr->value)</span> +<span id="L11633" class="LineNr">11633 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L11634" class="LineNr">11634 </span> <span class="subxComment"># if (v == target) return true</span> +<span id="L11635" class="LineNr">11635 </span> 39/compare *(ebp+0xc) 0/r32/eax +<span id="L11636" class="LineNr">11636 </span> b8/copy-to-eax 1/imm32/true +<span id="L11637" class="LineNr">11637 </span> 74/jump-if-= $in-function-outputs?:end/disp8 +<span id="L11638" class="LineNr">11638 </span> <span class="subxComment"># curr = curr->next</span> +<span id="L11639" class="LineNr">11639 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L11640" class="LineNr">11640 </span> 89/<- %ecx 0/r32/eax +<span id="L11641" class="LineNr">11641 </span> <span class="subxComment">#</span> +<span id="L11642" class="LineNr">11642 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11643" class="LineNr">11643 </span> } +<span id="L11644" class="LineNr">11644 </span> b8/copy-to-eax 0/imm32 +<span id="L11645" class="LineNr">11645 </span><span class="Constant">$in-function-outputs?:end</span>: +<span id="L11646" class="LineNr">11646 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11647" class="LineNr">11647 </span> 59/pop-to-ecx +<span id="L11648" class="LineNr">11648 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11649" class="LineNr">11649 </span> 89/<- %esp 5/r32/ebp +<span id="L11650" class="LineNr">11650 </span> 5d/pop-to-ebp +<span id="L11651" class="LineNr">11651 </span> c3/return +<span id="L11652" class="LineNr">11652 </span> +<span id="L11653" class="LineNr">11653 </span><span class="subxFunction">emit-subx-var-def</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> +<span id="L11654" class="LineNr">11654 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11655" class="LineNr">11655 </span> 55/push-ebp +<span id="L11656" class="LineNr">11656 </span> 89/<- %ebp 4/r32/esp +<span id="L11657" class="LineNr">11657 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11658" class="LineNr">11658 </span> 50/push-eax +<span id="L11659" class="LineNr">11659 </span> 51/push-ecx +<span id="L11660" class="LineNr">11660 </span> 52/push-edx +<span id="L11661" class="LineNr">11661 </span> <span class="subxComment"># eax = stmt</span> +<span id="L11662" class="LineNr">11662 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L11663" class="LineNr">11663 </span> <span class="subxComment"># var v/ecx: (addr var)</span> +<span id="L11664" class="LineNr">11664 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Vardef-var Vardef-var => eax</span> +<span id="L11665" class="LineNr">11665 </span> 89/<- %ecx 0/r32/eax +<span id="L11666" class="LineNr">11666 </span> <span class="subxComment"># v->block-depth = *Curr-block-depth</span> +<span id="L11667" class="LineNr">11667 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/r32/eax +<span id="L11668" class="LineNr">11668 </span> 89/<- *(ecx+0x10) 0/r32/eax <span class="subxComment"># Var-block-depth</span> +<span id="L11669" class="LineNr">11669 </span> <span class="subxComment"># var n/edx: int = size-of(stmt->var)</span> +<span id="L11670" class="LineNr">11670 </span> (<a href='mu.subx.html#L10158'>size-of</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L11671" class="LineNr">11671 </span> 89/<- %edx 0/r32/eax +<span id="L11672" class="LineNr">11672 </span> <span class="subxComment"># *Curr-local-stack-offset -= n</span> +<span id="L11673" class="LineNr">11673 </span> 29/subtract-from *<span class="SpecialChar"><a href='mu.subx.html#L10420'>Curr-local-stack-offset</a></span> 2/r32/edx +<span id="L11674" class="LineNr">11674 </span> <span class="subxComment"># v->offset = *Curr-local-stack-offset</span> +<span id="L11675" class="LineNr">11675 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L10420'>Curr-local-stack-offset</a></span> 0/r32/eax +<span id="L11676" class="LineNr">11676 </span> 89/<- *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> +<span id="L11677" class="LineNr">11677 </span> <span class="subxComment"># if v is an array, do something special</span> +<span id="L11678" class="LineNr">11678 </span> { +<span id="L11679" class="LineNr">11679 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+8) *(ecx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L11680" class="LineNr">11680 </span> (<a href='mu.subx.html#L10239'>is-mu-array?</a> %eax) <span class="subxComment"># => eax</span> +<span id="L11681" class="LineNr">11681 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11682" class="LineNr">11682 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11683" class="LineNr">11683 </span> <span class="subxComment"># var array-size-without-size/edx: int = n-4</span> +<span id="L11684" class="LineNr">11684 </span> 81 5/subop/subtract %edx 4/imm32 +<span id="L11685" class="LineNr">11685 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11686" class="LineNr">11686 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"(<a href='../101stack_allocate.subx.html#L34'>push-n-zero-bytes</a> "</span>) +<span id="L11687" class="LineNr">11687 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) +<span id="L11688" class="LineNr">11688 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")\n"</span>) +<span id="L11689" class="LineNr">11689 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11690" class="LineNr">11690 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"68/push "</span>) +<span id="L11691" class="LineNr">11691 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) +<span id="L11692" class="LineNr">11692 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) +<span id="L11693" class="LineNr">11693 </span> eb/jump $emit-subx-var-def:end/disp8 +<span id="L11694" class="LineNr">11694 </span> } +<span id="L11695" class="LineNr">11695 </span> <span class="subxComment"># while n > 0</span> +<span id="L11696" class="LineNr">11696 </span> { +<span id="L11697" class="LineNr">11697 </span> 81 7/subop/compare %edx 0/imm32 +<span id="L11698" class="LineNr">11698 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 +<span id="L11699" class="LineNr">11699 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11700" class="LineNr">11700 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"68/push 0/imm32\n"</span>) +<span id="L11701" class="LineNr">11701 </span> <span class="subxComment"># n -= 4</span> +<span id="L11702" class="LineNr">11702 </span> 81 5/subop/subtract %edx 4/imm32 +<span id="L11703" class="LineNr">11703 </span> <span class="subxComment">#</span> +<span id="L11704" class="LineNr">11704 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L11705" class="LineNr">11705 </span> } +<span id="L11706" class="LineNr">11706 </span><span class="Constant">$emit-subx-var-def:end</span>: +<span id="L11707" class="LineNr">11707 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11708" class="LineNr">11708 </span> 5a/pop-to-edx +<span id="L11709" class="LineNr">11709 </span> 59/pop-to-ecx +<span id="L11710" class="LineNr">11710 </span> 58/pop-to-eax +<span id="L11711" class="LineNr">11711 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11712" class="LineNr">11712 </span> 89/<- %esp 5/r32/ebp +<span id="L11713" class="LineNr">11713 </span> 5d/pop-to-ebp +<span id="L11714" class="LineNr">11714 </span> c3/return +<span id="L11715" class="LineNr">11715 </span> +<span id="L11716" class="LineNr">11716 </span><span class="subxFunction">emit-subx-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), primitives: (addr primitive), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L11717" class="LineNr">11717 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11718" class="LineNr">11718 </span> 55/push-ebp +<span id="L11719" class="LineNr">11719 </span> 89/<- %ebp 4/r32/esp +<span id="L11720" class="LineNr">11720 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11721" class="LineNr">11721 </span> 50/push-eax +<span id="L11722" class="LineNr">11722 </span> 51/push-ecx +<span id="L11723" class="LineNr">11723 </span> <span class="subxH1Comment"># - some special-case primitives that don't actually use the 'primitives' data structure</span> +<span id="L11724" class="LineNr">11724 </span> <span class="subxComment"># var op/ecx: (addr array byte) = lookup(stmt->operation)</span> +<span id="L11725" class="LineNr">11725 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L11726" class="LineNr">11726 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L11727" class="LineNr">11727 </span> 89/<- %ecx 0/r32/eax +<span id="L11728" class="LineNr">11728 </span> <span class="subxComment"># array size</span> +<span id="L11729" class="LineNr">11729 </span> { +<span id="L11730" class="LineNr">11730 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "length")) break</span> +<span id="L11731" class="LineNr">11731 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"length"</span>) <span class="subxComment"># => eax</span> +<span id="L11732" class="LineNr">11732 </span> 3d/compare-eax-and 0/imm32 +<span id="L11733" class="LineNr">11733 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11734" class="LineNr">11734 </span> (<a href='mu.subx.html#L11788'>translate-mu-length-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) +<span id="L11735" class="LineNr">11735 </span> e9/jump $emit-subx-stmt:end/disp32 +<span id="L11736" class="LineNr">11736 </span> } +<span id="L11737" class="LineNr">11737 </span> <span class="subxComment"># index into array</span> +<span id="L11738" class="LineNr">11738 </span> { +<span id="L11739" class="LineNr">11739 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "index")) break</span> +<span id="L11740" class="LineNr">11740 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"index"</span>) <span class="subxComment"># => eax</span> +<span id="L11741" class="LineNr">11741 </span> 3d/compare-eax-and 0/imm32 +<span id="L11742" class="LineNr">11742 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11743" class="LineNr">11743 </span> (<a href='mu.subx.html#L12008'>translate-mu-index-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) +<span id="L11744" class="LineNr">11744 </span> e9/jump $emit-subx-stmt:end/disp32 +<span id="L11745" class="LineNr">11745 </span> } +<span id="L11746" class="LineNr">11746 </span> <span class="subxComment"># compute-offset for index into array</span> +<span id="L11747" class="LineNr">11747 </span> { +<span id="L11748" class="LineNr">11748 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "compute-offset")) break</span> +<span id="L11749" class="LineNr">11749 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"compute-offset"</span>) <span class="subxComment"># => eax</span> +<span id="L11750" class="LineNr">11750 </span> 3d/compare-eax-and 0/imm32 +<span id="L11751" class="LineNr">11751 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11752" class="LineNr">11752 </span> (<a href='mu.subx.html#L12291'>translate-mu-compute-index-stmt</a> *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) +<span id="L11753" class="LineNr">11753 </span> e9/jump $emit-subx-stmt:end/disp32 +<span id="L11754" class="LineNr">11754 </span> } +<span id="L11755" class="LineNr">11755 </span> <span class="subxComment"># get field from record</span> +<span id="L11756" class="LineNr">11756 </span> { +<span id="L11757" class="LineNr">11757 </span> <span class="subxComment"># if (!string-equal?(stmt->operation, "get")) break</span> +<span id="L11758" class="LineNr">11758 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"get"</span>) <span class="subxComment"># => eax</span> +<span id="L11759" class="LineNr">11759 </span> 3d/compare-eax-and 0/imm32 +<span id="L11760" class="LineNr">11760 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L11761" class="LineNr">11761 </span> (<a href='mu.subx.html#L12339'>translate-mu-get-stmt</a> *(ebp+8) *(ebp+0xc)) +<span id="L11762" class="LineNr">11762 </span> e9/jump $emit-subx-stmt:end/disp32 +<span id="L11763" class="LineNr">11763 </span> } +<span id="L11764" class="LineNr">11764 </span> <span class="subxH1Comment"># - if stmt matches a primitive, emit it</span> +<span id="L11765" class="LineNr">11765 </span> { +<span id="L11766" class="LineNr">11766 </span><span class="Constant">$emit-subx-stmt:check-for-primitive</span>: +<span id="L11767" class="LineNr">11767 </span> <span class="subxComment"># var curr/eax: (addr primitive)</span> +<span id="L11768" class="LineNr">11768 </span> (<a href='mu.subx.html#L16085'>find-matching-primitive</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># primitives, stmt => eax</span> +<span id="L11769" class="LineNr">11769 </span> 3d/compare-eax-and 0/imm32 +<span id="L11770" class="LineNr">11770 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11771" class="LineNr">11771 </span><span class="Constant">$emit-subx-stmt:primitive</span>: +<span id="L11772" class="LineNr">11772 </span> (<a href='mu.subx.html#L15634'>emit-subx-primitive</a> *(ebp+8) *(ebp+0xc) %eax) <span class="subxComment"># out, stmt, curr</span> +<span id="L11773" class="LineNr">11773 </span> e9/jump $emit-subx-stmt:end/disp32 +<span id="L11774" class="LineNr">11774 </span> } +<span id="L11775" class="LineNr">11775 </span> <span class="subxH1Comment"># - otherwise emit a call</span> +<span id="L11776" class="LineNr">11776 </span> <span class="subxComment"># TODO: type-checking</span> +<span id="L11777" class="LineNr">11777 </span><span class="Constant">$emit-subx-stmt:call</span>: +<span id="L11778" class="LineNr">11778 </span> (<a href='mu.subx.html#L15836'>emit-call</a> *(ebp+8) *(ebp+0xc)) +<span id="L11779" class="LineNr">11779 </span><span class="Constant">$emit-subx-stmt:end</span>: +<span id="L11780" class="LineNr">11780 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11781" class="LineNr">11781 </span> 59/pop-to-ecx +<span id="L11782" class="LineNr">11782 </span> 58/pop-to-eax +<span id="L11783" class="LineNr">11783 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11784" class="LineNr">11784 </span> 89/<- %esp 5/r32/ebp +<span id="L11785" class="LineNr">11785 </span> 5d/pop-to-ebp +<span id="L11786" class="LineNr">11786 </span> c3/return +<span id="L11787" class="LineNr">11787 </span> +<span id="L11788" class="LineNr">11788 </span><span class="subxFunction">translate-mu-length-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L11789" class="LineNr">11789 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11790" class="LineNr">11790 </span> 55/push-ebp +<span id="L11791" class="LineNr">11791 </span> 89/<- %ebp 4/r32/esp +<span id="L11792" class="LineNr">11792 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11793" class="LineNr">11793 </span> 50/push-eax +<span id="L11794" class="LineNr">11794 </span> 51/push-ecx +<span id="L11795" class="LineNr">11795 </span> 52/push-edx +<span id="L11796" class="LineNr">11796 </span> 53/push-ebx +<span id="L11797" class="LineNr">11797 </span> 56/push-esi +<span id="L11798" class="LineNr">11798 </span> <span class="subxComment"># esi = stmt</span> +<span id="L11799" class="LineNr">11799 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L11800" class="LineNr">11800 </span> <span class="subxComment"># var base/ebx: (addr var) = stmt->inouts[0]->value</span> +<span id="L11801" class="LineNr">11801 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L11802" class="LineNr">11802 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L11803" class="LineNr">11803 </span> 89/<- %ebx 0/r32/eax +<span id="L11804" class="LineNr">11804 </span> <span class="subxComment"># var elemsize/ecx: int = array-element-size(base)</span> +<span id="L11805" class="LineNr">11805 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L11806" class="LineNr">11806 </span> 89/<- %ecx 0/r32/eax +<span id="L11807" class="LineNr">11807 </span> <span class="subxComment"># var outreg/edx: (addr array byte) = stmt->outputs[0]->value->register</span> +<span id="L11808" class="LineNr">11808 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x14) *(esi+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L11809" class="LineNr">11809 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L11810" class="LineNr">11810 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11811" class="LineNr">11811 </span> 89/<- %edx 0/r32/eax +<span id="L11812" class="LineNr">11812 </span> <span class="subxComment"># if elemsize == 1</span> +<span id="L11813" class="LineNr">11813 </span> { +<span id="L11814" class="LineNr">11814 </span> 81 7/subop/compare %ecx 1/imm32 +<span id="L11815" class="LineNr">11815 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11816" class="LineNr">11816 </span><span class="Constant">$translate-mu-length-stmt:size-1</span>: +<span id="L11817" class="LineNr">11817 </span> (<a href='mu.subx.html#L11943'>emit-save-size-to</a> *(ebp+8) %ebx %edx) +<span id="L11818" class="LineNr">11818 </span> e9/jump $translate-mu-length-stmt:end/disp32 +<span id="L11819" class="LineNr">11819 </span> } +<span id="L11820" class="LineNr">11820 </span> <span class="subxComment"># if elemsize is a power of 2 less than 256</span> +<span id="L11821" class="LineNr">11821 </span> { +<span id="L11822" class="LineNr">11822 </span> (<a href='mu.subx.html#L12499'>power-of-2?</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L11823" class="LineNr">11823 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11824" class="LineNr">11824 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11825" class="LineNr">11825 </span> 81 7/subop/compare %ecx 0xff/imm32 +<span id="L11826" class="LineNr">11826 </span> 7f/jump-if-> <span class="Constant">break</span>/disp8 +<span id="L11827" class="LineNr">11827 </span><span class="Constant">$translate-mu-length-stmt:size-power-of-2</span>: +<span id="L11828" class="LineNr">11828 </span> (<a href='mu.subx.html#L11943'>emit-save-size-to</a> *(ebp+8) %ebx %edx) +<span id="L11829" class="LineNr">11829 </span> (<a href='mu.subx.html#L11986'>emit-divide-by-shift-right</a> *(ebp+8) %edx %ecx) +<span id="L11830" class="LineNr">11830 </span> e9/jump $translate-mu-length-stmt:end/disp32 +<span id="L11831" class="LineNr">11831 </span> } +<span id="L11832" class="LineNr">11832 </span> <span class="subxComment"># otherwise, the complex case</span> +<span id="L11833" class="LineNr">11833 </span> <span class="subxS1Comment"># . emit register spills</span> +<span id="L11834" class="LineNr">11834 </span> { +<span id="L11835" class="LineNr">11835 </span><span class="Constant">$translate-mu-length-stmt:complex</span>: +<span id="L11836" class="LineNr">11836 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> +<span id="L11837" class="LineNr">11837 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11838" class="LineNr">11838 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11839" class="LineNr">11839 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11840" class="LineNr">11840 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"50/push-eax\n"</span>) +<span id="L11841" class="LineNr">11841 </span> } +<span id="L11842" class="LineNr">11842 </span> { +<span id="L11843" class="LineNr">11843 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"ecx"</span>) <span class="subxComment"># => eax</span> +<span id="L11844" class="LineNr">11844 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11845" class="LineNr">11845 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11846" class="LineNr">11846 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11847" class="LineNr">11847 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"51/push-ecx\n"</span>) +<span id="L11848" class="LineNr">11848 </span> } +<span id="L11849" class="LineNr">11849 </span> { +<span id="L11850" class="LineNr">11850 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"edx"</span>) <span class="subxComment"># => eax</span> +<span id="L11851" class="LineNr">11851 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11852" class="LineNr">11852 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11853" class="LineNr">11853 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11854" class="LineNr">11854 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"52/push-edx\n"</span>) +<span id="L11855" class="LineNr">11855 </span> } +<span id="L11856" class="LineNr">11856 </span> <span class="subxS1Comment"># .</span> +<span id="L11857" class="LineNr">11857 </span> (<a href='mu.subx.html#L11943'>emit-save-size-to</a> *(ebp+8) %ebx <span class="Constant">"eax"</span>) +<span id="L11858" class="LineNr">11858 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11859" class="LineNr">11859 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"31/xor %edx 2/r32/edx\n"</span>) +<span id="L11860" class="LineNr">11860 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11861" class="LineNr">11861 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"b9/copy-to-ecx "</span>) +<span id="L11862" class="LineNr">11862 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %ecx) +<span id="L11863" class="LineNr">11863 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32\n"</span>) +<span id="L11864" class="LineNr">11864 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11865" class="LineNr">11865 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"f7 7/subop/idiv-eax-edx-by %ecx\n"</span>) +<span id="L11866" class="LineNr">11866 </span> { +<span id="L11867" class="LineNr">11867 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> +<span id="L11868" class="LineNr">11868 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11869" class="LineNr">11869 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11870" class="LineNr">11870 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11871" class="LineNr">11871 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"89/<- %"</span>) +<span id="L11872" class="LineNr">11872 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %edx) +<span id="L11873" class="LineNr">11873 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 0/r32/eax\n"</span>) +<span id="L11874" class="LineNr">11874 </span> } +<span id="L11875" class="LineNr">11875 </span> <span class="subxS1Comment"># . emit register restores</span> +<span id="L11876" class="LineNr">11876 </span> { +<span id="L11877" class="LineNr">11877 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"edx"</span>) <span class="subxComment"># => eax</span> +<span id="L11878" class="LineNr">11878 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11879" class="LineNr">11879 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11880" class="LineNr">11880 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11881" class="LineNr">11881 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"5a/pop-to-edx\n"</span>) +<span id="L11882" class="LineNr">11882 </span> } +<span id="L11883" class="LineNr">11883 </span> { +<span id="L11884" class="LineNr">11884 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"ecx"</span>) <span class="subxComment"># => eax</span> +<span id="L11885" class="LineNr">11885 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11886" class="LineNr">11886 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11887" class="LineNr">11887 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11888" class="LineNr">11888 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"59/pop-to-ecx\n"</span>) +<span id="L11889" class="LineNr">11889 </span> } +<span id="L11890" class="LineNr">11890 </span> { +<span id="L11891" class="LineNr">11891 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %edx <span class="Constant">"eax"</span>) <span class="subxComment"># => eax</span> +<span id="L11892" class="LineNr">11892 </span> 3d/compare-eax-and 0/imm32/false +<span id="L11893" class="LineNr">11893 </span> 75/break-if-!= <span class="Constant">break</span>/disp8 +<span id="L11894" class="LineNr">11894 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11895" class="LineNr">11895 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"58/pop-to-eax\n"</span>) +<span id="L11896" class="LineNr">11896 </span> } +<span id="L11897" class="LineNr">11897 </span><span class="Constant">$translate-mu-length-stmt:end</span>: +<span id="L11898" class="LineNr">11898 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11899" class="LineNr">11899 </span> 5e/pop-to-esi +<span id="L11900" class="LineNr">11900 </span> 5b/pop-to-ebx +<span id="L11901" class="LineNr">11901 </span> 5a/pop-to-edx +<span id="L11902" class="LineNr">11902 </span> 59/pop-to-ecx +<span id="L11903" class="LineNr">11903 </span> 58/pop-to-eax +<span id="L11904" class="LineNr">11904 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11905" class="LineNr">11905 </span> 89/<- %esp 5/r32/ebp +<span id="L11906" class="LineNr">11906 </span> 5d/pop-to-ebp +<span id="L11907" class="LineNr">11907 </span> c3/return +<span id="L11908" class="LineNr">11908 </span> +<span id="L11909" class="LineNr">11909 </span><span class="subxFunction">array-element-size</span>: <span class="subxComment"># arr: (addr var), err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: int</span> +<span id="L11910" class="LineNr">11910 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11911" class="LineNr">11911 </span> 55/push-ebp +<span id="L11912" class="LineNr">11912 </span> 89/<- %ebp 4/r32/esp +<span id="L11913" class="LineNr">11913 </span> <span class="subxComment">#</span> +<span id="L11914" class="LineNr">11914 </span> (<a href='mu.subx.html#L12401'>array-element-type-id</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L11915" class="LineNr">11915 </span> (<a href='mu.subx.html#L11922'>size-of-type-id-as-array-element</a> %eax) <span class="subxComment"># => eax</span> +<span id="L11916" class="LineNr">11916 </span><span class="Constant">$array-element-size:end</span>: +<span id="L11917" class="LineNr">11917 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11918" class="LineNr">11918 </span> 89/<- %esp 5/r32/ebp +<span id="L11919" class="LineNr">11919 </span> 5d/pop-to-ebp +<span id="L11920" class="LineNr">11920 </span> c3/return +<span id="L11921" class="LineNr">11921 </span> +<span id="L11922" class="LineNr">11922 </span><span class="subxFunction">size-of-type-id-as-array-element</span>: <span class="subxComment"># t: type-id -> result/eax: int</span> +<span id="L11923" class="LineNr">11923 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11924" class="LineNr">11924 </span> 55/push-ebp +<span id="L11925" class="LineNr">11925 </span> 89/<- %ebp 4/r32/esp +<span id="L11926" class="LineNr">11926 </span> <span class="subxComment"># eax = t</span> +<span id="L11927" class="LineNr">11927 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L11928" class="LineNr">11928 </span> <span class="subxComment"># if t is 'byte', size is 1</span> +<span id="L11929" class="LineNr">11929 </span> 3d/compare-eax-and 8/imm32/byte +<span id="L11930" class="LineNr">11930 </span> { +<span id="L11931" class="LineNr">11931 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L11932" class="LineNr">11932 </span> b8/copy-to-eax 1/imm32 +<span id="L11933" class="LineNr">11933 </span> eb/jump $array-element-size:end/disp8 +<span id="L11934" class="LineNr">11934 </span> } +<span id="L11935" class="LineNr">11935 </span> <span class="subxComment"># otherwise proceed as usual</span> +<span id="L11936" class="LineNr">11936 </span> (<a href='mu.subx.html#L10301'>size-of-type-id</a> %eax) <span class="subxComment"># => eax</span> +<span id="L11937" class="LineNr">11937 </span><span class="Constant">$size-of-type-id-as-array-element:end</span>: +<span id="L11938" class="LineNr">11938 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11939" class="LineNr">11939 </span> 89/<- %esp 5/r32/ebp +<span id="L11940" class="LineNr">11940 </span> 5d/pop-to-ebp +<span id="L11941" class="LineNr">11941 </span> c3/return +<span id="L11942" class="LineNr">11942 </span> +<span id="L11943" class="LineNr">11943 </span><span class="subxFunction">emit-save-size-to</span>: <span class="subxComment"># out: (addr buffered-file), base: (addr var), outreg: (addr array byte)</span> +<span id="L11944" class="LineNr">11944 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11945" class="LineNr">11945 </span> 55/push-ebp +<span id="L11946" class="LineNr">11946 </span> 89/<- %ebp 4/r32/esp +<span id="L11947" class="LineNr">11947 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11948" class="LineNr">11948 </span> 50/push-eax +<span id="L11949" class="LineNr">11949 </span> 53/push-ebx +<span id="L11950" class="LineNr">11950 </span> <span class="subxComment"># ebx = base</span> +<span id="L11951" class="LineNr">11951 </span> 8b/-> *(ebp+0xc) 3/r32/ebx +<span id="L11952" class="LineNr">11952 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11953" class="LineNr">11953 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8b/-> *"</span>) +<span id="L11954" class="LineNr">11954 </span> <span class="subxComment"># if base is an (addr array ...) in a register</span> +<span id="L11955" class="LineNr">11955 </span> { +<span id="L11956" class="LineNr">11956 </span> 81 7/subop/compare *(ebx+0x18)) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L11957" class="LineNr">11957 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11958" class="LineNr">11958 </span><span class="Constant">$emit-save-size-to:emit-base-from-register</span>: +<span id="L11959" class="LineNr">11959 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L11960" class="LineNr">11960 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L11961" class="LineNr">11961 </span> eb/jump $emit-save-size-to:emit-output/disp8 +<span id="L11962" class="LineNr">11962 </span> } +<span id="L11963" class="LineNr">11963 </span> <span class="subxComment"># otherwise if base is an (array ...) on the stack</span> +<span id="L11964" class="LineNr">11964 </span> { +<span id="L11965" class="LineNr">11965 </span> 81 7/subop/compare *(ebx+0x14)) 0/imm32 <span class="subxComment"># Var-offset</span> +<span id="L11966" class="LineNr">11966 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L11967" class="LineNr">11967 </span><span class="Constant">$emit-save-size-to:emit-base-from-stack</span>: +<span id="L11968" class="LineNr">11968 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"(ebp+"</span>) +<span id="L11969" class="LineNr">11969 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *(ebx+0x14)) <span class="subxComment"># Var-offset</span> +<span id="L11970" class="LineNr">11970 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) +<span id="L11971" class="LineNr">11971 </span> } +<span id="L11972" class="LineNr">11972 </span><span class="Constant">$emit-save-size-to:emit-output</span>: +<span id="L11973" class="LineNr">11973 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" "</span>) +<span id="L11974" class="LineNr">11974 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> *(ebp+0x10) 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax</span> +<span id="L11975" class="LineNr">11975 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L11976" class="LineNr">11976 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) +<span id="L11977" class="LineNr">11977 </span><span class="Constant">$emit-save-size-to:end</span>: +<span id="L11978" class="LineNr">11978 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L11979" class="LineNr">11979 </span> 5b/pop-to-ebx +<span id="L11980" class="LineNr">11980 </span> 58/pop-to-eax +<span id="L11981" class="LineNr">11981 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L11982" class="LineNr">11982 </span> 89/<- %esp 5/r32/ebp +<span id="L11983" class="LineNr">11983 </span> 5d/pop-to-ebp +<span id="L11984" class="LineNr">11984 </span> c3/return +<span id="L11985" class="LineNr">11985 </span> +<span id="L11986" class="LineNr">11986 </span><span class="subxFunction">emit-divide-by-shift-right</span>: <span class="subxComment"># out: (addr buffered-file), reg: (addr array byte), size: int</span> +<span id="L11987" class="LineNr">11987 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L11988" class="LineNr">11988 </span> 55/push-ebp +<span id="L11989" class="LineNr">11989 </span> 89/<- %ebp 4/r32/esp +<span id="L11990" class="LineNr">11990 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L11991" class="LineNr">11991 </span> 50/push-eax +<span id="L11992" class="LineNr">11992 </span> <span class="subxComment">#</span> +<span id="L11993" class="LineNr">11993 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L11994" class="LineNr">11994 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"c1/shift 5/subop/>> %"</span>) +<span id="L11995" class="LineNr">11995 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) *(ebp+0xc)) +<span id="L11996" class="LineNr">11996 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L11997" class="LineNr">11997 </span> (<a href='mu.subx.html#L12529'>num-shift-rights</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L11998" class="LineNr">11998 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L11999" class="LineNr">11999 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm8\n"</span>) +<span id="L12000" class="LineNr">12000 </span><span class="Constant">$emit-divide-by-shift-right:end</span>: +<span id="L12001" class="LineNr">12001 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12002" class="LineNr">12002 </span> 58/pop-to-eax +<span id="L12003" class="LineNr">12003 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12004" class="LineNr">12004 </span> 89/<- %esp 5/r32/ebp +<span id="L12005" class="LineNr">12005 </span> 5d/pop-to-ebp +<span id="L12006" class="LineNr">12006 </span> c3/return +<span id="L12007" class="LineNr">12007 </span> +<span id="L12008" class="LineNr">12008 </span><span class="subxFunction">translate-mu-index-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L12009" class="LineNr">12009 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12010" class="LineNr">12010 </span> 55/push-ebp +<span id="L12011" class="LineNr">12011 </span> 89/<- %ebp 4/r32/esp +<span id="L12012" class="LineNr">12012 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12013" class="LineNr">12013 </span> 51/push-ecx +<span id="L12014" class="LineNr">12014 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L12015" class="LineNr">12015 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L12016" class="LineNr">12016 </span> <span class="subxComment"># var base/ecx: (addr var) = stmt->inouts[0]</span> +<span id="L12017" class="LineNr">12017 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12018" class="LineNr">12018 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12019" class="LineNr">12019 </span> 89/<- %ecx 0/r32/eax +<span id="L12020" class="LineNr">12020 </span> <span class="subxComment"># if (var->register) do one thing</span> +<span id="L12021" class="LineNr">12021 </span> { +<span id="L12022" class="LineNr">12022 </span> 81 7/subop/compare *(ecx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L12023" class="LineNr">12023 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L12024" class="LineNr">12024 </span> <span class="subxComment"># TODO: ensure there's no dereference</span> +<span id="L12025" class="LineNr">12025 </span> (<a href='mu.subx.html#L12056'>translate-mu-index-stmt-with-array-in-register</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L12026" class="LineNr">12026 </span> eb/jump $translate-mu-index-stmt:end/disp8 +<span id="L12027" class="LineNr">12027 </span> } +<span id="L12028" class="LineNr">12028 </span> <span class="subxComment"># if (var->offset) do a different thing</span> +<span id="L12029" class="LineNr">12029 </span> { +<span id="L12030" class="LineNr">12030 </span> 81 7/subop/compare *(ecx+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> +<span id="L12031" class="LineNr">12031 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L12032" class="LineNr">12032 </span> <span class="subxComment"># TODO: ensure there's no dereference</span> +<span id="L12033" class="LineNr">12033 </span> (<a href='mu.subx.html#L12172'>translate-mu-index-stmt-with-array-on-stack</a> *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14)) +<span id="L12034" class="LineNr">12034 </span> eb/jump $translate-mu-index-stmt:end/disp8 +<span id="L12035" class="LineNr">12035 </span> } +<span id="L12036" class="LineNr">12036 </span><span class="Constant">$translate-mu-index-stmt:end</span>: +<span id="L12037" class="LineNr">12037 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12038" class="LineNr">12038 </span> 59/pop-to-ecx +<span id="L12039" class="LineNr">12039 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12040" class="LineNr">12040 </span> 89/<- %esp 5/r32/ebp +<span id="L12041" class="LineNr">12041 </span> 5d/pop-to-ebp +<span id="L12042" class="LineNr">12042 </span> c3/return +<span id="L12043" class="LineNr">12043 </span> +<span id="L12044" class="LineNr">12044 </span><span class="Constant">$translate-mu-index-stmt-with-array:error1</span>: +<span id="L12045" class="LineNr">12045 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"couldn't translate an index instruction. second (index) input must either lie in a register or be a literal\n"</span>) +<span id="L12046" class="LineNr">12046 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L12047" class="LineNr">12047 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L12048" class="LineNr">12048 </span> <span class="subxComment"># never gets here</span> +<span id="L12049" class="LineNr">12049 </span> +<span id="L12050" class="LineNr">12050 </span><span class="Constant">$translate-mu-index-stmt-with-array:error2</span>: +<span id="L12051" class="LineNr">12051 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"couldn't translate an index instruction. second (index) input when in a register must be an int or offset\n"</span>) +<span id="L12052" class="LineNr">12052 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L12053" class="LineNr">12053 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L12054" class="LineNr">12054 </span> <span class="subxComment"># never gets here</span> +<span id="L12055" class="LineNr">12055 </span> +<span id="L12056" class="LineNr">12056 </span><span class="subxFunction">translate-mu-index-stmt-with-array-in-register</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L12057" class="LineNr">12057 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12058" class="LineNr">12058 </span> 55/push-ebp +<span id="L12059" class="LineNr">12059 </span> 89/<- %ebp 4/r32/esp +<span id="L12060" class="LineNr">12060 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12061" class="LineNr">12061 </span> 50/push-eax +<span id="L12062" class="LineNr">12062 </span> 51/push-ecx +<span id="L12063" class="LineNr">12063 </span> 52/push-edx +<span id="L12064" class="LineNr">12064 </span> 53/push-ebx +<span id="L12065" class="LineNr">12065 </span> <span class="subxComment">#</span> +<span id="L12066" class="LineNr">12066 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12067" class="LineNr">12067 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address *("</span>) +<span id="L12068" class="LineNr">12068 </span> <span class="subxComment"># TODO: ensure inouts[0] is in a register and not dereferenced</span> +<span id="L12069" class="LineNr">12069 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-base</span>: +<span id="L12070" class="LineNr">12070 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L12071" class="LineNr">12071 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L12072" class="LineNr">12072 </span> <span class="subxComment"># var base/ebx: (addr var) = inouts[0]</span> +<span id="L12073" class="LineNr">12073 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12074" class="LineNr">12074 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12075" class="LineNr">12075 </span> 89/<- %ebx 0/r32/eax +<span id="L12076" class="LineNr">12076 </span> <span class="subxComment"># print base->register " + "</span> +<span id="L12077" class="LineNr">12077 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+0x18) *(ebx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12078" class="LineNr">12078 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12079" class="LineNr">12079 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) +<span id="L12080" class="LineNr">12080 </span> <span class="subxComment"># var index/edx: (addr var) = inouts[1]</span> +<span id="L12081" class="LineNr">12081 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12082" class="LineNr">12082 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L12083" class="LineNr">12083 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12084" class="LineNr">12084 </span> 89/<- %edx 0/r32/eax +<span id="L12085" class="LineNr">12085 </span> <span class="subxComment"># if index->register</span> +<span id="L12086" class="LineNr">12086 </span> 81 7/subop/compare *(edx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L12087" class="LineNr">12087 </span> { +<span id="L12088" class="LineNr">12088 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12089" class="LineNr">12089 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-register-index</span>: +<span id="L12090" class="LineNr">12090 </span> <span class="subxComment"># if index is an int</span> +<span id="L12091" class="LineNr">12091 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12092" class="LineNr">12092 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 1) <span class="subxComment"># int => eax</span> +<span id="L12093" class="LineNr">12093 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12094" class="LineNr">12094 </span> { +<span id="L12095" class="LineNr">12095 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12096" class="LineNr">12096 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-int-register-index</span>: +<span id="L12097" class="LineNr">12097 </span> <span class="subxComment"># print index->register "<<" log2(array-element-size(base)) " + 4) "</span> +<span id="L12098" class="LineNr">12098 </span> <span class="subxS1Comment"># . index->register "<<"</span> +<span id="L12099" class="LineNr">12099 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12100" class="LineNr">12100 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12101" class="LineNr">12101 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"<<"</span>) +<span id="L12102" class="LineNr">12102 </span> <span class="subxS1Comment"># . log2(array-element-size(base->type))</span> +<span id="L12103" class="LineNr">12103 </span> <span class="subxComment"># TODO: ensure size is a power of 2</span> +<span id="L12104" class="LineNr">12104 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L12105" class="LineNr">12105 </span> (<a href='mu.subx.html#L12529'>num-shift-rights</a> %eax) <span class="subxComment"># => eax</span> +<span id="L12106" class="LineNr">12106 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12107" class="LineNr">12107 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-register-index-done/disp32 +<span id="L12108" class="LineNr">12108 </span> } +<span id="L12109" class="LineNr">12109 </span> <span class="subxComment"># if index->type is any other atom, abort</span> +<span id="L12110" class="LineNr">12110 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12111" class="LineNr">12111 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L12112" class="LineNr">12112 </span> 0f 85/jump-if-!= $translate-mu-index-stmt-with-array:error2/disp32 +<span id="L12113" class="LineNr">12113 </span> <span class="subxComment"># if index has type (offset ...)</span> +<span id="L12114" class="LineNr">12114 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L12115" class="LineNr">12115 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 7) <span class="subxComment"># => eax</span> +<span id="L12116" class="LineNr">12116 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12117" class="LineNr">12117 </span> { +<span id="L12118" class="LineNr">12118 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12119" class="LineNr">12119 </span> <span class="subxComment"># print index->register</span> +<span id="L12120" class="LineNr">12120 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-offset-register-index</span>: +<span id="L12121" class="LineNr">12121 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12122" class="LineNr">12122 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12123" class="LineNr">12123 </span> } +<span id="L12124" class="LineNr">12124 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-register-index-done</span>: +<span id="L12125" class="LineNr">12125 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + 4) "</span>) +<span id="L12126" class="LineNr">12126 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-output/disp32 +<span id="L12127" class="LineNr">12127 </span> } +<span id="L12128" class="LineNr">12128 </span> <span class="subxComment"># otherwise if index is a literal</span> +<span id="L12129" class="LineNr">12129 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12130" class="LineNr">12130 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 0) <span class="subxComment"># => eax</span> +<span id="L12131" class="LineNr">12131 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12132" class="LineNr">12132 </span> { +<span id="L12133" class="LineNr">12133 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12134" class="LineNr">12134 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-literal-index</span>: +<span id="L12135" class="LineNr">12135 </span> <span class="subxComment"># var index-value/edx: int = parse-hex-int(index->name)</span> +<span id="L12136" class="LineNr">12136 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12137" class="LineNr">12137 </span> (<a href='../067parse-hex.subx.html#L354'>parse-hex-int</a> %eax) <span class="subxComment"># => eax</span> +<span id="L12138" class="LineNr">12138 </span> 89/<- %edx 0/r32/eax +<span id="L12139" class="LineNr">12139 </span> <span class="subxComment"># offset = idx-value * array-element-size(base->type)</span> +<span id="L12140" class="LineNr">12140 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L12141" class="LineNr">12141 </span> f7 4/subop/multiply-into-eax %edx <span class="subxComment"># clobbers edx</span> +<span id="L12142" class="LineNr">12142 </span> <span class="subxComment"># offset += 4 for array size</span> +<span id="L12143" class="LineNr">12143 </span> 05/add-to-eax 4/imm32 +<span id="L12144" class="LineNr">12144 </span> <span class="subxComment"># TODO: check edx for overflow</span> +<span id="L12145" class="LineNr">12145 </span> <span class="subxComment"># print offset</span> +<span id="L12146" class="LineNr">12146 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12147" class="LineNr">12147 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) +<span id="L12148" class="LineNr">12148 </span> e9/jump $translate-mu-index-stmt-with-array-in-register:emit-output/disp32 +<span id="L12149" class="LineNr">12149 </span> } +<span id="L12150" class="LineNr">12150 </span> <span class="subxComment"># otherwise abort</span> +<span id="L12151" class="LineNr">12151 </span> e9/jump $translate-mu-index-stmt-with-array:error1/disp32 +<span id="L12152" class="LineNr">12152 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:emit-output</span>: +<span id="L12153" class="LineNr">12153 </span> <span class="subxComment"># outputs[0] "/r32"</span> +<span id="L12154" class="LineNr">12154 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L12155" class="LineNr">12155 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L12156" class="LineNr">12156 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12157" class="LineNr">12157 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12158" class="LineNr">12158 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> +<span id="L12159" class="LineNr">12159 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L12160" class="LineNr">12160 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) +<span id="L12161" class="LineNr">12161 </span><span class="Constant">$translate-mu-index-stmt-with-array-in-register:end</span>: +<span id="L12162" class="LineNr">12162 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12163" class="LineNr">12163 </span> 5b/pop-to-ebx +<span id="L12164" class="LineNr">12164 </span> 5a/pop-to-edx +<span id="L12165" class="LineNr">12165 </span> 59/pop-to-ecx +<span id="L12166" class="LineNr">12166 </span> 58/pop-to-eax +<span id="L12167" class="LineNr">12167 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12168" class="LineNr">12168 </span> 89/<- %esp 5/r32/ebp +<span id="L12169" class="LineNr">12169 </span> 5d/pop-to-ebp +<span id="L12170" class="LineNr">12170 </span> c3/return +<span id="L12171" class="LineNr">12171 </span> +<span id="L12172" class="LineNr">12172 </span><span class="subxFunction">translate-mu-index-stmt-with-array-on-stack</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L12173" class="LineNr">12173 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12174" class="LineNr">12174 </span> 55/push-ebp +<span id="L12175" class="LineNr">12175 </span> 89/<- %ebp 4/r32/esp +<span id="L12176" class="LineNr">12176 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12177" class="LineNr">12177 </span> 50/push-eax +<span id="L12178" class="LineNr">12178 </span> 51/push-ecx +<span id="L12179" class="LineNr">12179 </span> 52/push-edx +<span id="L12180" class="LineNr">12180 </span> 53/push-ebx +<span id="L12181" class="LineNr">12181 </span> <span class="subxComment">#</span> +<span id="L12182" class="LineNr">12182 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12183" class="LineNr">12183 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address *(ebp + "</span>) +<span id="L12184" class="LineNr">12184 </span> <span class="subxComment"># var curr/edx: (addr stmt-var) = lookup(stmt->inouts)</span> +<span id="L12185" class="LineNr">12185 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L12186" class="LineNr">12186 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12187" class="LineNr">12187 </span> 89/<- %edx 0/r32/eax +<span id="L12188" class="LineNr">12188 </span> <span class="subxComment"># var base/ecx: (addr var) = lookup(curr->value)</span> +<span id="L12189" class="LineNr">12189 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12190" class="LineNr">12190 </span> 89/<- %ecx 0/r32/eax +<span id="L12191" class="LineNr">12191 </span> <span class="subxComment"># var curr2/eax: (addr stmt-var) = lookup(curr->next)</span> +<span id="L12192" class="LineNr">12192 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L12193" class="LineNr">12193 </span> <span class="subxComment"># var index/edx: (handle var) = curr2->value</span> +<span id="L12194" class="LineNr">12194 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12195" class="LineNr">12195 </span> 89/<- %edx 0/r32/eax +<span id="L12196" class="LineNr">12196 </span> <span class="subxComment"># if index->register</span> +<span id="L12197" class="LineNr">12197 </span> 81 7/subop/compare *(edx+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L12198" class="LineNr">12198 </span> { +<span id="L12199" class="LineNr">12199 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12200" class="LineNr">12200 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-register-index</span>: +<span id="L12201" class="LineNr">12201 </span> <span class="subxComment"># if index is an int</span> +<span id="L12202" class="LineNr">12202 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12203" class="LineNr">12203 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 1) <span class="subxComment"># int => eax</span> +<span id="L12204" class="LineNr">12204 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12205" class="LineNr">12205 </span> { +<span id="L12206" class="LineNr">12206 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12207" class="LineNr">12207 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-int-register-index</span>: +<span id="L12208" class="LineNr">12208 </span> <span class="subxComment"># print index->register "<<" log2(array-element-size(base)) " + " base->offset+4</span> +<span id="L12209" class="LineNr">12209 </span> <span class="subxS1Comment"># . inouts[1]->register "<<"</span> +<span id="L12210" class="LineNr">12210 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12211" class="LineNr">12211 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12212" class="LineNr">12212 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"<<"</span>) +<span id="L12213" class="LineNr">12213 </span> <span class="subxS1Comment"># . log2(array-element-size(base))</span> +<span id="L12214" class="LineNr">12214 </span> <span class="subxComment"># TODO: ensure size is a power of 2</span> +<span id="L12215" class="LineNr">12215 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L12216" class="LineNr">12216 </span> (<a href='mu.subx.html#L12529'>num-shift-rights</a> %eax) <span class="subxComment"># => eax</span> +<span id="L12217" class="LineNr">12217 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12218" class="LineNr">12218 </span> <span class="subxComment">#</span> +<span id="L12219" class="LineNr">12219 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) +<span id="L12220" class="LineNr">12220 </span> <span class="subxComment">#</span> +<span id="L12221" class="LineNr">12221 </span> 8b/-> *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> +<span id="L12222" class="LineNr">12222 </span> 05/add-to-eax 4/imm32 <span class="subxComment"># for array length</span> +<span id="L12223" class="LineNr">12223 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12224" class="LineNr">12224 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-register-index-done/disp32 +<span id="L12225" class="LineNr">12225 </span> } +<span id="L12226" class="LineNr">12226 </span> <span class="subxComment"># if index->type is any other atom, abort</span> +<span id="L12227" class="LineNr">12227 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12228" class="LineNr">12228 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L12229" class="LineNr">12229 </span> 0f 85/jump-if-!= $translate-mu-index-stmt-with-array:error2/disp32 +<span id="L12230" class="LineNr">12230 </span> <span class="subxComment"># if index has type (offset ...)</span> +<span id="L12231" class="LineNr">12231 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L12232" class="LineNr">12232 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 7) <span class="subxComment"># => eax</span> +<span id="L12233" class="LineNr">12233 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12234" class="LineNr">12234 </span> { +<span id="L12235" class="LineNr">12235 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12236" class="LineNr">12236 </span> <span class="subxComment"># print index->register</span> +<span id="L12237" class="LineNr">12237 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-offset-register-index</span>: +<span id="L12238" class="LineNr">12238 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x18) *(edx+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12239" class="LineNr">12239 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12240" class="LineNr">12240 </span> } +<span id="L12241" class="LineNr">12241 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-register-index-done</span>: +<span id="L12242" class="LineNr">12242 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) +<span id="L12243" class="LineNr">12243 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-output/disp32 +<span id="L12244" class="LineNr">12244 </span> } +<span id="L12245" class="LineNr">12245 </span> <span class="subxComment"># otherwise if index is a literal</span> +<span id="L12246" class="LineNr">12246 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12247" class="LineNr">12247 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 0) <span class="subxComment"># => eax</span> +<span id="L12248" class="LineNr">12248 </span> 3d/compare-eax-and 0/imm32/false +<span id="L12249" class="LineNr">12249 </span> { +<span id="L12250" class="LineNr">12250 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12251" class="LineNr">12251 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-literal-index</span>: +<span id="L12252" class="LineNr">12252 </span> <span class="subxComment"># var idx-value/edx: int = parse-hex-int(index->name)</span> +<span id="L12253" class="LineNr">12253 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12254" class="LineNr">12254 </span> (<a href='../067parse-hex.subx.html#L354'>parse-hex-int</a> %eax) <span class="subxComment"># Var-name => eax</span> +<span id="L12255" class="LineNr">12255 </span> 89/<- %edx 0/r32/eax +<span id="L12256" class="LineNr">12256 </span> <span class="subxComment"># offset = idx-value * array-element-size(base)</span> +<span id="L12257" class="LineNr">12257 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ecx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L12258" class="LineNr">12258 </span> f7 4/subop/multiply-into-eax %edx <span class="subxComment"># clobbers edx</span> +<span id="L12259" class="LineNr">12259 </span> <span class="subxComment"># offset += base->offset</span> +<span id="L12260" class="LineNr">12260 </span> 03/add *(ecx+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> +<span id="L12261" class="LineNr">12261 </span> <span class="subxComment"># offset += 4 for array size</span> +<span id="L12262" class="LineNr">12262 </span> 05/add-to-eax 4/imm32 +<span id="L12263" class="LineNr">12263 </span> <span class="subxComment"># TODO: check edx for overflow</span> +<span id="L12264" class="LineNr">12264 </span> <span class="subxComment"># print offset</span> +<span id="L12265" class="LineNr">12265 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12266" class="LineNr">12266 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) +<span id="L12267" class="LineNr">12267 </span> e9/jump $translate-mu-index-stmt-with-array-on-stack:emit-output/disp32 +<span id="L12268" class="LineNr">12268 </span> } +<span id="L12269" class="LineNr">12269 </span> <span class="subxComment"># otherwise abort</span> +<span id="L12270" class="LineNr">12270 </span> e9/jump $translate-mu-index-stmt-with-array:error1/disp32 +<span id="L12271" class="LineNr">12271 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:emit-output</span>: +<span id="L12272" class="LineNr">12272 </span> <span class="subxComment"># outputs[0] "/r32"</span> +<span id="L12273" class="LineNr">12273 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L12274" class="LineNr">12274 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x14) *(eax+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L12275" class="LineNr">12275 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12276" class="LineNr">12276 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12277" class="LineNr">12277 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> +<span id="L12278" class="LineNr">12278 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L12279" class="LineNr">12279 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) +<span id="L12280" class="LineNr">12280 </span><span class="Constant">$translate-mu-index-stmt-with-array-on-stack:end</span>: +<span id="L12281" class="LineNr">12281 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12282" class="LineNr">12282 </span> 5b/pop-to-ebx +<span id="L12283" class="LineNr">12283 </span> 5a/pop-to-edx +<span id="L12284" class="LineNr">12284 </span> 59/pop-to-ecx +<span id="L12285" class="LineNr">12285 </span> 58/pop-to-eax +<span id="L12286" class="LineNr">12286 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12287" class="LineNr">12287 </span> 89/<- %esp 5/r32/ebp +<span id="L12288" class="LineNr">12288 </span> 5d/pop-to-ebp +<span id="L12289" class="LineNr">12289 </span> c3/return +<span id="L12290" class="LineNr">12290 </span> +<span id="L12291" class="LineNr">12291 </span><span class="subxFunction">translate-mu-compute-index-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L12292" class="LineNr">12292 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12293" class="LineNr">12293 </span> 55/push-ebp +<span id="L12294" class="LineNr">12294 </span> 89/<- %ebp 4/r32/esp +<span id="L12295" class="LineNr">12295 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12296" class="LineNr">12296 </span> 50/push-eax +<span id="L12297" class="LineNr">12297 </span> 51/push-ecx +<span id="L12298" class="LineNr">12298 </span> 52/push-edx +<span id="L12299" class="LineNr">12299 </span> 53/push-ebx +<span id="L12300" class="LineNr">12300 </span> <span class="subxComment">#</span> +<span id="L12301" class="LineNr">12301 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12302" class="LineNr">12302 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"69/multiply"</span>) +<span id="L12303" class="LineNr">12303 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L12304" class="LineNr">12304 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L12305" class="LineNr">12305 </span> <span class="subxComment"># var first-inout/ebx: (addr stmt-var) = stmt->inouts[0]</span> +<span id="L12306" class="LineNr">12306 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12307" class="LineNr">12307 </span> 89/<- %ebx 0/r32/eax +<span id="L12308" class="LineNr">12308 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-index</span>: +<span id="L12309" class="LineNr">12309 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ebx+8) *(ebx+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L12310" class="LineNr">12310 </span> (<a href='mu.subx.html#L16026'>emit-subx-var-as-rm32</a> *(ebp+8) %eax) +<span id="L12311" class="LineNr">12311 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L12312" class="LineNr">12312 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-elem-size</span>: +<span id="L12313" class="LineNr">12313 </span> <span class="subxComment"># var base/ebx: (addr var)</span> +<span id="L12314" class="LineNr">12314 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ebx *(ebx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12315" class="LineNr">12315 </span> 89/<- %ebx 0/r32/eax +<span id="L12316" class="LineNr">12316 </span> <span class="subxComment"># print array-element-size(base)</span> +<span id="L12317" class="LineNr">12317 </span> (<a href='mu.subx.html#L11909'>array-element-size</a> %ebx *(ebp+0x10) *(ebp+0x14)) <span class="subxComment"># => eax</span> +<span id="L12318" class="LineNr">12318 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L12319" class="LineNr">12319 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32 "</span>) +<span id="L12320" class="LineNr">12320 </span><span class="Constant">$translate-mu-compute-index-stmt:emit-output</span>: +<span id="L12321" class="LineNr">12321 </span> <span class="subxComment"># outputs[0] "/r32"</span> +<span id="L12322" class="LineNr">12322 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L12323" class="LineNr">12323 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12324" class="LineNr">12324 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12325" class="LineNr">12325 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> +<span id="L12326" class="LineNr">12326 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L12327" class="LineNr">12327 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) +<span id="L12328" class="LineNr">12328 </span><span class="Constant">$translate-mu-compute-index-stmt:end</span>: +<span id="L12329" class="LineNr">12329 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12330" class="LineNr">12330 </span> 5b/pop-to-ebx +<span id="L12331" class="LineNr">12331 </span> 5a/pop-to-edx +<span id="L12332" class="LineNr">12332 </span> 59/pop-to-ecx +<span id="L12333" class="LineNr">12333 </span> 58/pop-to-eax +<span id="L12334" class="LineNr">12334 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12335" class="LineNr">12335 </span> 89/<- %esp 5/r32/ebp +<span id="L12336" class="LineNr">12336 </span> 5d/pop-to-ebp +<span id="L12337" class="LineNr">12337 </span> c3/return +<span id="L12338" class="LineNr">12338 </span> +<span id="L12339" class="LineNr">12339 </span><span class="subxFunction">translate-mu-get-stmt</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> +<span id="L12340" class="LineNr">12340 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12341" class="LineNr">12341 </span> 55/push-ebp +<span id="L12342" class="LineNr">12342 </span> 89/<- %ebp 4/r32/esp +<span id="L12343" class="LineNr">12343 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12344" class="LineNr">12344 </span> 50/push-eax +<span id="L12345" class="LineNr">12345 </span> 51/push-ecx +<span id="L12346" class="LineNr">12346 </span> 52/push-edx +<span id="L12347" class="LineNr">12347 </span> <span class="subxComment">#</span> +<span id="L12348" class="LineNr">12348 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12349" class="LineNr">12349 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"8d/copy-address "</span>) +<span id="L12350" class="LineNr">12350 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L12351" class="LineNr">12351 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L12352" class="LineNr">12352 </span> <span class="subxComment"># var offset/edx: int = get offset of stmt</span> +<span id="L12353" class="LineNr">12353 </span> (<a href='mu.subx.html#L12556'>mu-get-offset</a> %ecx) <span class="subxComment"># => eax</span> +<span id="L12354" class="LineNr">12354 </span> 89/<- %edx 0/r32/eax +<span id="L12355" class="LineNr">12355 </span> <span class="subxComment"># var base/eax: (addr var) = stmt->inouts->value</span> +<span id="L12356" class="LineNr">12356 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12357" class="LineNr">12357 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12358" class="LineNr">12358 </span> <span class="subxComment"># if base is in a register</span> +<span id="L12359" class="LineNr">12359 </span> 81 7/subop/compare *(eax+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L12360" class="LineNr">12360 </span> { +<span id="L12361" class="LineNr">12361 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12362" class="LineNr">12362 </span><span class="Constant">$translate-mu-get-stmt:emit-register-input</span>: +<span id="L12363" class="LineNr">12363 </span> <span class="subxComment"># emit "*(" base->register " + " offset ") "</span> +<span id="L12364" class="LineNr">12364 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*("</span>) +<span id="L12365" class="LineNr">12365 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12366" class="LineNr">12366 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12367" class="LineNr">12367 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" + "</span>) +<span id="L12368" class="LineNr">12368 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) +<span id="L12369" class="LineNr">12369 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) +<span id="L12370" class="LineNr">12370 </span> e9/jump $translate-mu-get-stmt:emit-output/disp32 +<span id="L12371" class="LineNr">12371 </span> } +<span id="L12372" class="LineNr">12372 </span> <span class="subxComment"># otherwise base is on the stack</span> +<span id="L12373" class="LineNr">12373 </span> { +<span id="L12374" class="LineNr">12374 </span><span class="Constant">$translate-mu-get-stmt:emit-stack-input</span>: +<span id="L12375" class="LineNr">12375 </span> <span class="subxComment"># emit "*(ebp + " inouts[0]->stack-offset + offset ") "</span> +<span id="L12376" class="LineNr">12376 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*(ebp+"</span>) +<span id="L12377" class="LineNr">12377 </span> 03/add *(eax+0x14) 2/r32/edx <span class="subxComment"># Var-offset</span> +<span id="L12378" class="LineNr">12378 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %edx) +<span id="L12379" class="LineNr">12379 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">") "</span>) +<span id="L12380" class="LineNr">12380 </span> eb/jump $translate-mu-get-stmt:emit-output/disp8 +<span id="L12381" class="LineNr">12381 </span> } +<span id="L12382" class="LineNr">12382 </span><span class="Constant">$translate-mu-get-stmt:emit-output</span>: +<span id="L12383" class="LineNr">12383 </span> <span class="subxComment"># var output/eax: (addr var) = stmt->outputs->value</span> +<span id="L12384" class="LineNr">12384 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L12385" class="LineNr">12385 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12386" class="LineNr">12386 </span> <span class="subxComment"># emit offset->register "/r32"</span> +<span id="L12387" class="LineNr">12387 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L12388" class="LineNr">12388 </span> (<a href='../081table.subx.html#L26'>get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc <span class="Constant">"Mu-registers"</span>) <span class="subxComment"># => eax: (addr int)</span> +<span id="L12389" class="LineNr">12389 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L12390" class="LineNr">12390 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32\n"</span>) +<span id="L12391" class="LineNr">12391 </span><span class="Constant">$translate-mu-get-stmt:end</span>: +<span id="L12392" class="LineNr">12392 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12393" class="LineNr">12393 </span> 5a/pop-to-edx +<span id="L12394" class="LineNr">12394 </span> 59/pop-to-ecx +<span id="L12395" class="LineNr">12395 </span> 58/pop-to-eax +<span id="L12396" class="LineNr">12396 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12397" class="LineNr">12397 </span> 89/<- %esp 5/r32/ebp +<span id="L12398" class="LineNr">12398 </span> 5d/pop-to-ebp +<span id="L12399" class="LineNr">12399 </span> c3/return +<span id="L12400" class="LineNr">12400 </span> +<span id="L12401" class="LineNr">12401 </span><span class="subxFunction">array-element-type-id</span>: <span class="subxComment"># v: (addr var), err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: type-id</span> +<span id="L12402" class="LineNr">12402 </span> <span class="subxComment"># precondition: n is positive</span> +<span id="L12403" class="LineNr">12403 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12404" class="LineNr">12404 </span> 55/push-ebp +<span id="L12405" class="LineNr">12405 </span> 89/<- %ebp 4/r32/esp +<span id="L12406" class="LineNr">12406 </span> <span class="subxComment">#</span> +<span id="L12407" class="LineNr">12407 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12408" class="LineNr">12408 </span> <span class="subxComment"># var t/eax: (addr tree type-id)</span> +<span id="L12409" class="LineNr">12409 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L12410" class="LineNr">12410 </span> <span class="subxComment"># if t == 0 abort</span> +<span id="L12411" class="LineNr">12411 </span> 3d/compare-eax-with 0/imm32 +<span id="L12412" class="LineNr">12412 </span> 0f 84/jump-if-== $array-element-type-id:error0/disp32 +<span id="L12413" class="LineNr">12413 </span> <span class="subxComment"># if t->is-atom? abort</span> +<span id="L12414" class="LineNr">12414 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L12415" class="LineNr">12415 </span> 0f 85/jump-if-!= $array-element-type-id:error1/disp32 +<span id="L12416" class="LineNr">12416 </span> <span class="subxComment"># if (t->left == addr) t = t->right</span> +<span id="L12417" class="LineNr">12417 </span> { +<span id="L12418" class="LineNr">12418 </span> 50/push-eax +<span id="L12419" class="LineNr">12419 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L12420" class="LineNr">12420 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 2) <span class="subxComment"># addr => eax</span> +<span id="L12421" class="LineNr">12421 </span> 3d/compare-eax-with 0/imm32/false +<span id="L12422" class="LineNr">12422 </span> 58/pop-to-eax +<span id="L12423" class="LineNr">12423 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L12424" class="LineNr">12424 </span><span class="Constant">$array-element-type-id:skip-addr</span>: +<span id="L12425" class="LineNr">12425 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L12426" class="LineNr">12426 </span> } +<span id="L12427" class="LineNr">12427 </span> <span class="subxComment"># if t == 0 abort</span> +<span id="L12428" class="LineNr">12428 </span> 3d/compare-eax-with 0/imm32 +<span id="L12429" class="LineNr">12429 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 +<span id="L12430" class="LineNr">12430 </span> <span class="subxComment"># if t->is-atom? abort</span> +<span id="L12431" class="LineNr">12431 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L12432" class="LineNr">12432 </span> 0f 85/jump-if-!= $array-element-type-id:error2/disp32 +<span id="L12433" class="LineNr">12433 </span> <span class="subxComment"># if t->left != array abort</span> +<span id="L12434" class="LineNr">12434 </span> { +<span id="L12435" class="LineNr">12435 </span> 50/push-eax +<span id="L12436" class="LineNr">12436 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L12437" class="LineNr">12437 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> %eax 3) <span class="subxComment"># array => eax</span> +<span id="L12438" class="LineNr">12438 </span> 3d/compare-eax-with 0/imm32/false +<span id="L12439" class="LineNr">12439 </span> 58/pop-to-eax +<span id="L12440" class="LineNr">12440 </span><span class="Constant">$array-element-type-id:no-array</span>: +<span id="L12441" class="LineNr">12441 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 +<span id="L12442" class="LineNr">12442 </span> } +<span id="L12443" class="LineNr">12443 </span><span class="Constant">$array-element-type-id:skip-array</span>: +<span id="L12444" class="LineNr">12444 </span> <span class="subxComment"># t = t->right</span> +<span id="L12445" class="LineNr">12445 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Tree-right Tree-right => eax</span> +<span id="L12446" class="LineNr">12446 </span> <span class="subxComment"># if t == 0 abort</span> +<span id="L12447" class="LineNr">12447 </span> 3d/compare-eax-with 0/imm32 +<span id="L12448" class="LineNr">12448 </span> 0f 84/jump-if-= $array-element-type-id:error2/disp32 +<span id="L12449" class="LineNr">12449 </span> <span class="subxComment"># if t->is-atom? abort</span> +<span id="L12450" class="LineNr">12450 </span> 81 7/subop/compare *eax 0/imm32/false <span class="subxComment"># Tree-is-atom</span> +<span id="L12451" class="LineNr">12451 </span> 0f 85/jump-if-!= $array-element-type-id:error2/disp32 +<span id="L12452" class="LineNr">12452 </span> <span class="subxComment"># return t->left->value</span> +<span id="L12453" class="LineNr">12453 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Tree-left Tree-left => eax</span> +<span id="L12454" class="LineNr">12454 </span> 8b/-> *(eax+4) 0/r32/eax <span class="subxComment"># Tree-value</span> +<span id="L12455" class="LineNr">12455 </span><span class="Constant">$array-element-type-id:end</span>: +<span id="L12456" class="LineNr">12456 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12457" class="LineNr">12457 </span> 89/<- %esp 5/r32/ebp +<span id="L12458" class="LineNr">12458 </span> 5d/pop-to-ebp +<span id="L12459" class="LineNr">12459 </span> c3/return +<span id="L12460" class="LineNr">12460 </span> +<span id="L12461" class="LineNr">12461 </span><span class="Constant">$array-element-type-id:error0</span>: +<span id="L12462" class="LineNr">12462 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) +<span id="L12463" class="LineNr">12463 </span> 50/push-eax +<span id="L12464" class="LineNr">12464 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12465" class="LineNr">12465 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12466" class="LineNr">12466 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) +<span id="L12467" class="LineNr">12467 </span> 58/pop-to-eax +<span id="L12468" class="LineNr">12468 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has no type\n"</span>) +<span id="L12469" class="LineNr">12469 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) +<span id="L12470" class="LineNr">12470 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) +<span id="L12471" class="LineNr">12471 </span> <span class="subxComment"># never gets here</span> +<span id="L12472" class="LineNr">12472 </span> +<span id="L12473" class="LineNr">12473 </span><span class="Constant">$array-element-type-id:error1</span>: +<span id="L12474" class="LineNr">12474 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) +<span id="L12475" class="LineNr">12475 </span> 50/push-eax +<span id="L12476" class="LineNr">12476 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12477" class="LineNr">12477 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12478" class="LineNr">12478 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) +<span id="L12479" class="LineNr">12479 </span> 58/pop-to-eax +<span id="L12480" class="LineNr">12480 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has atomic type "</span>) +<span id="L12481" class="LineNr">12481 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0xc) *(eax+4)) <span class="subxComment"># Tree-value</span> +<span id="L12482" class="LineNr">12482 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L12483" class="LineNr">12483 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) +<span id="L12484" class="LineNr">12484 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) +<span id="L12485" class="LineNr">12485 </span> <span class="subxComment"># never gets here</span> +<span id="L12486" class="LineNr">12486 </span> +<span id="L12487" class="LineNr">12487 </span><span class="Constant">$array-element-type-id:error2</span>: +<span id="L12488" class="LineNr">12488 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"array-element-type-id: var '"</span>) +<span id="L12489" class="LineNr">12489 </span> 50/push-eax +<span id="L12490" class="LineNr">12490 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12491" class="LineNr">12491 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12492" class="LineNr">12492 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) %eax) +<span id="L12493" class="LineNr">12493 </span> 58/pop-to-eax +<span id="L12494" class="LineNr">12494 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"' has non-array type\n"</span>) <span id="L12495" class="LineNr">12495 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) <span id="L12496" class="LineNr">12496 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) <span id="L12497" class="LineNr">12497 </span> <span class="subxComment"># never gets here</span> <span id="L12498" class="LineNr">12498 </span> -<span id="L12499" class="LineNr">12499 </span><span class="subxFunction">num-shift-rights</span>: <span class="subxComment"># n: int -> result/eax: int</span> -<span id="L12500" class="LineNr">12500 </span> <span class="subxComment"># precondition: n is a positive power of 2</span> +<span id="L12499" class="LineNr">12499 </span><span class="subxFunction">power-of-2?</span>: <span class="subxComment"># n: int, err: (addr buffered-file), ed: (addr exit-descriptor) -> result/eax: boolean</span> +<span id="L12500" class="LineNr">12500 </span> <span class="subxComment"># precondition: n is positive</span> <span id="L12501" class="LineNr">12501 </span> <span class="subxS1Comment"># . prologue</span> <span id="L12502" class="LineNr">12502 </span> 55/push-ebp <span id="L12503" class="LineNr">12503 </span> 89/<- %ebp 4/r32/esp -<span id="L12504" class="LineNr">12504 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12505" class="LineNr">12505 </span> 51/push-ecx -<span id="L12506" class="LineNr">12506 </span> <span class="subxComment"># var curr/ecx: int = n</span> -<span id="L12507" class="LineNr">12507 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L12508" class="LineNr">12508 </span> <span class="subxComment"># result = 0</span> -<span id="L12509" class="LineNr">12509 </span> b8/copy-to-eax 0/imm32 -<span id="L12510" class="LineNr">12510 </span> { -<span id="L12511" class="LineNr">12511 </span> <span class="subxComment"># if (curr <= 1) break</span> -<span id="L12512" class="LineNr">12512 </span> 81 7/subop/compare %ecx 1/imm32 -<span id="L12513" class="LineNr">12513 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 -<span id="L12514" class="LineNr">12514 </span> 40/increment-eax -<span id="L12515" class="LineNr">12515 </span> c1/shift 5/subop/arithmetic-right %ecx 1/imm8 -<span id="L12516" class="LineNr">12516 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L12517" class="LineNr">12517 </span> } -<span id="L12518" class="LineNr">12518 </span><span class="Constant">$num-shift-rights:end</span>: -<span id="L12519" class="LineNr">12519 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12520" class="LineNr">12520 </span> 59/pop-to-ecx -<span id="L12521" class="LineNr">12521 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12522" class="LineNr">12522 </span> 89/<- %esp 5/r32/ebp -<span id="L12523" class="LineNr">12523 </span> 5d/pop-to-ebp -<span id="L12524" class="LineNr">12524 </span> c3/return -<span id="L12525" class="LineNr">12525 </span> -<span id="L12526" class="LineNr">12526 </span><span class="subxFunction">mu-get-offset</span>: <span class="subxComment"># stmt: (addr stmt) -> result/eax: int</span> -<span id="L12527" class="LineNr">12527 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12528" class="LineNr">12528 </span> 55/push-ebp -<span id="L12529" class="LineNr">12529 </span> 89/<- %ebp 4/r32/esp -<span id="L12530" class="LineNr">12530 </span> <span class="subxComment"># var second-inout/eax: (addr stmt-var) = stmt->inouts->next</span> -<span id="L12531" class="LineNr">12531 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L12532" class="LineNr">12532 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L12533" class="LineNr">12533 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L12534" class="LineNr">12534 </span> <span class="subxComment"># var output-var/eax: (addr var) = second-inout->value</span> -<span id="L12535" class="LineNr">12535 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L12536" class="LineNr">12536 </span><span class="CommentedCode">#? (write-buffered Stderr "mu-get-offset: ")</span> -<span id="L12537" class="LineNr">12537 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L12538" class="LineNr">12538 </span><span class="CommentedCode">#? (write-buffered Stderr " name: ")</span> -<span id="L12539" class="LineNr">12539 </span><span class="CommentedCode">#? 50/push-eax</span> -<span id="L12540" class="LineNr">12540 </span><span class="CommentedCode">#? (lookup *eax *(eax+4)) # Var-name</span> -<span id="L12541" class="LineNr">12541 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> -<span id="L12542" class="LineNr">12542 </span><span class="CommentedCode">#? 58/pop-to-eax</span> -<span id="L12543" class="LineNr">12543 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L12544" class="LineNr">12544 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L12545" class="LineNr">12545 </span> <span class="subxComment"># return output-var->stack-offset</span> -<span id="L12546" class="LineNr">12546 </span> 8b/-> *(eax+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> -<span id="L12547" class="LineNr">12547 </span><span class="CommentedCode">#? (write-buffered Stderr "=> ")</span> -<span id="L12548" class="LineNr">12548 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> -<span id="L12549" class="LineNr">12549 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> -<span id="L12550" class="LineNr">12550 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L12551" class="LineNr">12551 </span><span class="Constant">$emit-get-offset:end</span>: -<span id="L12552" class="LineNr">12552 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12553" class="LineNr">12553 </span> 89/<- %esp 5/r32/ebp -<span id="L12554" class="LineNr">12554 </span> 5d/pop-to-ebp -<span id="L12555" class="LineNr">12555 </span> c3/return -<span id="L12556" class="LineNr">12556 </span> -<span id="L12557" class="LineNr">12557 </span><span class="subxFunction">emit-subx-block</span>: <span class="subxComment"># out: (addr buffered-file), block: (addr block), vars: (addr stack live-var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L12558" class="LineNr">12558 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L12559" class="LineNr">12559 </span> 55/push-ebp -<span id="L12560" class="LineNr">12560 </span> 89/<- %ebp 4/r32/esp -<span id="L12561" class="LineNr">12561 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L12562" class="LineNr">12562 </span> 50/push-eax -<span id="L12563" class="LineNr">12563 </span> 51/push-ecx -<span id="L12564" class="LineNr">12564 </span> 56/push-esi -<span id="L12565" class="LineNr">12565 </span> <span class="subxComment"># esi = block</span> -<span id="L12566" class="LineNr">12566 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L12567" class="LineNr">12567 </span> <span class="subxComment"># block->var->block-depth = *Curr-block-depth</span> -<span id="L12568" class="LineNr">12568 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Block-var Block-var => eax</span> -<span id="L12569" class="LineNr">12569 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 1/r32/ecx -<span id="L12570" class="LineNr">12570 </span> 89/<- *(eax+0x10) 1/r32/ecx <span class="subxComment"># Var-block-depth</span> -<span id="L12571" class="LineNr">12571 </span> <span class="subxComment"># var stmts/eax: (addr list stmt) = lookup(block->statements)</span> -<span id="L12572" class="LineNr">12572 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> -<span id="L12573" class="LineNr">12573 </span> <span class="subxComment">#</span> -<span id="L12574" class="LineNr">12574 </span> { -<span id="L12575" class="LineNr">12575 </span><span class="Constant">$emit-subx-block:check-empty</span>: -<span id="L12576" class="LineNr">12576 </span> 3d/compare-eax-and 0/imm32 -<span id="L12577" class="LineNr">12577 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L12578" class="LineNr">12578 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12579" class="LineNr">12579 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"{\n"</span>) -<span id="L12580" class="LineNr">12580 </span> <span class="subxComment"># var v/ecx: (addr var) = lookup(block->var)</span> -<span id="L12581" class="LineNr">12581 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Block-var Block-var => eax</span> -<span id="L12582" class="LineNr">12582 </span> 89/<- %ecx 0/r32/eax -<span id="L12583" class="LineNr">12583 </span> <span class="subxComment">#</span> -<span id="L12584" class="LineNr">12584 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12585" class="LineNr">12585 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12586" class="LineNr">12586 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop:\n"</span>) -<span id="L12587" class="LineNr">12587 </span> ff 0/subop/increment *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> -<span id="L12588" class="LineNr">12588 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(esi+0xc)) <span class="subxComment"># Block-var</span> -<span id="L12589" class="LineNr">12589 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(esi+0x10)) <span class="subxComment"># Block-var</span> -<span id="L12590" class="LineNr">12590 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># false</span> -<span id="L12591" class="LineNr">12591 </span> <span class="subxComment"># emit block->statements</span> -<span id="L12592" class="LineNr">12592 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> -<span id="L12593" class="LineNr">12593 </span> (<a href='mu.subx.html#L10520'>emit-subx-stmt-list</a> *(ebp+8) %eax *(ebp+0x10) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) -<span id="L12594" class="LineNr">12594 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L12595" class="LineNr">12595 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L12596" class="LineNr">12596 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> -<span id="L12597" class="LineNr">12597 </span> ff 1/subop/decrement *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> -<span id="L12598" class="LineNr">12598 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L12599" class="LineNr">12599 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"}\n"</span>) -<span id="L12600" class="LineNr">12600 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L12601" class="LineNr">12601 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L12602" class="LineNr">12602 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break:\n"</span>) -<span id="L12603" class="LineNr">12603 </span> } -<span id="L12604" class="LineNr">12604 </span><span class="Constant">$emit-subx-block:end</span>: -<span id="L12605" class="LineNr">12605 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L12606" class="LineNr">12606 </span> 5e/pop-to-esi -<span id="L12607" class="LineNr">12607 </span> 59/pop-to-ecx -<span id="L12608" class="LineNr">12608 </span> 58/pop-to-eax -<span id="L12609" class="LineNr">12609 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L12610" class="LineNr">12610 </span> 89/<- %esp 5/r32/ebp -<span id="L12611" class="LineNr">12611 </span> 5d/pop-to-ebp -<span id="L12612" class="LineNr">12612 </span> c3/return -<span id="L12613" class="LineNr">12613 </span> -<span id="L12614" class="LineNr">12614 </span><span class="subxComment"># Primitives supported</span> -<span id="L12615" class="LineNr">12615 </span><span class="subxComment"># See mu_instructions for a summary of this linked-list data structure.</span> -<span id="L12616" class="LineNr">12616 </span><span class="subxComment">#</span> -<span id="L12617" class="LineNr">12617 </span><span class="subxComment"># For each operation, put variants with hard-coded registers before flexible ones.</span> -<span id="L12618" class="LineNr">12618 </span><span class="subxComment">#</span> -<span id="L12619" class="LineNr">12619 </span><span class="subxComment"># Unfortunately, our restrictions on addresses require that various fields in</span> -<span id="L12620" class="LineNr">12620 </span><span class="subxComment"># primitives be handles, which complicates these definitions.</span> -<span id="L12621" class="LineNr">12621 </span><span class="subxComment"># - we need to insert dummy fields all over the place for fake alloc-ids</span> -<span id="L12622" class="LineNr">12622 </span><span class="subxComment"># - we can't use our syntax sugar of quoted literals for string fields</span> -<span id="L12623" class="LineNr">12623 </span><span class="subxComment">#</span> -<span id="L12624" class="LineNr">12624 </span><span class="subxComment"># Fake alloc-ids are needed because our type definitions up top require</span> -<span id="L12625" class="LineNr">12625 </span><span class="subxComment"># handles but it's clearer to statically allocate these long-lived objects.</span> -<span id="L12626" class="LineNr">12626 </span><span class="subxComment"># Fake alloc-ids are perfectly safe, but they can't be reclaimed.</span> -<span id="L12627" class="LineNr">12627 </span><span class="subxComment">#</span> -<span id="L12628" class="LineNr">12628 </span><span class="subxComment"># Every 'object' below starts with a fake alloc-id. It may also contain other</span> -<span id="L12629" class="LineNr">12629 </span><span class="subxComment"># fake alloc-ids for various handle fields.</span> -<span id="L12630" class="LineNr">12630 </span><span class="subxComment">#</span> -<span id="L12631" class="LineNr">12631 </span><span class="subxComment"># I think of objects starting with a fake alloc-id as having type 'payload'.</span> -<span id="L12632" class="LineNr">12632 </span><span class="subxComment"># It's not really intended to be created dynamically; for that use `allocate`</span> -<span id="L12633" class="LineNr">12633 </span><span class="subxComment"># as usual.</span> -<span id="L12634" class="LineNr">12634 </span><span class="subxComment">#</span> -<span id="L12635" class="LineNr">12635 </span><span class="subxComment"># Idea for a notation to simplify such definitions:</span> -<span id="L12636" class="LineNr">12636 </span><span class="subxComment"># _Primitive-increment-eax: # (payload primitive)</span> -<span id="L12637" class="LineNr">12637 </span><span class="subxComment"># 0x11/alloc-id:fake:payload</span> -<span id="L12638" class="LineNr">12638 </span><span class="subxComment"># 0x11 @(0x11 "increment") # name</span> -<span id="L12639" class="LineNr">12639 </span><span class="subxComment"># 0 0 # inouts</span> -<span id="L12640" class="LineNr">12640 </span><span class="subxComment"># 0x11 @(0x11/payload</span> -<span id="L12641" class="LineNr">12641 </span><span class="subxComment"># 0x11 @(0x11/payload # List-value</span> -<span id="L12642" class="LineNr">12642 </span><span class="subxComment"># 0 0 # Var-name</span> -<span id="L12643" class="LineNr">12643 </span><span class="subxComment"># 0x11 @(0x11 # Var-type</span> -<span id="L12644" class="LineNr">12644 </span><span class="subxComment"># 1/is-atom</span> -<span id="L12645" class="LineNr">12645 </span><span class="subxComment"># 1/value 0/unused # Tree-left</span> -<span id="L12646" class="LineNr">12646 </span><span class="subxComment"># 0 0 # Tree-right</span> -<span id="L12647" class="LineNr">12647 </span><span class="subxComment"># )</span> -<span id="L12648" class="LineNr">12648 </span><span class="subxComment"># 1 # block-depth</span> -<span id="L12649" class="LineNr">12649 </span><span class="subxComment"># 0 # stack-offset</span> -<span id="L12650" class="LineNr">12650 </span><span class="subxComment"># 0x11 @(0x11 "eax") # Var-register</span> -<span id="L12651" class="LineNr">12651 </span><span class="subxComment"># )</span> -<span id="L12652" class="LineNr">12652 </span><span class="subxComment"># 0 0) # List-next</span> -<span id="L12653" class="LineNr">12653 </span><span class="subxComment"># ...</span> -<span id="L12654" class="LineNr">12654 </span><span class="subxComment"># _Primitive-increment-ecx/imm32/next</span> -<span id="L12655" class="LineNr">12655 </span><span class="subxComment"># ...</span> -<span id="L12656" class="LineNr">12656 </span><span class="subxComment"># Awfully complex and non-obvious. But also clearly signals there's something</span> -<span id="L12657" class="LineNr">12657 </span><span class="subxComment"># to learn here, so may be worth trying.</span> -<span id="L12658" class="LineNr">12658 </span><span class="subxComment">#</span> -<span id="L12659" class="LineNr">12659 </span><span class="subxComment"># '@' is just an initial thought. Punctuation used so far in Mu: () * % # / "</span> +<span id="L12504" class="LineNr">12504 </span> <span class="subxComment"># eax = n</span> +<span id="L12505" class="LineNr">12505 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12506" class="LineNr">12506 </span> <span class="subxComment"># if (n < 0) abort</span> +<span id="L12507" class="LineNr">12507 </span> 3d/compare-eax-with 0/imm32 +<span id="L12508" class="LineNr">12508 </span> 0f 8c/jump-if-< $power-of-2?:abort/disp32 +<span id="L12509" class="LineNr">12509 </span> <span class="subxComment"># var tmp/eax: int = n-1</span> +<span id="L12510" class="LineNr">12510 </span> 48/decrement-eax +<span id="L12511" class="LineNr">12511 </span> <span class="subxComment"># var tmp2/eax: int = n & tmp</span> +<span id="L12512" class="LineNr">12512 </span> 23/and-> *(ebp+8) 0/r32/eax +<span id="L12513" class="LineNr">12513 </span> <span class="subxComment"># return (tmp2 == 0)</span> +<span id="L12514" class="LineNr">12514 </span> 3d/compare-eax-and 0/imm32 +<span id="L12515" class="LineNr">12515 </span> 0f 94/set-byte-if-= %al +<span id="L12516" class="LineNr">12516 </span> 81 4/subop/and %eax 0xff/imm32 +<span id="L12517" class="LineNr">12517 </span><span class="Constant">$power-of-2?:end</span>: +<span id="L12518" class="LineNr">12518 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12519" class="LineNr">12519 </span> 89/<- %esp 5/r32/ebp +<span id="L12520" class="LineNr">12520 </span> 5d/pop-to-ebp +<span id="L12521" class="LineNr">12521 </span> c3/return +<span id="L12522" class="LineNr">12522 </span> +<span id="L12523" class="LineNr">12523 </span><span class="Constant">$power-of-2?:abort</span>: +<span id="L12524" class="LineNr">12524 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0xc) <span class="Constant">"power-of-2?: negative number\n"</span>) +<span id="L12525" class="LineNr">12525 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0xc)) +<span id="L12526" class="LineNr">12526 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x10) 1) +<span id="L12527" class="LineNr">12527 </span> <span class="subxComment"># never gets here</span> +<span id="L12528" class="LineNr">12528 </span> +<span id="L12529" class="LineNr">12529 </span><span class="subxFunction">num-shift-rights</span>: <span class="subxComment"># n: int -> result/eax: int</span> +<span id="L12530" class="LineNr">12530 </span> <span class="subxComment"># precondition: n is a positive power of 2</span> +<span id="L12531" class="LineNr">12531 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12532" class="LineNr">12532 </span> 55/push-ebp +<span id="L12533" class="LineNr">12533 </span> 89/<- %ebp 4/r32/esp +<span id="L12534" class="LineNr">12534 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12535" class="LineNr">12535 </span> 51/push-ecx +<span id="L12536" class="LineNr">12536 </span> <span class="subxComment"># var curr/ecx: int = n</span> +<span id="L12537" class="LineNr">12537 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L12538" class="LineNr">12538 </span> <span class="subxComment"># result = 0</span> +<span id="L12539" class="LineNr">12539 </span> b8/copy-to-eax 0/imm32 +<span id="L12540" class="LineNr">12540 </span> { +<span id="L12541" class="LineNr">12541 </span> <span class="subxComment"># if (curr <= 1) break</span> +<span id="L12542" class="LineNr">12542 </span> 81 7/subop/compare %ecx 1/imm32 +<span id="L12543" class="LineNr">12543 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 +<span id="L12544" class="LineNr">12544 </span> 40/increment-eax +<span id="L12545" class="LineNr">12545 </span> c1/shift 5/subop/arithmetic-right %ecx 1/imm8 +<span id="L12546" class="LineNr">12546 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L12547" class="LineNr">12547 </span> } +<span id="L12548" class="LineNr">12548 </span><span class="Constant">$num-shift-rights:end</span>: +<span id="L12549" class="LineNr">12549 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12550" class="LineNr">12550 </span> 59/pop-to-ecx +<span id="L12551" class="LineNr">12551 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12552" class="LineNr">12552 </span> 89/<- %esp 5/r32/ebp +<span id="L12553" class="LineNr">12553 </span> 5d/pop-to-ebp +<span id="L12554" class="LineNr">12554 </span> c3/return +<span id="L12555" class="LineNr">12555 </span> +<span id="L12556" class="LineNr">12556 </span><span class="subxFunction">mu-get-offset</span>: <span class="subxComment"># stmt: (addr stmt) -> result/eax: int</span> +<span id="L12557" class="LineNr">12557 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12558" class="LineNr">12558 </span> 55/push-ebp +<span id="L12559" class="LineNr">12559 </span> 89/<- %ebp 4/r32/esp +<span id="L12560" class="LineNr">12560 </span> <span class="subxComment"># var second-inout/eax: (addr stmt-var) = stmt->inouts->next</span> +<span id="L12561" class="LineNr">12561 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L12562" class="LineNr">12562 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0xc) *(eax+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L12563" class="LineNr">12563 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L12564" class="LineNr">12564 </span> <span class="subxComment"># var output-var/eax: (addr var) = second-inout->value</span> +<span id="L12565" class="LineNr">12565 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L12566" class="LineNr">12566 </span><span class="CommentedCode">#? (write-buffered Stderr "mu-get-offset: ")</span> +<span id="L12567" class="LineNr">12567 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L12568" class="LineNr">12568 </span><span class="CommentedCode">#? (write-buffered Stderr " name: ")</span> +<span id="L12569" class="LineNr">12569 </span><span class="CommentedCode">#? 50/push-eax</span> +<span id="L12570" class="LineNr">12570 </span><span class="CommentedCode">#? (lookup *eax *(eax+4)) # Var-name</span> +<span id="L12571" class="LineNr">12571 </span><span class="CommentedCode">#? (write-buffered Stderr %eax)</span> +<span id="L12572" class="LineNr">12572 </span><span class="CommentedCode">#? 58/pop-to-eax</span> +<span id="L12573" class="LineNr">12573 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L12574" class="LineNr">12574 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L12575" class="LineNr">12575 </span> <span class="subxComment"># return output-var->stack-offset</span> +<span id="L12576" class="LineNr">12576 </span> 8b/-> *(eax+0x14) 0/r32/eax <span class="subxComment"># Var-offset</span> +<span id="L12577" class="LineNr">12577 </span><span class="CommentedCode">#? (write-buffered Stderr "=> ")</span> +<span id="L12578" class="LineNr">12578 </span><span class="CommentedCode">#? (print-int32-buffered Stderr %eax)</span> +<span id="L12579" class="LineNr">12579 </span><span class="CommentedCode">#? (write-buffered Stderr Newline)</span> +<span id="L12580" class="LineNr">12580 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L12581" class="LineNr">12581 </span><span class="Constant">$emit-get-offset:end</span>: +<span id="L12582" class="LineNr">12582 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12583" class="LineNr">12583 </span> 89/<- %esp 5/r32/ebp +<span id="L12584" class="LineNr">12584 </span> 5d/pop-to-ebp +<span id="L12585" class="LineNr">12585 </span> c3/return +<span id="L12586" class="LineNr">12586 </span> +<span id="L12587" class="LineNr">12587 </span><span class="subxFunction">emit-subx-block</span>: <span class="subxComment"># out: (addr buffered-file), block: (addr block), vars: (addr stack live-var), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L12588" class="LineNr">12588 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L12589" class="LineNr">12589 </span> 55/push-ebp +<span id="L12590" class="LineNr">12590 </span> 89/<- %ebp 4/r32/esp +<span id="L12591" class="LineNr">12591 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L12592" class="LineNr">12592 </span> 50/push-eax +<span id="L12593" class="LineNr">12593 </span> 51/push-ecx +<span id="L12594" class="LineNr">12594 </span> 56/push-esi +<span id="L12595" class="LineNr">12595 </span> <span class="subxComment"># esi = block</span> +<span id="L12596" class="LineNr">12596 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L12597" class="LineNr">12597 </span> <span class="subxComment"># block->var->block-depth = *Curr-block-depth</span> +<span id="L12598" class="LineNr">12598 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Block-var Block-var => eax</span> +<span id="L12599" class="LineNr">12599 </span> 8b/-> *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 1/r32/ecx +<span id="L12600" class="LineNr">12600 </span> 89/<- *(eax+0x10) 1/r32/ecx <span class="subxComment"># Var-block-depth</span> +<span id="L12601" class="LineNr">12601 </span> <span class="subxComment"># var stmts/eax: (addr list stmt) = lookup(block->statements)</span> +<span id="L12602" class="LineNr">12602 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> +<span id="L12603" class="LineNr">12603 </span> <span class="subxComment">#</span> +<span id="L12604" class="LineNr">12604 </span> { +<span id="L12605" class="LineNr">12605 </span><span class="Constant">$emit-subx-block:check-empty</span>: +<span id="L12606" class="LineNr">12606 </span> 3d/compare-eax-and 0/imm32 +<span id="L12607" class="LineNr">12607 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L12608" class="LineNr">12608 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12609" class="LineNr">12609 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"{\n"</span>) +<span id="L12610" class="LineNr">12610 </span> <span class="subxComment"># var v/ecx: (addr var) = lookup(block->var)</span> +<span id="L12611" class="LineNr">12611 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0xc) *(esi+0x10)) <span class="subxComment"># Block-var Block-var => eax</span> +<span id="L12612" class="LineNr">12612 </span> 89/<- %ecx 0/r32/eax +<span id="L12613" class="LineNr">12613 </span> <span class="subxComment">#</span> +<span id="L12614" class="LineNr">12614 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12615" class="LineNr">12615 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12616" class="LineNr">12616 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop:\n"</span>) +<span id="L12617" class="LineNr">12617 </span> ff 0/subop/increment *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> +<span id="L12618" class="LineNr">12618 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(esi+0xc)) <span class="subxComment"># Block-var</span> +<span id="L12619" class="LineNr">12619 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) *(esi+0x10)) <span class="subxComment"># Block-var</span> +<span id="L12620" class="LineNr">12620 </span> (<a href='../092stack.subx.html#L114'>push</a> *(ebp+0x10) 0) <span class="subxComment"># false</span> +<span id="L12621" class="LineNr">12621 </span> <span class="subxComment"># emit block->statements</span> +<span id="L12622" class="LineNr">12622 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+4) *(esi+8)) <span class="subxComment"># Block-stmts Block-stmts => eax</span> +<span id="L12623" class="LineNr">12623 </span> (<a href='mu.subx.html#L10550'>emit-subx-stmt-list</a> *(ebp+8) %eax *(ebp+0x10) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c)) +<span id="L12624" class="LineNr">12624 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L12625" class="LineNr">12625 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L12626" class="LineNr">12626 </span> (<a href='../092stack.subx.html#L234'>pop</a> *(ebp+0x10)) <span class="subxComment"># => eax</span> +<span id="L12627" class="LineNr">12627 </span> ff 1/subop/decrement *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> +<span id="L12628" class="LineNr">12628 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L12629" class="LineNr">12629 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"}\n"</span>) +<span id="L12630" class="LineNr">12630 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L12631" class="LineNr">12631 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L12632" class="LineNr">12632 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break:\n"</span>) +<span id="L12633" class="LineNr">12633 </span> } +<span id="L12634" class="LineNr">12634 </span><span class="Constant">$emit-subx-block:end</span>: +<span id="L12635" class="LineNr">12635 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L12636" class="LineNr">12636 </span> 5e/pop-to-esi +<span id="L12637" class="LineNr">12637 </span> 59/pop-to-ecx +<span id="L12638" class="LineNr">12638 </span> 58/pop-to-eax +<span id="L12639" class="LineNr">12639 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L12640" class="LineNr">12640 </span> 89/<- %esp 5/r32/ebp +<span id="L12641" class="LineNr">12641 </span> 5d/pop-to-ebp +<span id="L12642" class="LineNr">12642 </span> c3/return +<span id="L12643" class="LineNr">12643 </span> +<span id="L12644" class="LineNr">12644 </span><span class="subxComment"># Primitives supported</span> +<span id="L12645" class="LineNr">12645 </span><span class="subxComment"># See mu_instructions for a summary of this linked-list data structure.</span> +<span id="L12646" class="LineNr">12646 </span><span class="subxComment">#</span> +<span id="L12647" class="LineNr">12647 </span><span class="subxComment"># For each operation, put variants with hard-coded registers before flexible ones.</span> +<span id="L12648" class="LineNr">12648 </span><span class="subxComment">#</span> +<span id="L12649" class="LineNr">12649 </span><span class="subxComment"># Unfortunately, our restrictions on addresses require that various fields in</span> +<span id="L12650" class="LineNr">12650 </span><span class="subxComment"># primitives be handles, which complicates these definitions.</span> +<span id="L12651" class="LineNr">12651 </span><span class="subxComment"># - we need to insert dummy fields all over the place for fake alloc-ids</span> +<span id="L12652" class="LineNr">12652 </span><span class="subxComment"># - we can't use our syntax sugar of quoted literals for string fields</span> +<span id="L12653" class="LineNr">12653 </span><span class="subxComment">#</span> +<span id="L12654" class="LineNr">12654 </span><span class="subxComment"># Fake alloc-ids are needed because our type definitions up top require</span> +<span id="L12655" class="LineNr">12655 </span><span class="subxComment"># handles but it's clearer to statically allocate these long-lived objects.</span> +<span id="L12656" class="LineNr">12656 </span><span class="subxComment"># Fake alloc-ids are perfectly safe, but they can't be reclaimed.</span> +<span id="L12657" class="LineNr">12657 </span><span class="subxComment">#</span> +<span id="L12658" class="LineNr">12658 </span><span class="subxComment"># Every 'object' below starts with a fake alloc-id. It may also contain other</span> +<span id="L12659" class="LineNr">12659 </span><span class="subxComment"># fake alloc-ids for various handle fields.</span> <span id="L12660" class="LineNr">12660 </span><span class="subxComment">#</span> -<span id="L12661" class="LineNr">12661 </span><span class="subxComment"># For now we'll continue to just use comments and manually ensure they stay up</span> -<span id="L12662" class="LineNr">12662 </span><span class="subxComment"># to date.</span> -<span id="L12663" class="LineNr">12663 </span>== data -<span id="L12664" class="LineNr">12664 </span><span class="SpecialChar">Primitives</span>: <span class="subxComment"># (addr primitive)</span> -<span id="L12665" class="LineNr">12665 </span><span class="subxH1Comment"># - increment/decrement</span> -<span id="L12666" class="LineNr">12666 </span><span class="subxMinorFunction">_Primitive-increment-eax</span>: <span class="subxComment"># (addr primitive)</span> -<span id="L12667" class="LineNr">12667 </span> <span class="subxComment"># var/eax <- increment => 40/increment-eax</span> -<span id="L12668" class="LineNr">12668 </span> 0x11/imm32/alloc-id:fake -<span id="L12669" class="LineNr">12669 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12670" class="LineNr">12670 </span> 0/imm32/no-inouts -<span id="L12671" class="LineNr">12671 </span> 0/imm32/no-inouts -<span id="L12672" class="LineNr">12672 </span> 0x11/imm32/alloc-id:fake -<span id="L12673" class="LineNr">12673 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs -<span id="L12674" class="LineNr">12674 </span> 0x11/imm32/alloc-id:fake -<span id="L12675" class="LineNr">12675 </span> <a href='mu.subx.html#L15121'>_string_40_increment_eax</a>/imm32/subx-name -<span id="L12676" class="LineNr">12676 </span> 0/imm32/no-rm32 -<span id="L12677" class="LineNr">12677 </span> 0/imm32/no-r32 -<span id="L12678" class="LineNr">12678 </span> 0/imm32/no-imm32 -<span id="L12679" class="LineNr">12679 </span> 0/imm32/no-disp32 -<span id="L12680" class="LineNr">12680 </span> 0/imm32/output-is-write-only -<span id="L12681" class="LineNr">12681 </span> 0x11/imm32/alloc-id:fake -<span id="L12682" class="LineNr">12682 </span> <a href='mu.subx.html#L12683'>_Primitive-increment-ecx</a>/imm32/next -<span id="L12683" class="LineNr">12683 </span><span class="subxMinorFunction">_Primitive-increment-ecx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12684" class="LineNr">12684 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12685" class="LineNr">12685 </span> <span class="subxComment"># var/ecx <- increment => 41/increment-ecx</span> -<span id="L12686" class="LineNr">12686 </span> 0x11/imm32/alloc-id:fake -<span id="L12687" class="LineNr">12687 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12688" class="LineNr">12688 </span> 0/imm32/no-inouts -<span id="L12689" class="LineNr">12689 </span> 0/imm32/no-inouts -<span id="L12690" class="LineNr">12690 </span> 0x11/imm32/alloc-id:fake -<span id="L12691" class="LineNr">12691 </span> <span class="SpecialChar"><a href='mu.subx.html#L15463'>Single-int-var-in-ecx</a></span>/imm32/outputs -<span id="L12692" class="LineNr">12692 </span> 0x11/imm32/alloc-id:fake -<span id="L12693" class="LineNr">12693 </span> <a href='mu.subx.html#L15126'>_string_41_increment_ecx</a>/imm32/subx-name -<span id="L12694" class="LineNr">12694 </span> 0/imm32/no-rm32 -<span id="L12695" class="LineNr">12695 </span> 0/imm32/no-r32 -<span id="L12696" class="LineNr">12696 </span> 0/imm32/no-imm32 -<span id="L12697" class="LineNr">12697 </span> 0/imm32/no-disp32 -<span id="L12698" class="LineNr">12698 </span> 0/imm32/output-is-write-only -<span id="L12699" class="LineNr">12699 </span> 0x11/imm32/alloc-id:fake -<span id="L12700" class="LineNr">12700 </span> <a href='mu.subx.html#L12701'>_Primitive-increment-edx</a>/imm32/next -<span id="L12701" class="LineNr">12701 </span><span class="subxMinorFunction">_Primitive-increment-edx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12702" class="LineNr">12702 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12703" class="LineNr">12703 </span> <span class="subxComment"># var/edx <- increment => 42/increment-edx</span> +<span id="L12661" class="LineNr">12661 </span><span class="subxComment"># I think of objects starting with a fake alloc-id as having type 'payload'.</span> +<span id="L12662" class="LineNr">12662 </span><span class="subxComment"># It's not really intended to be created dynamically; for that use `allocate`</span> +<span id="L12663" class="LineNr">12663 </span><span class="subxComment"># as usual.</span> +<span id="L12664" class="LineNr">12664 </span><span class="subxComment">#</span> +<span id="L12665" class="LineNr">12665 </span><span class="subxComment"># Idea for a notation to simplify such definitions:</span> +<span id="L12666" class="LineNr">12666 </span><span class="subxComment"># _Primitive-increment-eax: # (payload primitive)</span> +<span id="L12667" class="LineNr">12667 </span><span class="subxComment"># 0x11/alloc-id:fake:payload</span> +<span id="L12668" class="LineNr">12668 </span><span class="subxComment"># 0x11 @(0x11 "increment") # name</span> +<span id="L12669" class="LineNr">12669 </span><span class="subxComment"># 0 0 # inouts</span> +<span id="L12670" class="LineNr">12670 </span><span class="subxComment"># 0x11 @(0x11/payload</span> +<span id="L12671" class="LineNr">12671 </span><span class="subxComment"># 0x11 @(0x11/payload # List-value</span> +<span id="L12672" class="LineNr">12672 </span><span class="subxComment"># 0 0 # Var-name</span> +<span id="L12673" class="LineNr">12673 </span><span class="subxComment"># 0x11 @(0x11 # Var-type</span> +<span id="L12674" class="LineNr">12674 </span><span class="subxComment"># 1/is-atom</span> +<span id="L12675" class="LineNr">12675 </span><span class="subxComment"># 1/value 0/unused # Tree-left</span> +<span id="L12676" class="LineNr">12676 </span><span class="subxComment"># 0 0 # Tree-right</span> +<span id="L12677" class="LineNr">12677 </span><span class="subxComment"># )</span> +<span id="L12678" class="LineNr">12678 </span><span class="subxComment"># 1 # block-depth</span> +<span id="L12679" class="LineNr">12679 </span><span class="subxComment"># 0 # stack-offset</span> +<span id="L12680" class="LineNr">12680 </span><span class="subxComment"># 0x11 @(0x11 "eax") # Var-register</span> +<span id="L12681" class="LineNr">12681 </span><span class="subxComment"># )</span> +<span id="L12682" class="LineNr">12682 </span><span class="subxComment"># 0 0) # List-next</span> +<span id="L12683" class="LineNr">12683 </span><span class="subxComment"># ...</span> +<span id="L12684" class="LineNr">12684 </span><span class="subxComment"># _Primitive-increment-ecx/imm32/next</span> +<span id="L12685" class="LineNr">12685 </span><span class="subxComment"># ...</span> +<span id="L12686" class="LineNr">12686 </span><span class="subxComment"># Awfully complex and non-obvious. But also clearly signals there's something</span> +<span id="L12687" class="LineNr">12687 </span><span class="subxComment"># to learn here, so may be worth trying.</span> +<span id="L12688" class="LineNr">12688 </span><span class="subxComment">#</span> +<span id="L12689" class="LineNr">12689 </span><span class="subxComment"># '@' is just an initial thought. Punctuation used so far in Mu: () * % # / "</span> +<span id="L12690" class="LineNr">12690 </span><span class="subxComment">#</span> +<span id="L12691" class="LineNr">12691 </span><span class="subxComment"># For now we'll continue to just use comments and manually ensure they stay up</span> +<span id="L12692" class="LineNr">12692 </span><span class="subxComment"># to date.</span> +<span id="L12693" class="LineNr">12693 </span>== data +<span id="L12694" class="LineNr">12694 </span><span class="SpecialChar">Primitives</span>: <span class="subxComment"># (addr primitive)</span> +<span id="L12695" class="LineNr">12695 </span><span class="subxH1Comment"># - increment/decrement</span> +<span id="L12696" class="LineNr">12696 </span><span class="subxMinorFunction">_Primitive-increment-eax</span>: <span class="subxComment"># (addr primitive)</span> +<span id="L12697" class="LineNr">12697 </span> <span class="subxComment"># var/eax <- increment => 40/increment-eax</span> +<span id="L12698" class="LineNr">12698 </span> 0x11/imm32/alloc-id:fake +<span id="L12699" class="LineNr">12699 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12700" class="LineNr">12700 </span> 0/imm32/no-inouts +<span id="L12701" class="LineNr">12701 </span> 0/imm32/no-inouts +<span id="L12702" class="LineNr">12702 </span> 0x11/imm32/alloc-id:fake +<span id="L12703" class="LineNr">12703 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L12704" class="LineNr">12704 </span> 0x11/imm32/alloc-id:fake -<span id="L12705" class="LineNr">12705 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12706" class="LineNr">12706 </span> 0/imm32/no-inouts -<span id="L12707" class="LineNr">12707 </span> 0/imm32/no-inouts -<span id="L12708" class="LineNr">12708 </span> 0x11/imm32/alloc-id:fake -<span id="L12709" class="LineNr">12709 </span> <span class="SpecialChar"><a href='mu.subx.html#L15481'>Single-int-var-in-edx</a></span>/imm32/outputs -<span id="L12710" class="LineNr">12710 </span> 0x11/imm32/alloc-id:fake -<span id="L12711" class="LineNr">12711 </span> <a href='mu.subx.html#L15131'>_string_42_increment_edx</a>/imm32/subx-name -<span id="L12712" class="LineNr">12712 </span> 0/imm32/no-rm32 -<span id="L12713" class="LineNr">12713 </span> 0/imm32/no-r32 -<span id="L12714" class="LineNr">12714 </span> 0/imm32/no-imm32 -<span id="L12715" class="LineNr">12715 </span> 0/imm32/no-disp32 -<span id="L12716" class="LineNr">12716 </span> 0/imm32/output-is-write-only -<span id="L12717" class="LineNr">12717 </span> 0x11/imm32/alloc-id:fake -<span id="L12718" class="LineNr">12718 </span> <a href='mu.subx.html#L12719'>_Primitive-increment-ebx</a>/imm32/next -<span id="L12719" class="LineNr">12719 </span><span class="subxMinorFunction">_Primitive-increment-ebx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12720" class="LineNr">12720 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12721" class="LineNr">12721 </span> <span class="subxComment"># var/ebx <- increment => 43/increment-ebx</span> +<span id="L12705" class="LineNr">12705 </span> <a href='mu.subx.html#L15151'>_string_40_increment_eax</a>/imm32/subx-name +<span id="L12706" class="LineNr">12706 </span> 0/imm32/no-rm32 +<span id="L12707" class="LineNr">12707 </span> 0/imm32/no-r32 +<span id="L12708" class="LineNr">12708 </span> 0/imm32/no-imm32 +<span id="L12709" class="LineNr">12709 </span> 0/imm32/no-disp32 +<span id="L12710" class="LineNr">12710 </span> 0/imm32/output-is-write-only +<span id="L12711" class="LineNr">12711 </span> 0x11/imm32/alloc-id:fake +<span id="L12712" class="LineNr">12712 </span> <a href='mu.subx.html#L12713'>_Primitive-increment-ecx</a>/imm32/next +<span id="L12713" class="LineNr">12713 </span><span class="subxMinorFunction">_Primitive-increment-ecx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12714" class="LineNr">12714 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12715" class="LineNr">12715 </span> <span class="subxComment"># var/ecx <- increment => 41/increment-ecx</span> +<span id="L12716" class="LineNr">12716 </span> 0x11/imm32/alloc-id:fake +<span id="L12717" class="LineNr">12717 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12718" class="LineNr">12718 </span> 0/imm32/no-inouts +<span id="L12719" class="LineNr">12719 </span> 0/imm32/no-inouts +<span id="L12720" class="LineNr">12720 </span> 0x11/imm32/alloc-id:fake +<span id="L12721" class="LineNr">12721 </span> <span class="SpecialChar"><a href='mu.subx.html#L15493'>Single-int-var-in-ecx</a></span>/imm32/outputs <span id="L12722" class="LineNr">12722 </span> 0x11/imm32/alloc-id:fake -<span id="L12723" class="LineNr">12723 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12724" class="LineNr">12724 </span> 0/imm32/no-inouts -<span id="L12725" class="LineNr">12725 </span> 0/imm32/no-inouts -<span id="L12726" class="LineNr">12726 </span> 0x11/imm32/alloc-id:fake -<span id="L12727" class="LineNr">12727 </span> <span class="SpecialChar"><a href='mu.subx.html#L15499'>Single-int-var-in-ebx</a></span>/imm32/outputs -<span id="L12728" class="LineNr">12728 </span> 0x11/imm32/alloc-id:fake -<span id="L12729" class="LineNr">12729 </span> <a href='mu.subx.html#L15136'>_string_43_increment_ebx</a>/imm32/subx-name -<span id="L12730" class="LineNr">12730 </span> 0/imm32/no-rm32 -<span id="L12731" class="LineNr">12731 </span> 0/imm32/no-r32 -<span id="L12732" class="LineNr">12732 </span> 0/imm32/no-imm32 -<span id="L12733" class="LineNr">12733 </span> 0/imm32/no-disp32 -<span id="L12734" class="LineNr">12734 </span> 0/imm32/output-is-write-only -<span id="L12735" class="LineNr">12735 </span> 0x11/imm32/alloc-id:fake -<span id="L12736" class="LineNr">12736 </span> <a href='mu.subx.html#L12737'>_Primitive-increment-esi</a>/imm32/next -<span id="L12737" class="LineNr">12737 </span><span class="subxMinorFunction">_Primitive-increment-esi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12738" class="LineNr">12738 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12739" class="LineNr">12739 </span> <span class="subxComment"># var/esi <- increment => 46/increment-esi</span> +<span id="L12723" class="LineNr">12723 </span> <a href='mu.subx.html#L15156'>_string_41_increment_ecx</a>/imm32/subx-name +<span id="L12724" class="LineNr">12724 </span> 0/imm32/no-rm32 +<span id="L12725" class="LineNr">12725 </span> 0/imm32/no-r32 +<span id="L12726" class="LineNr">12726 </span> 0/imm32/no-imm32 +<span id="L12727" class="LineNr">12727 </span> 0/imm32/no-disp32 +<span id="L12728" class="LineNr">12728 </span> 0/imm32/output-is-write-only +<span id="L12729" class="LineNr">12729 </span> 0x11/imm32/alloc-id:fake +<span id="L12730" class="LineNr">12730 </span> <a href='mu.subx.html#L12731'>_Primitive-increment-edx</a>/imm32/next +<span id="L12731" class="LineNr">12731 </span><span class="subxMinorFunction">_Primitive-increment-edx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12732" class="LineNr">12732 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12733" class="LineNr">12733 </span> <span class="subxComment"># var/edx <- increment => 42/increment-edx</span> +<span id="L12734" class="LineNr">12734 </span> 0x11/imm32/alloc-id:fake +<span id="L12735" class="LineNr">12735 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12736" class="LineNr">12736 </span> 0/imm32/no-inouts +<span id="L12737" class="LineNr">12737 </span> 0/imm32/no-inouts +<span id="L12738" class="LineNr">12738 </span> 0x11/imm32/alloc-id:fake +<span id="L12739" class="LineNr">12739 </span> <span class="SpecialChar"><a href='mu.subx.html#L15511'>Single-int-var-in-edx</a></span>/imm32/outputs <span id="L12740" class="LineNr">12740 </span> 0x11/imm32/alloc-id:fake -<span id="L12741" class="LineNr">12741 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12742" class="LineNr">12742 </span> 0/imm32/no-inouts -<span id="L12743" class="LineNr">12743 </span> 0/imm32/no-inouts -<span id="L12744" class="LineNr">12744 </span> 0x11/imm32/alloc-id:fake -<span id="L12745" class="LineNr">12745 </span> <span class="SpecialChar"><a href='mu.subx.html#L15517'>Single-int-var-in-esi</a></span>/imm32/outputs -<span id="L12746" class="LineNr">12746 </span> 0x11/imm32/alloc-id:fake -<span id="L12747" class="LineNr">12747 </span> <a href='mu.subx.html#L15141'>_string_46_increment_esi</a>/imm32/subx-name -<span id="L12748" class="LineNr">12748 </span> 0/imm32/no-rm32 -<span id="L12749" class="LineNr">12749 </span> 0/imm32/no-r32 -<span id="L12750" class="LineNr">12750 </span> 0/imm32/no-imm32 -<span id="L12751" class="LineNr">12751 </span> 0/imm32/no-disp32 -<span id="L12752" class="LineNr">12752 </span> 0/imm32/output-is-write-only -<span id="L12753" class="LineNr">12753 </span> 0x11/imm32/alloc-id:fake -<span id="L12754" class="LineNr">12754 </span> <a href='mu.subx.html#L12755'>_Primitive-increment-edi</a>/imm32/next -<span id="L12755" class="LineNr">12755 </span><span class="subxMinorFunction">_Primitive-increment-edi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12756" class="LineNr">12756 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12757" class="LineNr">12757 </span> <span class="subxComment"># var/edi <- increment => 47/increment-edi</span> +<span id="L12741" class="LineNr">12741 </span> <a href='mu.subx.html#L15161'>_string_42_increment_edx</a>/imm32/subx-name +<span id="L12742" class="LineNr">12742 </span> 0/imm32/no-rm32 +<span id="L12743" class="LineNr">12743 </span> 0/imm32/no-r32 +<span id="L12744" class="LineNr">12744 </span> 0/imm32/no-imm32 +<span id="L12745" class="LineNr">12745 </span> 0/imm32/no-disp32 +<span id="L12746" class="LineNr">12746 </span> 0/imm32/output-is-write-only +<span id="L12747" class="LineNr">12747 </span> 0x11/imm32/alloc-id:fake +<span id="L12748" class="LineNr">12748 </span> <a href='mu.subx.html#L12749'>_Primitive-increment-ebx</a>/imm32/next +<span id="L12749" class="LineNr">12749 </span><span class="subxMinorFunction">_Primitive-increment-ebx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12750" class="LineNr">12750 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12751" class="LineNr">12751 </span> <span class="subxComment"># var/ebx <- increment => 43/increment-ebx</span> +<span id="L12752" class="LineNr">12752 </span> 0x11/imm32/alloc-id:fake +<span id="L12753" class="LineNr">12753 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12754" class="LineNr">12754 </span> 0/imm32/no-inouts +<span id="L12755" class="LineNr">12755 </span> 0/imm32/no-inouts +<span id="L12756" class="LineNr">12756 </span> 0x11/imm32/alloc-id:fake +<span id="L12757" class="LineNr">12757 </span> <span class="SpecialChar"><a href='mu.subx.html#L15529'>Single-int-var-in-ebx</a></span>/imm32/outputs <span id="L12758" class="LineNr">12758 </span> 0x11/imm32/alloc-id:fake -<span id="L12759" class="LineNr">12759 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12760" class="LineNr">12760 </span> 0/imm32/no-inouts -<span id="L12761" class="LineNr">12761 </span> 0/imm32/no-inouts -<span id="L12762" class="LineNr">12762 </span> 0x11/imm32/alloc-id:fake -<span id="L12763" class="LineNr">12763 </span> <span class="SpecialChar"><a href='mu.subx.html#L15535'>Single-int-var-in-edi</a></span>/imm32/outputs -<span id="L12764" class="LineNr">12764 </span> 0x11/imm32/alloc-id:fake -<span id="L12765" class="LineNr">12765 </span> <a href='mu.subx.html#L15146'>_string_47_increment_edi</a>/imm32/subx-name -<span id="L12766" class="LineNr">12766 </span> 0/imm32/no-rm32 -<span id="L12767" class="LineNr">12767 </span> 0/imm32/no-r32 -<span id="L12768" class="LineNr">12768 </span> 0/imm32/no-imm32 -<span id="L12769" class="LineNr">12769 </span> 0/imm32/no-disp32 -<span id="L12770" class="LineNr">12770 </span> 0/imm32/output-is-write-only -<span id="L12771" class="LineNr">12771 </span> 0x11/imm32/alloc-id:fake -<span id="L12772" class="LineNr">12772 </span> <a href='mu.subx.html#L12773'>_Primitive-decrement-eax</a>/imm32/next -<span id="L12773" class="LineNr">12773 </span><span class="subxMinorFunction">_Primitive-decrement-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12774" class="LineNr">12774 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12775" class="LineNr">12775 </span> <span class="subxComment"># var/eax <- decrement => 48/decrement-eax</span> +<span id="L12759" class="LineNr">12759 </span> <a href='mu.subx.html#L15166'>_string_43_increment_ebx</a>/imm32/subx-name +<span id="L12760" class="LineNr">12760 </span> 0/imm32/no-rm32 +<span id="L12761" class="LineNr">12761 </span> 0/imm32/no-r32 +<span id="L12762" class="LineNr">12762 </span> 0/imm32/no-imm32 +<span id="L12763" class="LineNr">12763 </span> 0/imm32/no-disp32 +<span id="L12764" class="LineNr">12764 </span> 0/imm32/output-is-write-only +<span id="L12765" class="LineNr">12765 </span> 0x11/imm32/alloc-id:fake +<span id="L12766" class="LineNr">12766 </span> <a href='mu.subx.html#L12767'>_Primitive-increment-esi</a>/imm32/next +<span id="L12767" class="LineNr">12767 </span><span class="subxMinorFunction">_Primitive-increment-esi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12768" class="LineNr">12768 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12769" class="LineNr">12769 </span> <span class="subxComment"># var/esi <- increment => 46/increment-esi</span> +<span id="L12770" class="LineNr">12770 </span> 0x11/imm32/alloc-id:fake +<span id="L12771" class="LineNr">12771 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12772" class="LineNr">12772 </span> 0/imm32/no-inouts +<span id="L12773" class="LineNr">12773 </span> 0/imm32/no-inouts +<span id="L12774" class="LineNr">12774 </span> 0x11/imm32/alloc-id:fake +<span id="L12775" class="LineNr">12775 </span> <span class="SpecialChar"><a href='mu.subx.html#L15547'>Single-int-var-in-esi</a></span>/imm32/outputs <span id="L12776" class="LineNr">12776 </span> 0x11/imm32/alloc-id:fake -<span id="L12777" class="LineNr">12777 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12778" class="LineNr">12778 </span> 0/imm32/no-inouts -<span id="L12779" class="LineNr">12779 </span> 0/imm32/no-inouts -<span id="L12780" class="LineNr">12780 </span> 0x11/imm32/alloc-id:fake -<span id="L12781" class="LineNr">12781 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs -<span id="L12782" class="LineNr">12782 </span> 0x11/imm32/alloc-id:fake -<span id="L12783" class="LineNr">12783 </span> <a href='mu.subx.html#L15151'>_string_48_decrement_eax</a>/imm32/subx-name -<span id="L12784" class="LineNr">12784 </span> 0/imm32/no-rm32 -<span id="L12785" class="LineNr">12785 </span> 0/imm32/no-r32 -<span id="L12786" class="LineNr">12786 </span> 0/imm32/no-imm32 -<span id="L12787" class="LineNr">12787 </span> 0/imm32/no-disp32 -<span id="L12788" class="LineNr">12788 </span> 0/imm32/output-is-write-only -<span id="L12789" class="LineNr">12789 </span> 0x11/imm32/alloc-id:fake -<span id="L12790" class="LineNr">12790 </span> <a href='mu.subx.html#L12791'>_Primitive-decrement-ecx</a>/imm32/next -<span id="L12791" class="LineNr">12791 </span><span class="subxMinorFunction">_Primitive-decrement-ecx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12792" class="LineNr">12792 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12793" class="LineNr">12793 </span> <span class="subxComment"># var/ecx <- decrement => 49/decrement-ecx</span> +<span id="L12777" class="LineNr">12777 </span> <a href='mu.subx.html#L15171'>_string_46_increment_esi</a>/imm32/subx-name +<span id="L12778" class="LineNr">12778 </span> 0/imm32/no-rm32 +<span id="L12779" class="LineNr">12779 </span> 0/imm32/no-r32 +<span id="L12780" class="LineNr">12780 </span> 0/imm32/no-imm32 +<span id="L12781" class="LineNr">12781 </span> 0/imm32/no-disp32 +<span id="L12782" class="LineNr">12782 </span> 0/imm32/output-is-write-only +<span id="L12783" class="LineNr">12783 </span> 0x11/imm32/alloc-id:fake +<span id="L12784" class="LineNr">12784 </span> <a href='mu.subx.html#L12785'>_Primitive-increment-edi</a>/imm32/next +<span id="L12785" class="LineNr">12785 </span><span class="subxMinorFunction">_Primitive-increment-edi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12786" class="LineNr">12786 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12787" class="LineNr">12787 </span> <span class="subxComment"># var/edi <- increment => 47/increment-edi</span> +<span id="L12788" class="LineNr">12788 </span> 0x11/imm32/alloc-id:fake +<span id="L12789" class="LineNr">12789 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12790" class="LineNr">12790 </span> 0/imm32/no-inouts +<span id="L12791" class="LineNr">12791 </span> 0/imm32/no-inouts +<span id="L12792" class="LineNr">12792 </span> 0x11/imm32/alloc-id:fake +<span id="L12793" class="LineNr">12793 </span> <span class="SpecialChar"><a href='mu.subx.html#L15565'>Single-int-var-in-edi</a></span>/imm32/outputs <span id="L12794" class="LineNr">12794 </span> 0x11/imm32/alloc-id:fake -<span id="L12795" class="LineNr">12795 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12796" class="LineNr">12796 </span> 0/imm32/no-inouts -<span id="L12797" class="LineNr">12797 </span> 0/imm32/no-inouts -<span id="L12798" class="LineNr">12798 </span> 0x11/imm32/alloc-id:fake -<span id="L12799" class="LineNr">12799 </span> <span class="SpecialChar"><a href='mu.subx.html#L15463'>Single-int-var-in-ecx</a></span>/imm32/outputs -<span id="L12800" class="LineNr">12800 </span> 0x11/imm32/alloc-id:fake -<span id="L12801" class="LineNr">12801 </span> <a href='mu.subx.html#L15156'>_string_49_decrement_ecx</a>/imm32/subx-name -<span id="L12802" class="LineNr">12802 </span> 0/imm32/no-rm32 -<span id="L12803" class="LineNr">12803 </span> 0/imm32/no-r32 -<span id="L12804" class="LineNr">12804 </span> 0/imm32/no-imm32 -<span id="L12805" class="LineNr">12805 </span> 0/imm32/no-disp32 -<span id="L12806" class="LineNr">12806 </span> 0/imm32/output-is-write-only -<span id="L12807" class="LineNr">12807 </span> 0x11/imm32/alloc-id:fake -<span id="L12808" class="LineNr">12808 </span> <a href='mu.subx.html#L12809'>_Primitive-decrement-edx</a>/imm32/next -<span id="L12809" class="LineNr">12809 </span><span class="subxMinorFunction">_Primitive-decrement-edx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12810" class="LineNr">12810 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12811" class="LineNr">12811 </span> <span class="subxComment"># var/edx <- decrement => 4a/decrement-edx</span> +<span id="L12795" class="LineNr">12795 </span> <a href='mu.subx.html#L15176'>_string_47_increment_edi</a>/imm32/subx-name +<span id="L12796" class="LineNr">12796 </span> 0/imm32/no-rm32 +<span id="L12797" class="LineNr">12797 </span> 0/imm32/no-r32 +<span id="L12798" class="LineNr">12798 </span> 0/imm32/no-imm32 +<span id="L12799" class="LineNr">12799 </span> 0/imm32/no-disp32 +<span id="L12800" class="LineNr">12800 </span> 0/imm32/output-is-write-only +<span id="L12801" class="LineNr">12801 </span> 0x11/imm32/alloc-id:fake +<span id="L12802" class="LineNr">12802 </span> <a href='mu.subx.html#L12803'>_Primitive-decrement-eax</a>/imm32/next +<span id="L12803" class="LineNr">12803 </span><span class="subxMinorFunction">_Primitive-decrement-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12804" class="LineNr">12804 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12805" class="LineNr">12805 </span> <span class="subxComment"># var/eax <- decrement => 48/decrement-eax</span> +<span id="L12806" class="LineNr">12806 </span> 0x11/imm32/alloc-id:fake +<span id="L12807" class="LineNr">12807 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12808" class="LineNr">12808 </span> 0/imm32/no-inouts +<span id="L12809" class="LineNr">12809 </span> 0/imm32/no-inouts +<span id="L12810" class="LineNr">12810 </span> 0x11/imm32/alloc-id:fake +<span id="L12811" class="LineNr">12811 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L12812" class="LineNr">12812 </span> 0x11/imm32/alloc-id:fake -<span id="L12813" class="LineNr">12813 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12814" class="LineNr">12814 </span> 0/imm32/no-inouts -<span id="L12815" class="LineNr">12815 </span> 0/imm32/no-inouts -<span id="L12816" class="LineNr">12816 </span> 0x11/imm32/alloc-id:fake -<span id="L12817" class="LineNr">12817 </span> <span class="SpecialChar"><a href='mu.subx.html#L15481'>Single-int-var-in-edx</a></span>/imm32/outputs -<span id="L12818" class="LineNr">12818 </span> 0x11/imm32/alloc-id:fake -<span id="L12819" class="LineNr">12819 </span> <a href='mu.subx.html#L15161'>_string_4a_decrement_edx</a>/imm32/subx-name -<span id="L12820" class="LineNr">12820 </span> 0/imm32/no-rm32 -<span id="L12821" class="LineNr">12821 </span> 0/imm32/no-r32 -<span id="L12822" class="LineNr">12822 </span> 0/imm32/no-imm32 -<span id="L12823" class="LineNr">12823 </span> 0/imm32/no-disp32 -<span id="L12824" class="LineNr">12824 </span> 0/imm32/output-is-write-only -<span id="L12825" class="LineNr">12825 </span> 0x11/imm32/alloc-id:fake -<span id="L12826" class="LineNr">12826 </span> <a href='mu.subx.html#L12827'>_Primitive-decrement-ebx</a>/imm32/next -<span id="L12827" class="LineNr">12827 </span><span class="subxMinorFunction">_Primitive-decrement-ebx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12828" class="LineNr">12828 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12829" class="LineNr">12829 </span> <span class="subxComment"># var/ebx <- decrement => 4b/decrement-ebx</span> +<span id="L12813" class="LineNr">12813 </span> <a href='mu.subx.html#L15181'>_string_48_decrement_eax</a>/imm32/subx-name +<span id="L12814" class="LineNr">12814 </span> 0/imm32/no-rm32 +<span id="L12815" class="LineNr">12815 </span> 0/imm32/no-r32 +<span id="L12816" class="LineNr">12816 </span> 0/imm32/no-imm32 +<span id="L12817" class="LineNr">12817 </span> 0/imm32/no-disp32 +<span id="L12818" class="LineNr">12818 </span> 0/imm32/output-is-write-only +<span id="L12819" class="LineNr">12819 </span> 0x11/imm32/alloc-id:fake +<span id="L12820" class="LineNr">12820 </span> <a href='mu.subx.html#L12821'>_Primitive-decrement-ecx</a>/imm32/next +<span id="L12821" class="LineNr">12821 </span><span class="subxMinorFunction">_Primitive-decrement-ecx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12822" class="LineNr">12822 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12823" class="LineNr">12823 </span> <span class="subxComment"># var/ecx <- decrement => 49/decrement-ecx</span> +<span id="L12824" class="LineNr">12824 </span> 0x11/imm32/alloc-id:fake +<span id="L12825" class="LineNr">12825 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12826" class="LineNr">12826 </span> 0/imm32/no-inouts +<span id="L12827" class="LineNr">12827 </span> 0/imm32/no-inouts +<span id="L12828" class="LineNr">12828 </span> 0x11/imm32/alloc-id:fake +<span id="L12829" class="LineNr">12829 </span> <span class="SpecialChar"><a href='mu.subx.html#L15493'>Single-int-var-in-ecx</a></span>/imm32/outputs <span id="L12830" class="LineNr">12830 </span> 0x11/imm32/alloc-id:fake -<span id="L12831" class="LineNr">12831 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12832" class="LineNr">12832 </span> 0/imm32/no-inouts -<span id="L12833" class="LineNr">12833 </span> 0/imm32/no-inouts -<span id="L12834" class="LineNr">12834 </span> 0x11/imm32/alloc-id:fake -<span id="L12835" class="LineNr">12835 </span> <span class="SpecialChar"><a href='mu.subx.html#L15499'>Single-int-var-in-ebx</a></span>/imm32/outputs -<span id="L12836" class="LineNr">12836 </span> 0x11/imm32/alloc-id:fake -<span id="L12837" class="LineNr">12837 </span> <a href='mu.subx.html#L15166'>_string_4b_decrement_ebx</a>/imm32/subx-name -<span id="L12838" class="LineNr">12838 </span> 0/imm32/no-rm32 -<span id="L12839" class="LineNr">12839 </span> 0/imm32/no-r32 -<span id="L12840" class="LineNr">12840 </span> 0/imm32/no-imm32 -<span id="L12841" class="LineNr">12841 </span> 0/imm32/no-disp32 -<span id="L12842" class="LineNr">12842 </span> 0/imm32/output-is-write-only -<span id="L12843" class="LineNr">12843 </span> 0x11/imm32/alloc-id:fake -<span id="L12844" class="LineNr">12844 </span> <a href='mu.subx.html#L12845'>_Primitive-decrement-esi</a>/imm32/next -<span id="L12845" class="LineNr">12845 </span><span class="subxMinorFunction">_Primitive-decrement-esi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12846" class="LineNr">12846 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12847" class="LineNr">12847 </span> <span class="subxComment"># var/esi <- decrement => 4e/decrement-esi</span> +<span id="L12831" class="LineNr">12831 </span> <a href='mu.subx.html#L15186'>_string_49_decrement_ecx</a>/imm32/subx-name +<span id="L12832" class="LineNr">12832 </span> 0/imm32/no-rm32 +<span id="L12833" class="LineNr">12833 </span> 0/imm32/no-r32 +<span id="L12834" class="LineNr">12834 </span> 0/imm32/no-imm32 +<span id="L12835" class="LineNr">12835 </span> 0/imm32/no-disp32 +<span id="L12836" class="LineNr">12836 </span> 0/imm32/output-is-write-only +<span id="L12837" class="LineNr">12837 </span> 0x11/imm32/alloc-id:fake +<span id="L12838" class="LineNr">12838 </span> <a href='mu.subx.html#L12839'>_Primitive-decrement-edx</a>/imm32/next +<span id="L12839" class="LineNr">12839 </span><span class="subxMinorFunction">_Primitive-decrement-edx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12840" class="LineNr">12840 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12841" class="LineNr">12841 </span> <span class="subxComment"># var/edx <- decrement => 4a/decrement-edx</span> +<span id="L12842" class="LineNr">12842 </span> 0x11/imm32/alloc-id:fake +<span id="L12843" class="LineNr">12843 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12844" class="LineNr">12844 </span> 0/imm32/no-inouts +<span id="L12845" class="LineNr">12845 </span> 0/imm32/no-inouts +<span id="L12846" class="LineNr">12846 </span> 0x11/imm32/alloc-id:fake +<span id="L12847" class="LineNr">12847 </span> <span class="SpecialChar"><a href='mu.subx.html#L15511'>Single-int-var-in-edx</a></span>/imm32/outputs <span id="L12848" class="LineNr">12848 </span> 0x11/imm32/alloc-id:fake -<span id="L12849" class="LineNr">12849 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12850" class="LineNr">12850 </span> 0/imm32/no-inouts -<span id="L12851" class="LineNr">12851 </span> 0/imm32/no-inouts -<span id="L12852" class="LineNr">12852 </span> 0x11/imm32/alloc-id:fake -<span id="L12853" class="LineNr">12853 </span> <span class="SpecialChar"><a href='mu.subx.html#L15517'>Single-int-var-in-esi</a></span>/imm32/outputs -<span id="L12854" class="LineNr">12854 </span> 0x11/imm32/alloc-id:fake -<span id="L12855" class="LineNr">12855 </span> <a href='mu.subx.html#L15171'>_string_4e_decrement_esi</a>/imm32/subx-name -<span id="L12856" class="LineNr">12856 </span> 0/imm32/no-rm32 -<span id="L12857" class="LineNr">12857 </span> 0/imm32/no-r32 -<span id="L12858" class="LineNr">12858 </span> 0/imm32/no-imm32 -<span id="L12859" class="LineNr">12859 </span> 0/imm32/no-disp32 -<span id="L12860" class="LineNr">12860 </span> 0/imm32/output-is-write-only -<span id="L12861" class="LineNr">12861 </span> 0x11/imm32/alloc-id:fake -<span id="L12862" class="LineNr">12862 </span> <a href='mu.subx.html#L12863'>_Primitive-decrement-edi</a>/imm32/next -<span id="L12863" class="LineNr">12863 </span><span class="subxMinorFunction">_Primitive-decrement-edi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12864" class="LineNr">12864 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12865" class="LineNr">12865 </span> <span class="subxComment"># var/edi <- decrement => 4f/decrement-edi</span> +<span id="L12849" class="LineNr">12849 </span> <a href='mu.subx.html#L15191'>_string_4a_decrement_edx</a>/imm32/subx-name +<span id="L12850" class="LineNr">12850 </span> 0/imm32/no-rm32 +<span id="L12851" class="LineNr">12851 </span> 0/imm32/no-r32 +<span id="L12852" class="LineNr">12852 </span> 0/imm32/no-imm32 +<span id="L12853" class="LineNr">12853 </span> 0/imm32/no-disp32 +<span id="L12854" class="LineNr">12854 </span> 0/imm32/output-is-write-only +<span id="L12855" class="LineNr">12855 </span> 0x11/imm32/alloc-id:fake +<span id="L12856" class="LineNr">12856 </span> <a href='mu.subx.html#L12857'>_Primitive-decrement-ebx</a>/imm32/next +<span id="L12857" class="LineNr">12857 </span><span class="subxMinorFunction">_Primitive-decrement-ebx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12858" class="LineNr">12858 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12859" class="LineNr">12859 </span> <span class="subxComment"># var/ebx <- decrement => 4b/decrement-ebx</span> +<span id="L12860" class="LineNr">12860 </span> 0x11/imm32/alloc-id:fake +<span id="L12861" class="LineNr">12861 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12862" class="LineNr">12862 </span> 0/imm32/no-inouts +<span id="L12863" class="LineNr">12863 </span> 0/imm32/no-inouts +<span id="L12864" class="LineNr">12864 </span> 0x11/imm32/alloc-id:fake +<span id="L12865" class="LineNr">12865 </span> <span class="SpecialChar"><a href='mu.subx.html#L15529'>Single-int-var-in-ebx</a></span>/imm32/outputs <span id="L12866" class="LineNr">12866 </span> 0x11/imm32/alloc-id:fake -<span id="L12867" class="LineNr">12867 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12868" class="LineNr">12868 </span> 0/imm32/no-inouts -<span id="L12869" class="LineNr">12869 </span> 0/imm32/no-inouts -<span id="L12870" class="LineNr">12870 </span> 0x11/imm32/alloc-id:fake -<span id="L12871" class="LineNr">12871 </span> <span class="SpecialChar"><a href='mu.subx.html#L15535'>Single-int-var-in-edi</a></span>/imm32/outputs -<span id="L12872" class="LineNr">12872 </span> 0x11/imm32/alloc-id:fake -<span id="L12873" class="LineNr">12873 </span> <a href='mu.subx.html#L15176'>_string_4f_decrement_edi</a>/imm32/subx-name -<span id="L12874" class="LineNr">12874 </span> 0/imm32/no-rm32 -<span id="L12875" class="LineNr">12875 </span> 0/imm32/no-r32 -<span id="L12876" class="LineNr">12876 </span> 0/imm32/no-imm32 -<span id="L12877" class="LineNr">12877 </span> 0/imm32/no-disp32 -<span id="L12878" class="LineNr">12878 </span> 0/imm32/output-is-write-only -<span id="L12879" class="LineNr">12879 </span> 0x11/imm32/alloc-id:fake -<span id="L12880" class="LineNr">12880 </span> <a href='mu.subx.html#L12881'>_Primitive-increment-mem</a>/imm32/next -<span id="L12881" class="LineNr">12881 </span><span class="subxMinorFunction">_Primitive-increment-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12882" class="LineNr">12882 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12883" class="LineNr">12883 </span> <span class="subxComment"># increment var => ff 0/subop/increment *(ebp+__)</span> +<span id="L12867" class="LineNr">12867 </span> <a href='mu.subx.html#L15196'>_string_4b_decrement_ebx</a>/imm32/subx-name +<span id="L12868" class="LineNr">12868 </span> 0/imm32/no-rm32 +<span id="L12869" class="LineNr">12869 </span> 0/imm32/no-r32 +<span id="L12870" class="LineNr">12870 </span> 0/imm32/no-imm32 +<span id="L12871" class="LineNr">12871 </span> 0/imm32/no-disp32 +<span id="L12872" class="LineNr">12872 </span> 0/imm32/output-is-write-only +<span id="L12873" class="LineNr">12873 </span> 0x11/imm32/alloc-id:fake +<span id="L12874" class="LineNr">12874 </span> <a href='mu.subx.html#L12875'>_Primitive-decrement-esi</a>/imm32/next +<span id="L12875" class="LineNr">12875 </span><span class="subxMinorFunction">_Primitive-decrement-esi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12876" class="LineNr">12876 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12877" class="LineNr">12877 </span> <span class="subxComment"># var/esi <- decrement => 4e/decrement-esi</span> +<span id="L12878" class="LineNr">12878 </span> 0x11/imm32/alloc-id:fake +<span id="L12879" class="LineNr">12879 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12880" class="LineNr">12880 </span> 0/imm32/no-inouts +<span id="L12881" class="LineNr">12881 </span> 0/imm32/no-inouts +<span id="L12882" class="LineNr">12882 </span> 0x11/imm32/alloc-id:fake +<span id="L12883" class="LineNr">12883 </span> <span class="SpecialChar"><a href='mu.subx.html#L15547'>Single-int-var-in-esi</a></span>/imm32/outputs <span id="L12884" class="LineNr">12884 </span> 0x11/imm32/alloc-id:fake -<span id="L12885" class="LineNr">12885 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12886" class="LineNr">12886 </span> 0x11/imm32/alloc-id:fake -<span id="L12887" class="LineNr">12887 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L12888" class="LineNr">12888 </span> 0/imm32/no-outputs -<span id="L12889" class="LineNr">12889 </span> 0/imm32/no-outputs -<span id="L12890" class="LineNr">12890 </span> 0x11/imm32/alloc-id:fake -<span id="L12891" class="LineNr">12891 </span> <a href='mu.subx.html#L15286'>_string_ff_subop_increment</a>/imm32/subx-name -<span id="L12892" class="LineNr">12892 </span> 1/imm32/rm32-is-first-inout -<span id="L12893" class="LineNr">12893 </span> 0/imm32/no-r32 -<span id="L12894" class="LineNr">12894 </span> 0/imm32/no-imm32 -<span id="L12895" class="LineNr">12895 </span> 0/imm32/no-disp32 -<span id="L12896" class="LineNr">12896 </span> 0/imm32/output-is-write-only -<span id="L12897" class="LineNr">12897 </span> 0x11/imm32/alloc-id:fake -<span id="L12898" class="LineNr">12898 </span> <a href='mu.subx.html#L12899'>_Primitive-increment-reg</a>/imm32/next -<span id="L12899" class="LineNr">12899 </span><span class="subxMinorFunction">_Primitive-increment-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12900" class="LineNr">12900 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12901" class="LineNr">12901 </span> <span class="subxComment"># var/reg <- increment => ff 0/subop/increment %__</span> +<span id="L12885" class="LineNr">12885 </span> <a href='mu.subx.html#L15201'>_string_4e_decrement_esi</a>/imm32/subx-name +<span id="L12886" class="LineNr">12886 </span> 0/imm32/no-rm32 +<span id="L12887" class="LineNr">12887 </span> 0/imm32/no-r32 +<span id="L12888" class="LineNr">12888 </span> 0/imm32/no-imm32 +<span id="L12889" class="LineNr">12889 </span> 0/imm32/no-disp32 +<span id="L12890" class="LineNr">12890 </span> 0/imm32/output-is-write-only +<span id="L12891" class="LineNr">12891 </span> 0x11/imm32/alloc-id:fake +<span id="L12892" class="LineNr">12892 </span> <a href='mu.subx.html#L12893'>_Primitive-decrement-edi</a>/imm32/next +<span id="L12893" class="LineNr">12893 </span><span class="subxMinorFunction">_Primitive-decrement-edi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12894" class="LineNr">12894 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12895" class="LineNr">12895 </span> <span class="subxComment"># var/edi <- decrement => 4f/decrement-edi</span> +<span id="L12896" class="LineNr">12896 </span> 0x11/imm32/alloc-id:fake +<span id="L12897" class="LineNr">12897 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12898" class="LineNr">12898 </span> 0/imm32/no-inouts +<span id="L12899" class="LineNr">12899 </span> 0/imm32/no-inouts +<span id="L12900" class="LineNr">12900 </span> 0x11/imm32/alloc-id:fake +<span id="L12901" class="LineNr">12901 </span> <span class="SpecialChar"><a href='mu.subx.html#L15565'>Single-int-var-in-edi</a></span>/imm32/outputs <span id="L12902" class="LineNr">12902 </span> 0x11/imm32/alloc-id:fake -<span id="L12903" class="LineNr">12903 </span> <a href='mu.subx.html#L14779'>_string-increment</a>/imm32/name -<span id="L12904" class="LineNr">12904 </span> 0/imm32/no-inouts -<span id="L12905" class="LineNr">12905 </span> 0/imm32/no-inouts -<span id="L12906" class="LineNr">12906 </span> 0x11/imm32/alloc-id:fake -<span id="L12907" class="LineNr">12907 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L12908" class="LineNr">12908 </span> 0x11/imm32/alloc-id:fake -<span id="L12909" class="LineNr">12909 </span> <a href='mu.subx.html#L15286'>_string_ff_subop_increment</a>/imm32/subx-name -<span id="L12910" class="LineNr">12910 </span> 3/imm32/rm32-is-first-output -<span id="L12911" class="LineNr">12911 </span> 0/imm32/no-r32 -<span id="L12912" class="LineNr">12912 </span> 0/imm32/no-imm32 -<span id="L12913" class="LineNr">12913 </span> 0/imm32/no-disp32 -<span id="L12914" class="LineNr">12914 </span> 0/imm32/output-is-write-only -<span id="L12915" class="LineNr">12915 </span> 0x11/imm32/alloc-id:fake -<span id="L12916" class="LineNr">12916 </span> <a href='mu.subx.html#L12917'>_Primitive-decrement-mem</a>/imm32/next -<span id="L12917" class="LineNr">12917 </span><span class="subxMinorFunction">_Primitive-decrement-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12918" class="LineNr">12918 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12919" class="LineNr">12919 </span> <span class="subxComment"># decrement var => ff 1/subop/decrement *(ebp+__)</span> +<span id="L12903" class="LineNr">12903 </span> <a href='mu.subx.html#L15206'>_string_4f_decrement_edi</a>/imm32/subx-name +<span id="L12904" class="LineNr">12904 </span> 0/imm32/no-rm32 +<span id="L12905" class="LineNr">12905 </span> 0/imm32/no-r32 +<span id="L12906" class="LineNr">12906 </span> 0/imm32/no-imm32 +<span id="L12907" class="LineNr">12907 </span> 0/imm32/no-disp32 +<span id="L12908" class="LineNr">12908 </span> 0/imm32/output-is-write-only +<span id="L12909" class="LineNr">12909 </span> 0x11/imm32/alloc-id:fake +<span id="L12910" class="LineNr">12910 </span> <a href='mu.subx.html#L12911'>_Primitive-increment-mem</a>/imm32/next +<span id="L12911" class="LineNr">12911 </span><span class="subxMinorFunction">_Primitive-increment-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12912" class="LineNr">12912 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12913" class="LineNr">12913 </span> <span class="subxComment"># increment var => ff 0/subop/increment *(ebp+__)</span> +<span id="L12914" class="LineNr">12914 </span> 0x11/imm32/alloc-id:fake +<span id="L12915" class="LineNr">12915 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12916" class="LineNr">12916 </span> 0x11/imm32/alloc-id:fake +<span id="L12917" class="LineNr">12917 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L12918" class="LineNr">12918 </span> 0/imm32/no-outputs +<span id="L12919" class="LineNr">12919 </span> 0/imm32/no-outputs <span id="L12920" class="LineNr">12920 </span> 0x11/imm32/alloc-id:fake -<span id="L12921" class="LineNr">12921 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12922" class="LineNr">12922 </span> 0x11/imm32/alloc-id:fake -<span id="L12923" class="LineNr">12923 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L12924" class="LineNr">12924 </span> 0/imm32/no-outputs -<span id="L12925" class="LineNr">12925 </span> 0/imm32/no-outputs -<span id="L12926" class="LineNr">12926 </span> 0x11/imm32/alloc-id:fake -<span id="L12927" class="LineNr">12927 </span> <a href='mu.subx.html#L15291'>_string_ff_subop_decrement</a>/imm32/subx-name -<span id="L12928" class="LineNr">12928 </span> 1/imm32/rm32-is-first-inout -<span id="L12929" class="LineNr">12929 </span> 0/imm32/no-r32 -<span id="L12930" class="LineNr">12930 </span> 0/imm32/no-imm32 -<span id="L12931" class="LineNr">12931 </span> 0/imm32/no-disp32 -<span id="L12932" class="LineNr">12932 </span> 0/imm32/output-is-write-only -<span id="L12933" class="LineNr">12933 </span> 0x11/imm32/alloc-id:fake -<span id="L12934" class="LineNr">12934 </span> <a href='mu.subx.html#L12935'>_Primitive-decrement-reg</a>/imm32/next -<span id="L12935" class="LineNr">12935 </span><span class="subxMinorFunction">_Primitive-decrement-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12936" class="LineNr">12936 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12937" class="LineNr">12937 </span> <span class="subxComment"># var/reg <- decrement => ff 1/subop/decrement %__</span> +<span id="L12921" class="LineNr">12921 </span> <a href='mu.subx.html#L15316'>_string_ff_subop_increment</a>/imm32/subx-name +<span id="L12922" class="LineNr">12922 </span> 1/imm32/rm32-is-first-inout +<span id="L12923" class="LineNr">12923 </span> 0/imm32/no-r32 +<span id="L12924" class="LineNr">12924 </span> 0/imm32/no-imm32 +<span id="L12925" class="LineNr">12925 </span> 0/imm32/no-disp32 +<span id="L12926" class="LineNr">12926 </span> 0/imm32/output-is-write-only +<span id="L12927" class="LineNr">12927 </span> 0x11/imm32/alloc-id:fake +<span id="L12928" class="LineNr">12928 </span> <a href='mu.subx.html#L12929'>_Primitive-increment-reg</a>/imm32/next +<span id="L12929" class="LineNr">12929 </span><span class="subxMinorFunction">_Primitive-increment-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12930" class="LineNr">12930 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12931" class="LineNr">12931 </span> <span class="subxComment"># var/reg <- increment => ff 0/subop/increment %__</span> +<span id="L12932" class="LineNr">12932 </span> 0x11/imm32/alloc-id:fake +<span id="L12933" class="LineNr">12933 </span> <a href='mu.subx.html#L14809'>_string-increment</a>/imm32/name +<span id="L12934" class="LineNr">12934 </span> 0/imm32/no-inouts +<span id="L12935" class="LineNr">12935 </span> 0/imm32/no-inouts +<span id="L12936" class="LineNr">12936 </span> 0x11/imm32/alloc-id:fake +<span id="L12937" class="LineNr">12937 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L12938" class="LineNr">12938 </span> 0x11/imm32/alloc-id:fake -<span id="L12939" class="LineNr">12939 </span> <a href='mu.subx.html#L14774'>_string-decrement</a>/imm32/name -<span id="L12940" class="LineNr">12940 </span> 0/imm32/no-inouts -<span id="L12941" class="LineNr">12941 </span> 0/imm32/no-inouts -<span id="L12942" class="LineNr">12942 </span> 0x11/imm32/alloc-id:fake -<span id="L12943" class="LineNr">12943 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L12944" class="LineNr">12944 </span> 0x11/imm32/alloc-id:fake -<span id="L12945" class="LineNr">12945 </span> <a href='mu.subx.html#L15291'>_string_ff_subop_decrement</a>/imm32/subx-name -<span id="L12946" class="LineNr">12946 </span> 3/imm32/rm32-is-first-output -<span id="L12947" class="LineNr">12947 </span> 0/imm32/no-r32 -<span id="L12948" class="LineNr">12948 </span> 0/imm32/no-imm32 -<span id="L12949" class="LineNr">12949 </span> 0/imm32/no-disp32 -<span id="L12950" class="LineNr">12950 </span> 0/imm32/output-is-write-only -<span id="L12951" class="LineNr">12951 </span> 0x11/imm32/alloc-id:fake -<span id="L12952" class="LineNr">12952 </span> <a href='mu.subx.html#L12954'>_Primitive-add-to-eax</a>/imm32/next -<span id="L12953" class="LineNr">12953 </span><span class="subxH1Comment"># - add</span> -<span id="L12954" class="LineNr">12954 </span><span class="subxMinorFunction">_Primitive-add-to-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12955" class="LineNr">12955 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12956" class="LineNr">12956 </span> <span class="subxComment"># var/eax <- add lit => 05/add-to-eax lit/imm32</span> -<span id="L12957" class="LineNr">12957 </span> 0x11/imm32/alloc-id:fake -<span id="L12958" class="LineNr">12958 </span> <a href='mu.subx.html#L14669'>_string-add</a>/imm32/name -<span id="L12959" class="LineNr">12959 </span> 0x11/imm32/alloc-id:fake -<span id="L12960" class="LineNr">12960 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L12961" class="LineNr">12961 </span> 0x11/imm32/alloc-id:fake -<span id="L12962" class="LineNr">12962 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L12939" class="LineNr">12939 </span> <a href='mu.subx.html#L15316'>_string_ff_subop_increment</a>/imm32/subx-name +<span id="L12940" class="LineNr">12940 </span> 3/imm32/rm32-is-first-output +<span id="L12941" class="LineNr">12941 </span> 0/imm32/no-r32 +<span id="L12942" class="LineNr">12942 </span> 0/imm32/no-imm32 +<span id="L12943" class="LineNr">12943 </span> 0/imm32/no-disp32 +<span id="L12944" class="LineNr">12944 </span> 0/imm32/output-is-write-only +<span id="L12945" class="LineNr">12945 </span> 0x11/imm32/alloc-id:fake +<span id="L12946" class="LineNr">12946 </span> <a href='mu.subx.html#L12947'>_Primitive-decrement-mem</a>/imm32/next +<span id="L12947" class="LineNr">12947 </span><span class="subxMinorFunction">_Primitive-decrement-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12948" class="LineNr">12948 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12949" class="LineNr">12949 </span> <span class="subxComment"># decrement var => ff 1/subop/decrement *(ebp+__)</span> +<span id="L12950" class="LineNr">12950 </span> 0x11/imm32/alloc-id:fake +<span id="L12951" class="LineNr">12951 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12952" class="LineNr">12952 </span> 0x11/imm32/alloc-id:fake +<span id="L12953" class="LineNr">12953 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L12954" class="LineNr">12954 </span> 0/imm32/no-outputs +<span id="L12955" class="LineNr">12955 </span> 0/imm32/no-outputs +<span id="L12956" class="LineNr">12956 </span> 0x11/imm32/alloc-id:fake +<span id="L12957" class="LineNr">12957 </span> <a href='mu.subx.html#L15321'>_string_ff_subop_decrement</a>/imm32/subx-name +<span id="L12958" class="LineNr">12958 </span> 1/imm32/rm32-is-first-inout +<span id="L12959" class="LineNr">12959 </span> 0/imm32/no-r32 +<span id="L12960" class="LineNr">12960 </span> 0/imm32/no-imm32 +<span id="L12961" class="LineNr">12961 </span> 0/imm32/no-disp32 +<span id="L12962" class="LineNr">12962 </span> 0/imm32/output-is-write-only <span id="L12963" class="LineNr">12963 </span> 0x11/imm32/alloc-id:fake -<span id="L12964" class="LineNr">12964 </span> <a href='mu.subx.html#L14886'>_string_05_add_to_eax</a>/imm32/subx-name -<span id="L12965" class="LineNr">12965 </span> 0/imm32/no-rm32 -<span id="L12966" class="LineNr">12966 </span> 0/imm32/no-r32 -<span id="L12967" class="LineNr">12967 </span> 1/imm32/imm32-is-first-inout -<span id="L12968" class="LineNr">12968 </span> 0/imm32/no-disp32 -<span id="L12969" class="LineNr">12969 </span> 0/imm32/output-is-write-only -<span id="L12970" class="LineNr">12970 </span> 0x11/imm32/alloc-id:fake -<span id="L12971" class="LineNr">12971 </span> <a href='mu.subx.html#L12972'>_Primitive-add-reg-to-reg</a>/imm32/next -<span id="L12972" class="LineNr">12972 </span><span class="subxMinorFunction">_Primitive-add-reg-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12973" class="LineNr">12973 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12974" class="LineNr">12974 </span> <span class="subxComment"># var1/reg <- add var2/reg => 01/add-to var1/rm32 var2/r32</span> -<span id="L12975" class="LineNr">12975 </span> 0x11/imm32/alloc-id:fake -<span id="L12976" class="LineNr">12976 </span> <a href='mu.subx.html#L14669'>_string-add</a>/imm32/name -<span id="L12977" class="LineNr">12977 </span> 0x11/imm32/alloc-id:fake -<span id="L12978" class="LineNr">12978 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L12979" class="LineNr">12979 </span> 0x11/imm32/alloc-id:fake -<span id="L12980" class="LineNr">12980 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L12964" class="LineNr">12964 </span> <a href='mu.subx.html#L12965'>_Primitive-decrement-reg</a>/imm32/next +<span id="L12965" class="LineNr">12965 </span><span class="subxMinorFunction">_Primitive-decrement-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12966" class="LineNr">12966 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12967" class="LineNr">12967 </span> <span class="subxComment"># var/reg <- decrement => ff 1/subop/decrement %__</span> +<span id="L12968" class="LineNr">12968 </span> 0x11/imm32/alloc-id:fake +<span id="L12969" class="LineNr">12969 </span> <a href='mu.subx.html#L14804'>_string-decrement</a>/imm32/name +<span id="L12970" class="LineNr">12970 </span> 0/imm32/no-inouts +<span id="L12971" class="LineNr">12971 </span> 0/imm32/no-inouts +<span id="L12972" class="LineNr">12972 </span> 0x11/imm32/alloc-id:fake +<span id="L12973" class="LineNr">12973 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L12974" class="LineNr">12974 </span> 0x11/imm32/alloc-id:fake +<span id="L12975" class="LineNr">12975 </span> <a href='mu.subx.html#L15321'>_string_ff_subop_decrement</a>/imm32/subx-name +<span id="L12976" class="LineNr">12976 </span> 3/imm32/rm32-is-first-output +<span id="L12977" class="LineNr">12977 </span> 0/imm32/no-r32 +<span id="L12978" class="LineNr">12978 </span> 0/imm32/no-imm32 +<span id="L12979" class="LineNr">12979 </span> 0/imm32/no-disp32 +<span id="L12980" class="LineNr">12980 </span> 0/imm32/output-is-write-only <span id="L12981" class="LineNr">12981 </span> 0x11/imm32/alloc-id:fake -<span id="L12982" class="LineNr">12982 </span> <a href='mu.subx.html#L14876'>_string_01_add_to</a>/imm32/subx-name -<span id="L12983" class="LineNr">12983 </span> 3/imm32/rm32-is-first-output -<span id="L12984" class="LineNr">12984 </span> 1/imm32/r32-is-first-inout -<span id="L12985" class="LineNr">12985 </span> 0/imm32/no-imm32 -<span id="L12986" class="LineNr">12986 </span> 0/imm32/no-disp32 -<span id="L12987" class="LineNr">12987 </span> 0/imm32/output-is-write-only -<span id="L12988" class="LineNr">12988 </span> 0x11/imm32/alloc-id:fake -<span id="L12989" class="LineNr">12989 </span> <a href='mu.subx.html#L12990'>_Primitive-add-reg-to-mem</a>/imm32/next -<span id="L12990" class="LineNr">12990 </span><span class="subxMinorFunction">_Primitive-add-reg-to-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L12991" class="LineNr">12991 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L12992" class="LineNr">12992 </span> <span class="subxComment"># add-to var1 var2/reg => 01/add-to var1 var2/r32</span> +<span id="L12982" class="LineNr">12982 </span> <a href='mu.subx.html#L12984'>_Primitive-add-to-eax</a>/imm32/next +<span id="L12983" class="LineNr">12983 </span><span class="subxH1Comment"># - add</span> +<span id="L12984" class="LineNr">12984 </span><span class="subxMinorFunction">_Primitive-add-to-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L12985" class="LineNr">12985 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L12986" class="LineNr">12986 </span> <span class="subxComment"># var/eax <- add lit => 05/add-to-eax lit/imm32</span> +<span id="L12987" class="LineNr">12987 </span> 0x11/imm32/alloc-id:fake +<span id="L12988" class="LineNr">12988 </span> <a href='mu.subx.html#L14699'>_string-add</a>/imm32/name +<span id="L12989" class="LineNr">12989 </span> 0x11/imm32/alloc-id:fake +<span id="L12990" class="LineNr">12990 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L12991" class="LineNr">12991 </span> 0x11/imm32/alloc-id:fake +<span id="L12992" class="LineNr">12992 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L12993" class="LineNr">12993 </span> 0x11/imm32/alloc-id:fake -<span id="L12994" class="LineNr">12994 </span> <a href='mu.subx.html#L14679'>_string-add-to</a>/imm32/name -<span id="L12995" class="LineNr">12995 </span> 0x11/imm32/alloc-id:fake -<span id="L12996" class="LineNr">12996 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L12997" class="LineNr">12997 </span> 0/imm32/no-outputs -<span id="L12998" class="LineNr">12998 </span> 0/imm32/no-outputs -<span id="L12999" class="LineNr">12999 </span> 0x11/imm32/alloc-id:fake -<span id="L13000" class="LineNr">13000 </span> <a href='mu.subx.html#L14876'>_string_01_add_to</a>/imm32/subx-name -<span id="L13001" class="LineNr">13001 </span> 1/imm32/rm32-is-first-inout -<span id="L13002" class="LineNr">13002 </span> 2/imm32/r32-is-second-inout -<span id="L13003" class="LineNr">13003 </span> 0/imm32/no-imm32 -<span id="L13004" class="LineNr">13004 </span> 0/imm32/no-disp32 -<span id="L13005" class="LineNr">13005 </span> 0/imm32/output-is-write-only -<span id="L13006" class="LineNr">13006 </span> 0x11/imm32/alloc-id:fake -<span id="L13007" class="LineNr">13007 </span> <a href='mu.subx.html#L13008'>_Primitive-add-mem-to-reg</a>/imm32/next -<span id="L13008" class="LineNr">13008 </span><span class="subxMinorFunction">_Primitive-add-mem-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13009" class="LineNr">13009 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13010" class="LineNr">13010 </span> <span class="subxComment"># var1/reg <- add var2 => 03/add var2/rm32 var1/r32</span> +<span id="L12994" class="LineNr">12994 </span> <a href='mu.subx.html#L14916'>_string_05_add_to_eax</a>/imm32/subx-name +<span id="L12995" class="LineNr">12995 </span> 0/imm32/no-rm32 +<span id="L12996" class="LineNr">12996 </span> 0/imm32/no-r32 +<span id="L12997" class="LineNr">12997 </span> 1/imm32/imm32-is-first-inout +<span id="L12998" class="LineNr">12998 </span> 0/imm32/no-disp32 +<span id="L12999" class="LineNr">12999 </span> 0/imm32/output-is-write-only +<span id="L13000" class="LineNr">13000 </span> 0x11/imm32/alloc-id:fake +<span id="L13001" class="LineNr">13001 </span> <a href='mu.subx.html#L13002'>_Primitive-add-reg-to-reg</a>/imm32/next +<span id="L13002" class="LineNr">13002 </span><span class="subxMinorFunction">_Primitive-add-reg-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13003" class="LineNr">13003 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13004" class="LineNr">13004 </span> <span class="subxComment"># var1/reg <- add var2/reg => 01/add-to var1/rm32 var2/r32</span> +<span id="L13005" class="LineNr">13005 </span> 0x11/imm32/alloc-id:fake +<span id="L13006" class="LineNr">13006 </span> <a href='mu.subx.html#L14699'>_string-add</a>/imm32/name +<span id="L13007" class="LineNr">13007 </span> 0x11/imm32/alloc-id:fake +<span id="L13008" class="LineNr">13008 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13009" class="LineNr">13009 </span> 0x11/imm32/alloc-id:fake +<span id="L13010" class="LineNr">13010 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13011" class="LineNr">13011 </span> 0x11/imm32/alloc-id:fake -<span id="L13012" class="LineNr">13012 </span> <a href='mu.subx.html#L14669'>_string-add</a>/imm32/name -<span id="L13013" class="LineNr">13013 </span> 0x11/imm32/alloc-id:fake -<span id="L13014" class="LineNr">13014 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13015" class="LineNr">13015 </span> 0x11/imm32/alloc-id:fake -<span id="L13016" class="LineNr">13016 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13017" class="LineNr">13017 </span> 0x11/imm32/alloc-id:fake -<span id="L13018" class="LineNr">13018 </span> <a href='mu.subx.html#L14881'>_string_03_add</a>/imm32/subx-name -<span id="L13019" class="LineNr">13019 </span> 1/imm32/rm32-is-first-inout -<span id="L13020" class="LineNr">13020 </span> 3/imm32/r32-is-first-output -<span id="L13021" class="LineNr">13021 </span> 0/imm32/no-imm32 -<span id="L13022" class="LineNr">13022 </span> 0/imm32/no-disp32 -<span id="L13023" class="LineNr">13023 </span> 0/imm32/output-is-write-only -<span id="L13024" class="LineNr">13024 </span> 0x11/imm32/alloc-id:fake -<span id="L13025" class="LineNr">13025 </span> <a href='mu.subx.html#L13026'>_Primitive-add-lit-to-reg</a>/imm32/next -<span id="L13026" class="LineNr">13026 </span><span class="subxMinorFunction">_Primitive-add-lit-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13027" class="LineNr">13027 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13028" class="LineNr">13028 </span> <span class="subxComment"># var1/reg <- add lit => 81 0/subop/add var1/rm32 lit/imm32</span> +<span id="L13012" class="LineNr">13012 </span> <a href='mu.subx.html#L14906'>_string_01_add_to</a>/imm32/subx-name +<span id="L13013" class="LineNr">13013 </span> 3/imm32/rm32-is-first-output +<span id="L13014" class="LineNr">13014 </span> 1/imm32/r32-is-first-inout +<span id="L13015" class="LineNr">13015 </span> 0/imm32/no-imm32 +<span id="L13016" class="LineNr">13016 </span> 0/imm32/no-disp32 +<span id="L13017" class="LineNr">13017 </span> 0/imm32/output-is-write-only +<span id="L13018" class="LineNr">13018 </span> 0x11/imm32/alloc-id:fake +<span id="L13019" class="LineNr">13019 </span> <a href='mu.subx.html#L13020'>_Primitive-add-reg-to-mem</a>/imm32/next +<span id="L13020" class="LineNr">13020 </span><span class="subxMinorFunction">_Primitive-add-reg-to-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13021" class="LineNr">13021 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13022" class="LineNr">13022 </span> <span class="subxComment"># add-to var1 var2/reg => 01/add-to var1 var2/r32</span> +<span id="L13023" class="LineNr">13023 </span> 0x11/imm32/alloc-id:fake +<span id="L13024" class="LineNr">13024 </span> <a href='mu.subx.html#L14709'>_string-add-to</a>/imm32/name +<span id="L13025" class="LineNr">13025 </span> 0x11/imm32/alloc-id:fake +<span id="L13026" class="LineNr">13026 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13027" class="LineNr">13027 </span> 0/imm32/no-outputs +<span id="L13028" class="LineNr">13028 </span> 0/imm32/no-outputs <span id="L13029" class="LineNr">13029 </span> 0x11/imm32/alloc-id:fake -<span id="L13030" class="LineNr">13030 </span> <a href='mu.subx.html#L14669'>_string-add</a>/imm32/name -<span id="L13031" class="LineNr">13031 </span> 0x11/imm32/alloc-id:fake -<span id="L13032" class="LineNr">13032 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13033" class="LineNr">13033 </span> 0x11/imm32/alloc-id:fake -<span id="L13034" class="LineNr">13034 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13035" class="LineNr">13035 </span> 0x11/imm32/alloc-id:fake -<span id="L13036" class="LineNr">13036 </span> <a href='mu.subx.html#L15181'>_string_81_subop_add</a>/imm32/subx-name -<span id="L13037" class="LineNr">13037 </span> 3/imm32/rm32-is-first-output -<span id="L13038" class="LineNr">13038 </span> 0/imm32/no-r32 -<span id="L13039" class="LineNr">13039 </span> 1/imm32/imm32-is-first-inout -<span id="L13040" class="LineNr">13040 </span> 0/imm32/no-disp32 -<span id="L13041" class="LineNr">13041 </span> 0/imm32/output-is-write-only -<span id="L13042" class="LineNr">13042 </span> 0x11/imm32/alloc-id:fake -<span id="L13043" class="LineNr">13043 </span> <a href='mu.subx.html#L13044'>_Primitive-add-lit-to-mem</a>/imm32/next -<span id="L13044" class="LineNr">13044 </span><span class="subxMinorFunction">_Primitive-add-lit-to-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13045" class="LineNr">13045 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13046" class="LineNr">13046 </span> <span class="subxComment"># add-to var1, lit => 81 0/subop/add var1/rm32 lit/imm32</span> +<span id="L13030" class="LineNr">13030 </span> <a href='mu.subx.html#L14906'>_string_01_add_to</a>/imm32/subx-name +<span id="L13031" class="LineNr">13031 </span> 1/imm32/rm32-is-first-inout +<span id="L13032" class="LineNr">13032 </span> 2/imm32/r32-is-second-inout +<span id="L13033" class="LineNr">13033 </span> 0/imm32/no-imm32 +<span id="L13034" class="LineNr">13034 </span> 0/imm32/no-disp32 +<span id="L13035" class="LineNr">13035 </span> 0/imm32/output-is-write-only +<span id="L13036" class="LineNr">13036 </span> 0x11/imm32/alloc-id:fake +<span id="L13037" class="LineNr">13037 </span> <a href='mu.subx.html#L13038'>_Primitive-add-mem-to-reg</a>/imm32/next +<span id="L13038" class="LineNr">13038 </span><span class="subxMinorFunction">_Primitive-add-mem-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13039" class="LineNr">13039 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13040" class="LineNr">13040 </span> <span class="subxComment"># var1/reg <- add var2 => 03/add var2/rm32 var1/r32</span> +<span id="L13041" class="LineNr">13041 </span> 0x11/imm32/alloc-id:fake +<span id="L13042" class="LineNr">13042 </span> <a href='mu.subx.html#L14699'>_string-add</a>/imm32/name +<span id="L13043" class="LineNr">13043 </span> 0x11/imm32/alloc-id:fake +<span id="L13044" class="LineNr">13044 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13045" class="LineNr">13045 </span> 0x11/imm32/alloc-id:fake +<span id="L13046" class="LineNr">13046 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13047" class="LineNr">13047 </span> 0x11/imm32/alloc-id:fake -<span id="L13048" class="LineNr">13048 </span> <a href='mu.subx.html#L14679'>_string-add-to</a>/imm32/name -<span id="L13049" class="LineNr">13049 </span> 0x11/imm32/alloc-id:fake -<span id="L13050" class="LineNr">13050 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13051" class="LineNr">13051 </span> 0/imm32/no-outputs -<span id="L13052" class="LineNr">13052 </span> 0/imm32/no-outputs -<span id="L13053" class="LineNr">13053 </span> 0x11/imm32/alloc-id:fake -<span id="L13054" class="LineNr">13054 </span> <a href='mu.subx.html#L15181'>_string_81_subop_add</a>/imm32/subx-name -<span id="L13055" class="LineNr">13055 </span> 1/imm32/rm32-is-first-inout -<span id="L13056" class="LineNr">13056 </span> 0/imm32/no-r32 -<span id="L13057" class="LineNr">13057 </span> 2/imm32/imm32-is-second-inout -<span id="L13058" class="LineNr">13058 </span> 0/imm32/no-disp32 -<span id="L13059" class="LineNr">13059 </span> 0/imm32/output-is-write-only -<span id="L13060" class="LineNr">13060 </span> 0x11/imm32/alloc-id:fake -<span id="L13061" class="LineNr">13061 </span> <a href='mu.subx.html#L13063'>_Primitive-subtract-from-eax</a>/imm32/next -<span id="L13062" class="LineNr">13062 </span><span class="subxH1Comment"># - subtract</span> -<span id="L13063" class="LineNr">13063 </span><span class="subxMinorFunction">_Primitive-subtract-from-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13064" class="LineNr">13064 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13065" class="LineNr">13065 </span> <span class="subxComment"># var/eax <- subtract lit => 2d/subtract-from-eax lit/imm32</span> -<span id="L13066" class="LineNr">13066 </span> 0x11/imm32/alloc-id:fake -<span id="L13067" class="LineNr">13067 </span> <a href='mu.subx.html#L14854'>_string-subtract</a>/imm32/name -<span id="L13068" class="LineNr">13068 </span> 0x11/imm32/alloc-id:fake -<span id="L13069" class="LineNr">13069 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13070" class="LineNr">13070 </span> 0x11/imm32/alloc-id:fake -<span id="L13071" class="LineNr">13071 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L13048" class="LineNr">13048 </span> <a href='mu.subx.html#L14911'>_string_03_add</a>/imm32/subx-name +<span id="L13049" class="LineNr">13049 </span> 1/imm32/rm32-is-first-inout +<span id="L13050" class="LineNr">13050 </span> 3/imm32/r32-is-first-output +<span id="L13051" class="LineNr">13051 </span> 0/imm32/no-imm32 +<span id="L13052" class="LineNr">13052 </span> 0/imm32/no-disp32 +<span id="L13053" class="LineNr">13053 </span> 0/imm32/output-is-write-only +<span id="L13054" class="LineNr">13054 </span> 0x11/imm32/alloc-id:fake +<span id="L13055" class="LineNr">13055 </span> <a href='mu.subx.html#L13056'>_Primitive-add-lit-to-reg</a>/imm32/next +<span id="L13056" class="LineNr">13056 </span><span class="subxMinorFunction">_Primitive-add-lit-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13057" class="LineNr">13057 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13058" class="LineNr">13058 </span> <span class="subxComment"># var1/reg <- add lit => 81 0/subop/add var1/rm32 lit/imm32</span> +<span id="L13059" class="LineNr">13059 </span> 0x11/imm32/alloc-id:fake +<span id="L13060" class="LineNr">13060 </span> <a href='mu.subx.html#L14699'>_string-add</a>/imm32/name +<span id="L13061" class="LineNr">13061 </span> 0x11/imm32/alloc-id:fake +<span id="L13062" class="LineNr">13062 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13063" class="LineNr">13063 </span> 0x11/imm32/alloc-id:fake +<span id="L13064" class="LineNr">13064 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13065" class="LineNr">13065 </span> 0x11/imm32/alloc-id:fake +<span id="L13066" class="LineNr">13066 </span> <a href='mu.subx.html#L15211'>_string_81_subop_add</a>/imm32/subx-name +<span id="L13067" class="LineNr">13067 </span> 3/imm32/rm32-is-first-output +<span id="L13068" class="LineNr">13068 </span> 0/imm32/no-r32 +<span id="L13069" class="LineNr">13069 </span> 1/imm32/imm32-is-first-inout +<span id="L13070" class="LineNr">13070 </span> 0/imm32/no-disp32 +<span id="L13071" class="LineNr">13071 </span> 0/imm32/output-is-write-only <span id="L13072" class="LineNr">13072 </span> 0x11/imm32/alloc-id:fake -<span id="L13073" class="LineNr">13073 </span> <a href='mu.subx.html#L15086'>_string_2d_subtract_from_eax</a>/imm32/subx-name -<span id="L13074" class="LineNr">13074 </span> 0/imm32/no-rm32 -<span id="L13075" class="LineNr">13075 </span> 0/imm32/no-r32 -<span id="L13076" class="LineNr">13076 </span> 1/imm32/imm32-is-first-inout -<span id="L13077" class="LineNr">13077 </span> 0/imm32/no-disp32 -<span id="L13078" class="LineNr">13078 </span> 0/imm32/output-is-write-only +<span id="L13073" class="LineNr">13073 </span> <a href='mu.subx.html#L13074'>_Primitive-add-lit-to-mem</a>/imm32/next +<span id="L13074" class="LineNr">13074 </span><span class="subxMinorFunction">_Primitive-add-lit-to-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13075" class="LineNr">13075 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13076" class="LineNr">13076 </span> <span class="subxComment"># add-to var1, lit => 81 0/subop/add var1/rm32 lit/imm32</span> +<span id="L13077" class="LineNr">13077 </span> 0x11/imm32/alloc-id:fake +<span id="L13078" class="LineNr">13078 </span> <a href='mu.subx.html#L14709'>_string-add-to</a>/imm32/name <span id="L13079" class="LineNr">13079 </span> 0x11/imm32/alloc-id:fake -<span id="L13080" class="LineNr">13080 </span> <a href='mu.subx.html#L13081'>_Primitive-subtract-reg-from-reg</a>/imm32/next -<span id="L13081" class="LineNr">13081 </span><span class="subxMinorFunction">_Primitive-subtract-reg-from-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13082" class="LineNr">13082 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13083" class="LineNr">13083 </span> <span class="subxComment"># var1/reg <- subtract var2/reg => 29/subtract-from var1/rm32 var2/r32</span> -<span id="L13084" class="LineNr">13084 </span> 0x11/imm32/alloc-id:fake -<span id="L13085" class="LineNr">13085 </span> <a href='mu.subx.html#L14854'>_string-subtract</a>/imm32/name -<span id="L13086" class="LineNr">13086 </span> 0x11/imm32/alloc-id:fake -<span id="L13087" class="LineNr">13087 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13088" class="LineNr">13088 </span> 0x11/imm32/alloc-id:fake -<span id="L13089" class="LineNr">13089 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13080" class="LineNr">13080 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13081" class="LineNr">13081 </span> 0/imm32/no-outputs +<span id="L13082" class="LineNr">13082 </span> 0/imm32/no-outputs +<span id="L13083" class="LineNr">13083 </span> 0x11/imm32/alloc-id:fake +<span id="L13084" class="LineNr">13084 </span> <a href='mu.subx.html#L15211'>_string_81_subop_add</a>/imm32/subx-name +<span id="L13085" class="LineNr">13085 </span> 1/imm32/rm32-is-first-inout +<span id="L13086" class="LineNr">13086 </span> 0/imm32/no-r32 +<span id="L13087" class="LineNr">13087 </span> 2/imm32/imm32-is-second-inout +<span id="L13088" class="LineNr">13088 </span> 0/imm32/no-disp32 +<span id="L13089" class="LineNr">13089 </span> 0/imm32/output-is-write-only <span id="L13090" class="LineNr">13090 </span> 0x11/imm32/alloc-id:fake -<span id="L13091" class="LineNr">13091 </span> <a href='mu.subx.html#L15076'>_string_29_subtract_from</a>/imm32/subx-name -<span id="L13092" class="LineNr">13092 </span> 3/imm32/rm32-is-first-output -<span id="L13093" class="LineNr">13093 </span> 1/imm32/r32-is-first-inout -<span id="L13094" class="LineNr">13094 </span> 0/imm32/no-imm32 -<span id="L13095" class="LineNr">13095 </span> 0/imm32/no-disp32 -<span id="L13096" class="LineNr">13096 </span> 0/imm32/output-is-write-only -<span id="L13097" class="LineNr">13097 </span> 0x11/imm32/alloc-id:fake -<span id="L13098" class="LineNr">13098 </span> <a href='mu.subx.html#L13099'>_Primitive-subtract-reg-from-mem</a>/imm32/next -<span id="L13099" class="LineNr">13099 </span><span class="subxMinorFunction">_Primitive-subtract-reg-from-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13100" class="LineNr">13100 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13101" class="LineNr">13101 </span> <span class="subxComment"># subtract-from var1 var2/reg => 29/subtract-from var1 var2/r32</span> +<span id="L13091" class="LineNr">13091 </span> <a href='mu.subx.html#L13093'>_Primitive-subtract-from-eax</a>/imm32/next +<span id="L13092" class="LineNr">13092 </span><span class="subxH1Comment"># - subtract</span> +<span id="L13093" class="LineNr">13093 </span><span class="subxMinorFunction">_Primitive-subtract-from-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13094" class="LineNr">13094 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13095" class="LineNr">13095 </span> <span class="subxComment"># var/eax <- subtract lit => 2d/subtract-from-eax lit/imm32</span> +<span id="L13096" class="LineNr">13096 </span> 0x11/imm32/alloc-id:fake +<span id="L13097" class="LineNr">13097 </span> <a href='mu.subx.html#L14884'>_string-subtract</a>/imm32/name +<span id="L13098" class="LineNr">13098 </span> 0x11/imm32/alloc-id:fake +<span id="L13099" class="LineNr">13099 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13100" class="LineNr">13100 </span> 0x11/imm32/alloc-id:fake +<span id="L13101" class="LineNr">13101 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L13102" class="LineNr">13102 </span> 0x11/imm32/alloc-id:fake -<span id="L13103" class="LineNr">13103 </span> <a href='mu.subx.html#L14859'>_string-subtract-from</a>/imm32/name -<span id="L13104" class="LineNr">13104 </span> 0x11/imm32/alloc-id:fake -<span id="L13105" class="LineNr">13105 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13106" class="LineNr">13106 </span> 0/imm32/no-outputs -<span id="L13107" class="LineNr">13107 </span> 0/imm32/no-outputs -<span id="L13108" class="LineNr">13108 </span> 0x11/imm32/alloc-id:fake -<span id="L13109" class="LineNr">13109 </span> <a href='mu.subx.html#L15076'>_string_29_subtract_from</a>/imm32/subx-name -<span id="L13110" class="LineNr">13110 </span> 1/imm32/rm32-is-first-inout -<span id="L13111" class="LineNr">13111 </span> 2/imm32/r32-is-second-inout -<span id="L13112" class="LineNr">13112 </span> 0/imm32/no-imm32 -<span id="L13113" class="LineNr">13113 </span> 0/imm32/no-disp32 -<span id="L13114" class="LineNr">13114 </span> 0/imm32/output-is-write-only -<span id="L13115" class="LineNr">13115 </span> 0x11/imm32/alloc-id:fake -<span id="L13116" class="LineNr">13116 </span> <a href='mu.subx.html#L13117'>_Primitive-subtract-mem-from-reg</a>/imm32/next -<span id="L13117" class="LineNr">13117 </span><span class="subxMinorFunction">_Primitive-subtract-mem-from-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13118" class="LineNr">13118 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13119" class="LineNr">13119 </span> <span class="subxComment"># var1/reg <- subtract var2 => 2b/subtract var2/rm32 var1/r32</span> +<span id="L13103" class="LineNr">13103 </span> <a href='mu.subx.html#L15116'>_string_2d_subtract_from_eax</a>/imm32/subx-name +<span id="L13104" class="LineNr">13104 </span> 0/imm32/no-rm32 +<span id="L13105" class="LineNr">13105 </span> 0/imm32/no-r32 +<span id="L13106" class="LineNr">13106 </span> 1/imm32/imm32-is-first-inout +<span id="L13107" class="LineNr">13107 </span> 0/imm32/no-disp32 +<span id="L13108" class="LineNr">13108 </span> 0/imm32/output-is-write-only +<span id="L13109" class="LineNr">13109 </span> 0x11/imm32/alloc-id:fake +<span id="L13110" class="LineNr">13110 </span> <a href='mu.subx.html#L13111'>_Primitive-subtract-reg-from-reg</a>/imm32/next +<span id="L13111" class="LineNr">13111 </span><span class="subxMinorFunction">_Primitive-subtract-reg-from-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13112" class="LineNr">13112 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13113" class="LineNr">13113 </span> <span class="subxComment"># var1/reg <- subtract var2/reg => 29/subtract-from var1/rm32 var2/r32</span> +<span id="L13114" class="LineNr">13114 </span> 0x11/imm32/alloc-id:fake +<span id="L13115" class="LineNr">13115 </span> <a href='mu.subx.html#L14884'>_string-subtract</a>/imm32/name +<span id="L13116" class="LineNr">13116 </span> 0x11/imm32/alloc-id:fake +<span id="L13117" class="LineNr">13117 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13118" class="LineNr">13118 </span> 0x11/imm32/alloc-id:fake +<span id="L13119" class="LineNr">13119 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13120" class="LineNr">13120 </span> 0x11/imm32/alloc-id:fake -<span id="L13121" class="LineNr">13121 </span> <a href='mu.subx.html#L14854'>_string-subtract</a>/imm32/name -<span id="L13122" class="LineNr">13122 </span> 0x11/imm32/alloc-id:fake -<span id="L13123" class="LineNr">13123 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13124" class="LineNr">13124 </span> 0x11/imm32/alloc-id:fake -<span id="L13125" class="LineNr">13125 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13126" class="LineNr">13126 </span> 0x11/imm32/alloc-id:fake -<span id="L13127" class="LineNr">13127 </span> <a href='mu.subx.html#L15081'>_string_2b_subtract</a>/imm32/subx-name -<span id="L13128" class="LineNr">13128 </span> 1/imm32/rm32-is-first-inout -<span id="L13129" class="LineNr">13129 </span> 3/imm32/r32-is-first-output -<span id="L13130" class="LineNr">13130 </span> 0/imm32/no-imm32 -<span id="L13131" class="LineNr">13131 </span> 0/imm32/no-disp32 -<span id="L13132" class="LineNr">13132 </span> 0/imm32/output-is-write-only -<span id="L13133" class="LineNr">13133 </span> 0x11/imm32/alloc-id:fake -<span id="L13134" class="LineNr">13134 </span> <a href='mu.subx.html#L13135'>_Primitive-subtract-lit-from-reg</a>/imm32/next -<span id="L13135" class="LineNr">13135 </span><span class="subxMinorFunction">_Primitive-subtract-lit-from-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13136" class="LineNr">13136 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13137" class="LineNr">13137 </span> <span class="subxComment"># var1/reg <- subtract lit => 81 5/subop/subtract var1/rm32 lit/imm32</span> +<span id="L13121" class="LineNr">13121 </span> <a href='mu.subx.html#L15106'>_string_29_subtract_from</a>/imm32/subx-name +<span id="L13122" class="LineNr">13122 </span> 3/imm32/rm32-is-first-output +<span id="L13123" class="LineNr">13123 </span> 1/imm32/r32-is-first-inout +<span id="L13124" class="LineNr">13124 </span> 0/imm32/no-imm32 +<span id="L13125" class="LineNr">13125 </span> 0/imm32/no-disp32 +<span id="L13126" class="LineNr">13126 </span> 0/imm32/output-is-write-only +<span id="L13127" class="LineNr">13127 </span> 0x11/imm32/alloc-id:fake +<span id="L13128" class="LineNr">13128 </span> <a href='mu.subx.html#L13129'>_Primitive-subtract-reg-from-mem</a>/imm32/next +<span id="L13129" class="LineNr">13129 </span><span class="subxMinorFunction">_Primitive-subtract-reg-from-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13130" class="LineNr">13130 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13131" class="LineNr">13131 </span> <span class="subxComment"># subtract-from var1 var2/reg => 29/subtract-from var1 var2/r32</span> +<span id="L13132" class="LineNr">13132 </span> 0x11/imm32/alloc-id:fake +<span id="L13133" class="LineNr">13133 </span> <a href='mu.subx.html#L14889'>_string-subtract-from</a>/imm32/name +<span id="L13134" class="LineNr">13134 </span> 0x11/imm32/alloc-id:fake +<span id="L13135" class="LineNr">13135 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13136" class="LineNr">13136 </span> 0/imm32/no-outputs +<span id="L13137" class="LineNr">13137 </span> 0/imm32/no-outputs <span id="L13138" class="LineNr">13138 </span> 0x11/imm32/alloc-id:fake -<span id="L13139" class="LineNr">13139 </span> <a href='mu.subx.html#L14854'>_string-subtract</a>/imm32/name -<span id="L13140" class="LineNr">13140 </span> 0x11/imm32/alloc-id:fake -<span id="L13141" class="LineNr">13141 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13142" class="LineNr">13142 </span> 0x11/imm32/alloc-id:fake -<span id="L13143" class="LineNr">13143 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13144" class="LineNr">13144 </span> 0x11/imm32/alloc-id:fake -<span id="L13145" class="LineNr">13145 </span> <a href='mu.subx.html#L15196'>_string_81_subop_subtract</a>/imm32/subx-name -<span id="L13146" class="LineNr">13146 </span> 3/imm32/rm32-is-first-output -<span id="L13147" class="LineNr">13147 </span> 0/imm32/no-r32 -<span id="L13148" class="LineNr">13148 </span> 1/imm32/imm32-is-first-inout -<span id="L13149" class="LineNr">13149 </span> 0/imm32/no-disp32 -<span id="L13150" class="LineNr">13150 </span> 0/imm32/output-is-write-only -<span id="L13151" class="LineNr">13151 </span> 0x11/imm32/alloc-id:fake -<span id="L13152" class="LineNr">13152 </span> <a href='mu.subx.html#L13153'>_Primitive-subtract-lit-from-mem</a>/imm32/next -<span id="L13153" class="LineNr">13153 </span><span class="subxMinorFunction">_Primitive-subtract-lit-from-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13154" class="LineNr">13154 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13155" class="LineNr">13155 </span> <span class="subxComment"># subtract-from var1, lit => 81 5/subop/subtract var1/rm32 lit/imm32</span> +<span id="L13139" class="LineNr">13139 </span> <a href='mu.subx.html#L15106'>_string_29_subtract_from</a>/imm32/subx-name +<span id="L13140" class="LineNr">13140 </span> 1/imm32/rm32-is-first-inout +<span id="L13141" class="LineNr">13141 </span> 2/imm32/r32-is-second-inout +<span id="L13142" class="LineNr">13142 </span> 0/imm32/no-imm32 +<span id="L13143" class="LineNr">13143 </span> 0/imm32/no-disp32 +<span id="L13144" class="LineNr">13144 </span> 0/imm32/output-is-write-only +<span id="L13145" class="LineNr">13145 </span> 0x11/imm32/alloc-id:fake +<span id="L13146" class="LineNr">13146 </span> <a href='mu.subx.html#L13147'>_Primitive-subtract-mem-from-reg</a>/imm32/next +<span id="L13147" class="LineNr">13147 </span><span class="subxMinorFunction">_Primitive-subtract-mem-from-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13148" class="LineNr">13148 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13149" class="LineNr">13149 </span> <span class="subxComment"># var1/reg <- subtract var2 => 2b/subtract var2/rm32 var1/r32</span> +<span id="L13150" class="LineNr">13150 </span> 0x11/imm32/alloc-id:fake +<span id="L13151" class="LineNr">13151 </span> <a href='mu.subx.html#L14884'>_string-subtract</a>/imm32/name +<span id="L13152" class="LineNr">13152 </span> 0x11/imm32/alloc-id:fake +<span id="L13153" class="LineNr">13153 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13154" class="LineNr">13154 </span> 0x11/imm32/alloc-id:fake +<span id="L13155" class="LineNr">13155 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13156" class="LineNr">13156 </span> 0x11/imm32/alloc-id:fake -<span id="L13157" class="LineNr">13157 </span> <a href='mu.subx.html#L14859'>_string-subtract-from</a>/imm32/name -<span id="L13158" class="LineNr">13158 </span> 0x11/imm32/alloc-id:fake -<span id="L13159" class="LineNr">13159 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13160" class="LineNr">13160 </span> 0/imm32/no-outputs -<span id="L13161" class="LineNr">13161 </span> 0/imm32/no-outputs -<span id="L13162" class="LineNr">13162 </span> 0x11/imm32/alloc-id:fake -<span id="L13163" class="LineNr">13163 </span> <a href='mu.subx.html#L15196'>_string_81_subop_subtract</a>/imm32/subx-name -<span id="L13164" class="LineNr">13164 </span> 1/imm32/rm32-is-first-inout -<span id="L13165" class="LineNr">13165 </span> 0/imm32/no-r32 -<span id="L13166" class="LineNr">13166 </span> 2/imm32/imm32-is-first-inout -<span id="L13167" class="LineNr">13167 </span> 0/imm32/no-disp32 -<span id="L13168" class="LineNr">13168 </span> 0/imm32/output-is-write-only -<span id="L13169" class="LineNr">13169 </span> 0x11/imm32/alloc-id:fake -<span id="L13170" class="LineNr">13170 </span> <a href='mu.subx.html#L13172'>_Primitive-and-with-eax</a>/imm32/next -<span id="L13171" class="LineNr">13171 </span><span class="subxH1Comment"># - and</span> -<span id="L13172" class="LineNr">13172 </span><span class="subxMinorFunction">_Primitive-and-with-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13173" class="LineNr">13173 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13174" class="LineNr">13174 </span> <span class="subxComment"># var/eax <- and lit => 25/and-with-eax lit/imm32</span> -<span id="L13175" class="LineNr">13175 </span> 0x11/imm32/alloc-id:fake -<span id="L13176" class="LineNr">13176 </span> <a href='mu.subx.html#L14684'>_string-and</a>/imm32/name -<span id="L13177" class="LineNr">13177 </span> 0x11/imm32/alloc-id:fake -<span id="L13178" class="LineNr">13178 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13179" class="LineNr">13179 </span> 0x11/imm32/alloc-id:fake -<span id="L13180" class="LineNr">13180 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L13157" class="LineNr">13157 </span> <a href='mu.subx.html#L15111'>_string_2b_subtract</a>/imm32/subx-name +<span id="L13158" class="LineNr">13158 </span> 1/imm32/rm32-is-first-inout +<span id="L13159" class="LineNr">13159 </span> 3/imm32/r32-is-first-output +<span id="L13160" class="LineNr">13160 </span> 0/imm32/no-imm32 +<span id="L13161" class="LineNr">13161 </span> 0/imm32/no-disp32 +<span id="L13162" class="LineNr">13162 </span> 0/imm32/output-is-write-only +<span id="L13163" class="LineNr">13163 </span> 0x11/imm32/alloc-id:fake +<span id="L13164" class="LineNr">13164 </span> <a href='mu.subx.html#L13165'>_Primitive-subtract-lit-from-reg</a>/imm32/next +<span id="L13165" class="LineNr">13165 </span><span class="subxMinorFunction">_Primitive-subtract-lit-from-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13166" class="LineNr">13166 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13167" class="LineNr">13167 </span> <span class="subxComment"># var1/reg <- subtract lit => 81 5/subop/subtract var1/rm32 lit/imm32</span> +<span id="L13168" class="LineNr">13168 </span> 0x11/imm32/alloc-id:fake +<span id="L13169" class="LineNr">13169 </span> <a href='mu.subx.html#L14884'>_string-subtract</a>/imm32/name +<span id="L13170" class="LineNr">13170 </span> 0x11/imm32/alloc-id:fake +<span id="L13171" class="LineNr">13171 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13172" class="LineNr">13172 </span> 0x11/imm32/alloc-id:fake +<span id="L13173" class="LineNr">13173 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13174" class="LineNr">13174 </span> 0x11/imm32/alloc-id:fake +<span id="L13175" class="LineNr">13175 </span> <a href='mu.subx.html#L15226'>_string_81_subop_subtract</a>/imm32/subx-name +<span id="L13176" class="LineNr">13176 </span> 3/imm32/rm32-is-first-output +<span id="L13177" class="LineNr">13177 </span> 0/imm32/no-r32 +<span id="L13178" class="LineNr">13178 </span> 1/imm32/imm32-is-first-inout +<span id="L13179" class="LineNr">13179 </span> 0/imm32/no-disp32 +<span id="L13180" class="LineNr">13180 </span> 0/imm32/output-is-write-only <span id="L13181" class="LineNr">13181 </span> 0x11/imm32/alloc-id:fake -<span id="L13182" class="LineNr">13182 </span> <a href='mu.subx.html#L15071'>_string_25_and_with_eax</a>/imm32/subx-name -<span id="L13183" class="LineNr">13183 </span> 0/imm32/no-rm32 -<span id="L13184" class="LineNr">13184 </span> 0/imm32/no-r32 -<span id="L13185" class="LineNr">13185 </span> 1/imm32/imm32-is-first-inout -<span id="L13186" class="LineNr">13186 </span> 0/imm32/no-disp32 -<span id="L13187" class="LineNr">13187 </span> 0/imm32/output-is-write-only +<span id="L13182" class="LineNr">13182 </span> <a href='mu.subx.html#L13183'>_Primitive-subtract-lit-from-mem</a>/imm32/next +<span id="L13183" class="LineNr">13183 </span><span class="subxMinorFunction">_Primitive-subtract-lit-from-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13184" class="LineNr">13184 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13185" class="LineNr">13185 </span> <span class="subxComment"># subtract-from var1, lit => 81 5/subop/subtract var1/rm32 lit/imm32</span> +<span id="L13186" class="LineNr">13186 </span> 0x11/imm32/alloc-id:fake +<span id="L13187" class="LineNr">13187 </span> <a href='mu.subx.html#L14889'>_string-subtract-from</a>/imm32/name <span id="L13188" class="LineNr">13188 </span> 0x11/imm32/alloc-id:fake -<span id="L13189" class="LineNr">13189 </span> <a href='mu.subx.html#L13190'>_Primitive-and-reg-with-reg</a>/imm32/next -<span id="L13190" class="LineNr">13190 </span><span class="subxMinorFunction">_Primitive-and-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13191" class="LineNr">13191 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13192" class="LineNr">13192 </span> <span class="subxComment"># var1/reg <- and var2/reg => 21/and-with var1/rm32 var2/r32</span> -<span id="L13193" class="LineNr">13193 </span> 0x11/imm32/alloc-id:fake -<span id="L13194" class="LineNr">13194 </span> <a href='mu.subx.html#L14684'>_string-and</a>/imm32/name -<span id="L13195" class="LineNr">13195 </span> 0x11/imm32/alloc-id:fake -<span id="L13196" class="LineNr">13196 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13197" class="LineNr">13197 </span> 0x11/imm32/alloc-id:fake -<span id="L13198" class="LineNr">13198 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13189" class="LineNr">13189 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13190" class="LineNr">13190 </span> 0/imm32/no-outputs +<span id="L13191" class="LineNr">13191 </span> 0/imm32/no-outputs +<span id="L13192" class="LineNr">13192 </span> 0x11/imm32/alloc-id:fake +<span id="L13193" class="LineNr">13193 </span> <a href='mu.subx.html#L15226'>_string_81_subop_subtract</a>/imm32/subx-name +<span id="L13194" class="LineNr">13194 </span> 1/imm32/rm32-is-first-inout +<span id="L13195" class="LineNr">13195 </span> 0/imm32/no-r32 +<span id="L13196" class="LineNr">13196 </span> 2/imm32/imm32-is-first-inout +<span id="L13197" class="LineNr">13197 </span> 0/imm32/no-disp32 +<span id="L13198" class="LineNr">13198 </span> 0/imm32/output-is-write-only <span id="L13199" class="LineNr">13199 </span> 0x11/imm32/alloc-id:fake -<span id="L13200" class="LineNr">13200 </span> <a href='mu.subx.html#L15061'>_string_21_and_with</a>/imm32/subx-name -<span id="L13201" class="LineNr">13201 </span> 3/imm32/rm32-is-first-output -<span id="L13202" class="LineNr">13202 </span> 1/imm32/r32-is-first-inout -<span id="L13203" class="LineNr">13203 </span> 0/imm32/no-imm32 -<span id="L13204" class="LineNr">13204 </span> 0/imm32/no-disp32 -<span id="L13205" class="LineNr">13205 </span> 0/imm32/output-is-write-only -<span id="L13206" class="LineNr">13206 </span> 0x11/imm32/alloc-id:fake -<span id="L13207" class="LineNr">13207 </span> <a href='mu.subx.html#L13208'>_Primitive-and-reg-with-mem</a>/imm32/next -<span id="L13208" class="LineNr">13208 </span><span class="subxMinorFunction">_Primitive-and-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13209" class="LineNr">13209 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13210" class="LineNr">13210 </span> <span class="subxComment"># and-with var1 var2/reg => 21/and-with var1 var2/r32</span> +<span id="L13200" class="LineNr">13200 </span> <a href='mu.subx.html#L13202'>_Primitive-and-with-eax</a>/imm32/next +<span id="L13201" class="LineNr">13201 </span><span class="subxH1Comment"># - and</span> +<span id="L13202" class="LineNr">13202 </span><span class="subxMinorFunction">_Primitive-and-with-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13203" class="LineNr">13203 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13204" class="LineNr">13204 </span> <span class="subxComment"># var/eax <- and lit => 25/and-with-eax lit/imm32</span> +<span id="L13205" class="LineNr">13205 </span> 0x11/imm32/alloc-id:fake +<span id="L13206" class="LineNr">13206 </span> <a href='mu.subx.html#L14714'>_string-and</a>/imm32/name +<span id="L13207" class="LineNr">13207 </span> 0x11/imm32/alloc-id:fake +<span id="L13208" class="LineNr">13208 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13209" class="LineNr">13209 </span> 0x11/imm32/alloc-id:fake +<span id="L13210" class="LineNr">13210 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L13211" class="LineNr">13211 </span> 0x11/imm32/alloc-id:fake -<span id="L13212" class="LineNr">13212 </span> <a href='mu.subx.html#L14689'>_string-and-with</a>/imm32/name -<span id="L13213" class="LineNr">13213 </span> 0x11/imm32/alloc-id:fake -<span id="L13214" class="LineNr">13214 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13215" class="LineNr">13215 </span> 0/imm32/no-outputs -<span id="L13216" class="LineNr">13216 </span> 0/imm32/no-outputs -<span id="L13217" class="LineNr">13217 </span> 0x11/imm32/alloc-id:fake -<span id="L13218" class="LineNr">13218 </span> <a href='mu.subx.html#L15061'>_string_21_and_with</a>/imm32/subx-name -<span id="L13219" class="LineNr">13219 </span> 1/imm32/rm32-is-first-inout -<span id="L13220" class="LineNr">13220 </span> 2/imm32/r32-is-second-inout -<span id="L13221" class="LineNr">13221 </span> 0/imm32/no-imm32 -<span id="L13222" class="LineNr">13222 </span> 0/imm32/no-disp32 -<span id="L13223" class="LineNr">13223 </span> 0/imm32/output-is-write-only -<span id="L13224" class="LineNr">13224 </span> 0x11/imm32/alloc-id:fake -<span id="L13225" class="LineNr">13225 </span> <a href='mu.subx.html#L13226'>_Primitive-and-mem-with-reg</a>/imm32/next -<span id="L13226" class="LineNr">13226 </span><span class="subxMinorFunction">_Primitive-and-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13227" class="LineNr">13227 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13228" class="LineNr">13228 </span> <span class="subxComment"># var1/reg <- and var2 => 23/and var2/rm32 var1/r32</span> +<span id="L13212" class="LineNr">13212 </span> <a href='mu.subx.html#L15101'>_string_25_and_with_eax</a>/imm32/subx-name +<span id="L13213" class="LineNr">13213 </span> 0/imm32/no-rm32 +<span id="L13214" class="LineNr">13214 </span> 0/imm32/no-r32 +<span id="L13215" class="LineNr">13215 </span> 1/imm32/imm32-is-first-inout +<span id="L13216" class="LineNr">13216 </span> 0/imm32/no-disp32 +<span id="L13217" class="LineNr">13217 </span> 0/imm32/output-is-write-only +<span id="L13218" class="LineNr">13218 </span> 0x11/imm32/alloc-id:fake +<span id="L13219" class="LineNr">13219 </span> <a href='mu.subx.html#L13220'>_Primitive-and-reg-with-reg</a>/imm32/next +<span id="L13220" class="LineNr">13220 </span><span class="subxMinorFunction">_Primitive-and-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13221" class="LineNr">13221 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13222" class="LineNr">13222 </span> <span class="subxComment"># var1/reg <- and var2/reg => 21/and-with var1/rm32 var2/r32</span> +<span id="L13223" class="LineNr">13223 </span> 0x11/imm32/alloc-id:fake +<span id="L13224" class="LineNr">13224 </span> <a href='mu.subx.html#L14714'>_string-and</a>/imm32/name +<span id="L13225" class="LineNr">13225 </span> 0x11/imm32/alloc-id:fake +<span id="L13226" class="LineNr">13226 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13227" class="LineNr">13227 </span> 0x11/imm32/alloc-id:fake +<span id="L13228" class="LineNr">13228 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13229" class="LineNr">13229 </span> 0x11/imm32/alloc-id:fake -<span id="L13230" class="LineNr">13230 </span> <a href='mu.subx.html#L14684'>_string-and</a>/imm32/name -<span id="L13231" class="LineNr">13231 </span> 0x11/imm32/alloc-id:fake -<span id="L13232" class="LineNr">13232 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13233" class="LineNr">13233 </span> 0x11/imm32/alloc-id:fake -<span id="L13234" class="LineNr">13234 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13235" class="LineNr">13235 </span> 0x11/imm32/alloc-id:fake -<span id="L13236" class="LineNr">13236 </span> <a href='mu.subx.html#L15066'>_string_23_and</a>/imm32/subx-name -<span id="L13237" class="LineNr">13237 </span> 1/imm32/rm32-is-first-inout -<span id="L13238" class="LineNr">13238 </span> 3/imm32/r32-is-first-output -<span id="L13239" class="LineNr">13239 </span> 0/imm32/no-imm32 -<span id="L13240" class="LineNr">13240 </span> 0/imm32/no-disp32 -<span id="L13241" class="LineNr">13241 </span> 0/imm32/output-is-write-only -<span id="L13242" class="LineNr">13242 </span> 0x11/imm32/alloc-id:fake -<span id="L13243" class="LineNr">13243 </span> <a href='mu.subx.html#L13244'>_Primitive-and-lit-with-reg</a>/imm32/next -<span id="L13244" class="LineNr">13244 </span><span class="subxMinorFunction">_Primitive-and-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13245" class="LineNr">13245 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13246" class="LineNr">13246 </span> <span class="subxComment"># var1/reg <- and lit => 81 4/subop/and var1/rm32 lit/imm32</span> +<span id="L13230" class="LineNr">13230 </span> <a href='mu.subx.html#L15091'>_string_21_and_with</a>/imm32/subx-name +<span id="L13231" class="LineNr">13231 </span> 3/imm32/rm32-is-first-output +<span id="L13232" class="LineNr">13232 </span> 1/imm32/r32-is-first-inout +<span id="L13233" class="LineNr">13233 </span> 0/imm32/no-imm32 +<span id="L13234" class="LineNr">13234 </span> 0/imm32/no-disp32 +<span id="L13235" class="LineNr">13235 </span> 0/imm32/output-is-write-only +<span id="L13236" class="LineNr">13236 </span> 0x11/imm32/alloc-id:fake +<span id="L13237" class="LineNr">13237 </span> <a href='mu.subx.html#L13238'>_Primitive-and-reg-with-mem</a>/imm32/next +<span id="L13238" class="LineNr">13238 </span><span class="subxMinorFunction">_Primitive-and-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13239" class="LineNr">13239 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13240" class="LineNr">13240 </span> <span class="subxComment"># and-with var1 var2/reg => 21/and-with var1 var2/r32</span> +<span id="L13241" class="LineNr">13241 </span> 0x11/imm32/alloc-id:fake +<span id="L13242" class="LineNr">13242 </span> <a href='mu.subx.html#L14719'>_string-and-with</a>/imm32/name +<span id="L13243" class="LineNr">13243 </span> 0x11/imm32/alloc-id:fake +<span id="L13244" class="LineNr">13244 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13245" class="LineNr">13245 </span> 0/imm32/no-outputs +<span id="L13246" class="LineNr">13246 </span> 0/imm32/no-outputs <span id="L13247" class="LineNr">13247 </span> 0x11/imm32/alloc-id:fake -<span id="L13248" class="LineNr">13248 </span> <a href='mu.subx.html#L14684'>_string-and</a>/imm32/name -<span id="L13249" class="LineNr">13249 </span> 0x11/imm32/alloc-id:fake -<span id="L13250" class="LineNr">13250 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13251" class="LineNr">13251 </span> 0x11/imm32/alloc-id:fake -<span id="L13252" class="LineNr">13252 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13253" class="LineNr">13253 </span> 0x11/imm32/alloc-id:fake -<span id="L13254" class="LineNr">13254 </span> <a href='mu.subx.html#L15191'>_string_81_subop_and</a>/imm32/subx-name -<span id="L13255" class="LineNr">13255 </span> 3/imm32/rm32-is-first-output -<span id="L13256" class="LineNr">13256 </span> 0/imm32/no-r32 -<span id="L13257" class="LineNr">13257 </span> 1/imm32/imm32-is-first-inout -<span id="L13258" class="LineNr">13258 </span> 0/imm32/no-disp32 -<span id="L13259" class="LineNr">13259 </span> 0/imm32/output-is-write-only -<span id="L13260" class="LineNr">13260 </span> 0x11/imm32/alloc-id:fake -<span id="L13261" class="LineNr">13261 </span> <a href='mu.subx.html#L13262'>_Primitive-and-lit-with-mem</a>/imm32/next -<span id="L13262" class="LineNr">13262 </span><span class="subxMinorFunction">_Primitive-and-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13263" class="LineNr">13263 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13264" class="LineNr">13264 </span> <span class="subxComment"># and-with var1, lit => 81 4/subop/and var1/rm32 lit/imm32</span> +<span id="L13248" class="LineNr">13248 </span> <a href='mu.subx.html#L15091'>_string_21_and_with</a>/imm32/subx-name +<span id="L13249" class="LineNr">13249 </span> 1/imm32/rm32-is-first-inout +<span id="L13250" class="LineNr">13250 </span> 2/imm32/r32-is-second-inout +<span id="L13251" class="LineNr">13251 </span> 0/imm32/no-imm32 +<span id="L13252" class="LineNr">13252 </span> 0/imm32/no-disp32 +<span id="L13253" class="LineNr">13253 </span> 0/imm32/output-is-write-only +<span id="L13254" class="LineNr">13254 </span> 0x11/imm32/alloc-id:fake +<span id="L13255" class="LineNr">13255 </span> <a href='mu.subx.html#L13256'>_Primitive-and-mem-with-reg</a>/imm32/next +<span id="L13256" class="LineNr">13256 </span><span class="subxMinorFunction">_Primitive-and-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13257" class="LineNr">13257 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13258" class="LineNr">13258 </span> <span class="subxComment"># var1/reg <- and var2 => 23/and var2/rm32 var1/r32</span> +<span id="L13259" class="LineNr">13259 </span> 0x11/imm32/alloc-id:fake +<span id="L13260" class="LineNr">13260 </span> <a href='mu.subx.html#L14714'>_string-and</a>/imm32/name +<span id="L13261" class="LineNr">13261 </span> 0x11/imm32/alloc-id:fake +<span id="L13262" class="LineNr">13262 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13263" class="LineNr">13263 </span> 0x11/imm32/alloc-id:fake +<span id="L13264" class="LineNr">13264 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13265" class="LineNr">13265 </span> 0x11/imm32/alloc-id:fake -<span id="L13266" class="LineNr">13266 </span> <a href='mu.subx.html#L14689'>_string-and-with</a>/imm32/name -<span id="L13267" class="LineNr">13267 </span> 0x11/imm32/alloc-id:fake -<span id="L13268" class="LineNr">13268 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13269" class="LineNr">13269 </span> 0/imm32/no-outputs -<span id="L13270" class="LineNr">13270 </span> 0/imm32/no-outputs -<span id="L13271" class="LineNr">13271 </span> 0x11/imm32/alloc-id:fake -<span id="L13272" class="LineNr">13272 </span> <a href='mu.subx.html#L15191'>_string_81_subop_and</a>/imm32/subx-name -<span id="L13273" class="LineNr">13273 </span> 1/imm32/rm32-is-first-inout -<span id="L13274" class="LineNr">13274 </span> 0/imm32/no-r32 -<span id="L13275" class="LineNr">13275 </span> 2/imm32/imm32-is-first-inout -<span id="L13276" class="LineNr">13276 </span> 0/imm32/no-disp32 -<span id="L13277" class="LineNr">13277 </span> 0/imm32/output-is-write-only -<span id="L13278" class="LineNr">13278 </span> 0x11/imm32/alloc-id:fake -<span id="L13279" class="LineNr">13279 </span> <a href='mu.subx.html#L13281'>_Primitive-or-with-eax</a>/imm32/next -<span id="L13280" class="LineNr">13280 </span><span class="subxH1Comment"># - or</span> -<span id="L13281" class="LineNr">13281 </span><span class="subxMinorFunction">_Primitive-or-with-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13282" class="LineNr">13282 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13283" class="LineNr">13283 </span> <span class="subxComment"># var/eax <- or lit => 0d/or-with-eax lit/imm32</span> -<span id="L13284" class="LineNr">13284 </span> 0x11/imm32/alloc-id:fake -<span id="L13285" class="LineNr">13285 </span> <a href='mu.subx.html#L14844'>_string-or</a>/imm32/name -<span id="L13286" class="LineNr">13286 </span> 0x11/imm32/alloc-id:fake -<span id="L13287" class="LineNr">13287 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13288" class="LineNr">13288 </span> 0x11/imm32/alloc-id:fake -<span id="L13289" class="LineNr">13289 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L13266" class="LineNr">13266 </span> <a href='mu.subx.html#L15096'>_string_23_and</a>/imm32/subx-name +<span id="L13267" class="LineNr">13267 </span> 1/imm32/rm32-is-first-inout +<span id="L13268" class="LineNr">13268 </span> 3/imm32/r32-is-first-output +<span id="L13269" class="LineNr">13269 </span> 0/imm32/no-imm32 +<span id="L13270" class="LineNr">13270 </span> 0/imm32/no-disp32 +<span id="L13271" class="LineNr">13271 </span> 0/imm32/output-is-write-only +<span id="L13272" class="LineNr">13272 </span> 0x11/imm32/alloc-id:fake +<span id="L13273" class="LineNr">13273 </span> <a href='mu.subx.html#L13274'>_Primitive-and-lit-with-reg</a>/imm32/next +<span id="L13274" class="LineNr">13274 </span><span class="subxMinorFunction">_Primitive-and-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13275" class="LineNr">13275 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13276" class="LineNr">13276 </span> <span class="subxComment"># var1/reg <- and lit => 81 4/subop/and var1/rm32 lit/imm32</span> +<span id="L13277" class="LineNr">13277 </span> 0x11/imm32/alloc-id:fake +<span id="L13278" class="LineNr">13278 </span> <a href='mu.subx.html#L14714'>_string-and</a>/imm32/name +<span id="L13279" class="LineNr">13279 </span> 0x11/imm32/alloc-id:fake +<span id="L13280" class="LineNr">13280 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13281" class="LineNr">13281 </span> 0x11/imm32/alloc-id:fake +<span id="L13282" class="LineNr">13282 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13283" class="LineNr">13283 </span> 0x11/imm32/alloc-id:fake +<span id="L13284" class="LineNr">13284 </span> <a href='mu.subx.html#L15221'>_string_81_subop_and</a>/imm32/subx-name +<span id="L13285" class="LineNr">13285 </span> 3/imm32/rm32-is-first-output +<span id="L13286" class="LineNr">13286 </span> 0/imm32/no-r32 +<span id="L13287" class="LineNr">13287 </span> 1/imm32/imm32-is-first-inout +<span id="L13288" class="LineNr">13288 </span> 0/imm32/no-disp32 +<span id="L13289" class="LineNr">13289 </span> 0/imm32/output-is-write-only <span id="L13290" class="LineNr">13290 </span> 0x11/imm32/alloc-id:fake -<span id="L13291" class="LineNr">13291 </span> <a href='mu.subx.html#L14901'>_string_0d_or_with_eax</a>/imm32/subx-name -<span id="L13292" class="LineNr">13292 </span> 0/imm32/no-rm32 -<span id="L13293" class="LineNr">13293 </span> 0/imm32/no-r32 -<span id="L13294" class="LineNr">13294 </span> 1/imm32/imm32-is-first-inout -<span id="L13295" class="LineNr">13295 </span> 0/imm32/no-disp32 -<span id="L13296" class="LineNr">13296 </span> 0/imm32/output-is-write-only +<span id="L13291" class="LineNr">13291 </span> <a href='mu.subx.html#L13292'>_Primitive-and-lit-with-mem</a>/imm32/next +<span id="L13292" class="LineNr">13292 </span><span class="subxMinorFunction">_Primitive-and-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13293" class="LineNr">13293 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13294" class="LineNr">13294 </span> <span class="subxComment"># and-with var1, lit => 81 4/subop/and var1/rm32 lit/imm32</span> +<span id="L13295" class="LineNr">13295 </span> 0x11/imm32/alloc-id:fake +<span id="L13296" class="LineNr">13296 </span> <a href='mu.subx.html#L14719'>_string-and-with</a>/imm32/name <span id="L13297" class="LineNr">13297 </span> 0x11/imm32/alloc-id:fake -<span id="L13298" class="LineNr">13298 </span> <a href='mu.subx.html#L13299'>_Primitive-or-reg-with-reg</a>/imm32/next -<span id="L13299" class="LineNr">13299 </span><span class="subxMinorFunction">_Primitive-or-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13300" class="LineNr">13300 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13301" class="LineNr">13301 </span> <span class="subxComment"># var1/reg <- or var2/reg => 09/or-with var1/rm32 var2/r32</span> -<span id="L13302" class="LineNr">13302 </span> 0x11/imm32/alloc-id:fake -<span id="L13303" class="LineNr">13303 </span> <a href='mu.subx.html#L14844'>_string-or</a>/imm32/name -<span id="L13304" class="LineNr">13304 </span> 0x11/imm32/alloc-id:fake -<span id="L13305" class="LineNr">13305 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13306" class="LineNr">13306 </span> 0x11/imm32/alloc-id:fake -<span id="L13307" class="LineNr">13307 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13298" class="LineNr">13298 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13299" class="LineNr">13299 </span> 0/imm32/no-outputs +<span id="L13300" class="LineNr">13300 </span> 0/imm32/no-outputs +<span id="L13301" class="LineNr">13301 </span> 0x11/imm32/alloc-id:fake +<span id="L13302" class="LineNr">13302 </span> <a href='mu.subx.html#L15221'>_string_81_subop_and</a>/imm32/subx-name +<span id="L13303" class="LineNr">13303 </span> 1/imm32/rm32-is-first-inout +<span id="L13304" class="LineNr">13304 </span> 0/imm32/no-r32 +<span id="L13305" class="LineNr">13305 </span> 2/imm32/imm32-is-first-inout +<span id="L13306" class="LineNr">13306 </span> 0/imm32/no-disp32 +<span id="L13307" class="LineNr">13307 </span> 0/imm32/output-is-write-only <span id="L13308" class="LineNr">13308 </span> 0x11/imm32/alloc-id:fake -<span id="L13309" class="LineNr">13309 </span> <a href='mu.subx.html#L14891'>_string_09_or_with</a>/imm32/subx-name -<span id="L13310" class="LineNr">13310 </span> 3/imm32/rm32-is-first-output -<span id="L13311" class="LineNr">13311 </span> 1/imm32/r32-is-first-inout -<span id="L13312" class="LineNr">13312 </span> 0/imm32/no-imm32 -<span id="L13313" class="LineNr">13313 </span> 0/imm32/no-disp32 -<span id="L13314" class="LineNr">13314 </span> 0/imm32/output-is-write-only -<span id="L13315" class="LineNr">13315 </span> 0x11/imm32/alloc-id:fake -<span id="L13316" class="LineNr">13316 </span> <a href='mu.subx.html#L13317'>_Primitive-or-reg-with-mem</a>/imm32/next -<span id="L13317" class="LineNr">13317 </span><span class="subxMinorFunction">_Primitive-or-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13318" class="LineNr">13318 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13319" class="LineNr">13319 </span> <span class="subxComment"># or-with var1 var2/reg => 09/or-with var1 var2/r32</span> +<span id="L13309" class="LineNr">13309 </span> <a href='mu.subx.html#L13311'>_Primitive-or-with-eax</a>/imm32/next +<span id="L13310" class="LineNr">13310 </span><span class="subxH1Comment"># - or</span> +<span id="L13311" class="LineNr">13311 </span><span class="subxMinorFunction">_Primitive-or-with-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13312" class="LineNr">13312 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13313" class="LineNr">13313 </span> <span class="subxComment"># var/eax <- or lit => 0d/or-with-eax lit/imm32</span> +<span id="L13314" class="LineNr">13314 </span> 0x11/imm32/alloc-id:fake +<span id="L13315" class="LineNr">13315 </span> <a href='mu.subx.html#L14874'>_string-or</a>/imm32/name +<span id="L13316" class="LineNr">13316 </span> 0x11/imm32/alloc-id:fake +<span id="L13317" class="LineNr">13317 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13318" class="LineNr">13318 </span> 0x11/imm32/alloc-id:fake +<span id="L13319" class="LineNr">13319 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L13320" class="LineNr">13320 </span> 0x11/imm32/alloc-id:fake -<span id="L13321" class="LineNr">13321 </span> <a href='mu.subx.html#L14849'>_string-or-with</a>/imm32/name -<span id="L13322" class="LineNr">13322 </span> 0x11/imm32/alloc-id:fake -<span id="L13323" class="LineNr">13323 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13324" class="LineNr">13324 </span> 0/imm32/no-outputs -<span id="L13325" class="LineNr">13325 </span> 0/imm32/no-outputs -<span id="L13326" class="LineNr">13326 </span> 0x11/imm32/alloc-id:fake -<span id="L13327" class="LineNr">13327 </span> <a href='mu.subx.html#L14891'>_string_09_or_with</a>/imm32/subx-name -<span id="L13328" class="LineNr">13328 </span> 1/imm32/rm32-is-first-inout -<span id="L13329" class="LineNr">13329 </span> 2/imm32/r32-is-second-inout -<span id="L13330" class="LineNr">13330 </span> 0/imm32/no-imm32 -<span id="L13331" class="LineNr">13331 </span> 0/imm32/no-disp32 -<span id="L13332" class="LineNr">13332 </span> 0/imm32/output-is-write-only -<span id="L13333" class="LineNr">13333 </span> 0x11/imm32/alloc-id:fake -<span id="L13334" class="LineNr">13334 </span> <a href='mu.subx.html#L13335'>_Primitive-or-mem-with-reg</a>/imm32/next -<span id="L13335" class="LineNr">13335 </span><span class="subxMinorFunction">_Primitive-or-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13336" class="LineNr">13336 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13337" class="LineNr">13337 </span> <span class="subxComment"># var1/reg <- or var2 => 0b/or var2/rm32 var1/r32</span> +<span id="L13321" class="LineNr">13321 </span> <a href='mu.subx.html#L14931'>_string_0d_or_with_eax</a>/imm32/subx-name +<span id="L13322" class="LineNr">13322 </span> 0/imm32/no-rm32 +<span id="L13323" class="LineNr">13323 </span> 0/imm32/no-r32 +<span id="L13324" class="LineNr">13324 </span> 1/imm32/imm32-is-first-inout +<span id="L13325" class="LineNr">13325 </span> 0/imm32/no-disp32 +<span id="L13326" class="LineNr">13326 </span> 0/imm32/output-is-write-only +<span id="L13327" class="LineNr">13327 </span> 0x11/imm32/alloc-id:fake +<span id="L13328" class="LineNr">13328 </span> <a href='mu.subx.html#L13329'>_Primitive-or-reg-with-reg</a>/imm32/next +<span id="L13329" class="LineNr">13329 </span><span class="subxMinorFunction">_Primitive-or-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13330" class="LineNr">13330 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13331" class="LineNr">13331 </span> <span class="subxComment"># var1/reg <- or var2/reg => 09/or-with var1/rm32 var2/r32</span> +<span id="L13332" class="LineNr">13332 </span> 0x11/imm32/alloc-id:fake +<span id="L13333" class="LineNr">13333 </span> <a href='mu.subx.html#L14874'>_string-or</a>/imm32/name +<span id="L13334" class="LineNr">13334 </span> 0x11/imm32/alloc-id:fake +<span id="L13335" class="LineNr">13335 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13336" class="LineNr">13336 </span> 0x11/imm32/alloc-id:fake +<span id="L13337" class="LineNr">13337 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13338" class="LineNr">13338 </span> 0x11/imm32/alloc-id:fake -<span id="L13339" class="LineNr">13339 </span> <a href='mu.subx.html#L14844'>_string-or</a>/imm32/name -<span id="L13340" class="LineNr">13340 </span> 0x11/imm32/alloc-id:fake -<span id="L13341" class="LineNr">13341 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13342" class="LineNr">13342 </span> 0x11/imm32/alloc-id:fake -<span id="L13343" class="LineNr">13343 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13344" class="LineNr">13344 </span> 0x11/imm32/alloc-id:fake -<span id="L13345" class="LineNr">13345 </span> <a href='mu.subx.html#L14896'>_string_0b_or</a>/imm32/subx-name -<span id="L13346" class="LineNr">13346 </span> 1/imm32/rm32-is-first-inout -<span id="L13347" class="LineNr">13347 </span> 3/imm32/r32-is-first-output -<span id="L13348" class="LineNr">13348 </span> 0/imm32/no-imm32 -<span id="L13349" class="LineNr">13349 </span> 0/imm32/no-disp32 -<span id="L13350" class="LineNr">13350 </span> 0/imm32/output-is-write-only -<span id="L13351" class="LineNr">13351 </span> 0x11/imm32/alloc-id:fake -<span id="L13352" class="LineNr">13352 </span> <a href='mu.subx.html#L13353'>_Primitive-or-lit-with-reg</a>/imm32/next -<span id="L13353" class="LineNr">13353 </span><span class="subxMinorFunction">_Primitive-or-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13354" class="LineNr">13354 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13355" class="LineNr">13355 </span> <span class="subxComment"># var1/reg <- or lit => 81 1/subop/or var1/rm32 lit/imm32</span> +<span id="L13339" class="LineNr">13339 </span> <a href='mu.subx.html#L14921'>_string_09_or_with</a>/imm32/subx-name +<span id="L13340" class="LineNr">13340 </span> 3/imm32/rm32-is-first-output +<span id="L13341" class="LineNr">13341 </span> 1/imm32/r32-is-first-inout +<span id="L13342" class="LineNr">13342 </span> 0/imm32/no-imm32 +<span id="L13343" class="LineNr">13343 </span> 0/imm32/no-disp32 +<span id="L13344" class="LineNr">13344 </span> 0/imm32/output-is-write-only +<span id="L13345" class="LineNr">13345 </span> 0x11/imm32/alloc-id:fake +<span id="L13346" class="LineNr">13346 </span> <a href='mu.subx.html#L13347'>_Primitive-or-reg-with-mem</a>/imm32/next +<span id="L13347" class="LineNr">13347 </span><span class="subxMinorFunction">_Primitive-or-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13348" class="LineNr">13348 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13349" class="LineNr">13349 </span> <span class="subxComment"># or-with var1 var2/reg => 09/or-with var1 var2/r32</span> +<span id="L13350" class="LineNr">13350 </span> 0x11/imm32/alloc-id:fake +<span id="L13351" class="LineNr">13351 </span> <a href='mu.subx.html#L14879'>_string-or-with</a>/imm32/name +<span id="L13352" class="LineNr">13352 </span> 0x11/imm32/alloc-id:fake +<span id="L13353" class="LineNr">13353 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13354" class="LineNr">13354 </span> 0/imm32/no-outputs +<span id="L13355" class="LineNr">13355 </span> 0/imm32/no-outputs <span id="L13356" class="LineNr">13356 </span> 0x11/imm32/alloc-id:fake -<span id="L13357" class="LineNr">13357 </span> <a href='mu.subx.html#L14844'>_string-or</a>/imm32/name -<span id="L13358" class="LineNr">13358 </span> 0x11/imm32/alloc-id:fake -<span id="L13359" class="LineNr">13359 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13360" class="LineNr">13360 </span> 0x11/imm32/alloc-id:fake -<span id="L13361" class="LineNr">13361 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13362" class="LineNr">13362 </span> 0x11/imm32/alloc-id:fake -<span id="L13363" class="LineNr">13363 </span> <a href='mu.subx.html#L15186'>_string_81_subop_or</a>/imm32/subx-name -<span id="L13364" class="LineNr">13364 </span> 3/imm32/rm32-is-first-output -<span id="L13365" class="LineNr">13365 </span> 0/imm32/no-r32 -<span id="L13366" class="LineNr">13366 </span> 1/imm32/imm32-is-first-inout -<span id="L13367" class="LineNr">13367 </span> 0/imm32/no-disp32 -<span id="L13368" class="LineNr">13368 </span> 0/imm32/output-is-write-only -<span id="L13369" class="LineNr">13369 </span> 0x11/imm32/alloc-id:fake -<span id="L13370" class="LineNr">13370 </span> <a href='mu.subx.html#L13371'>_Primitive-or-lit-with-mem</a>/imm32/next -<span id="L13371" class="LineNr">13371 </span><span class="subxMinorFunction">_Primitive-or-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13372" class="LineNr">13372 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13373" class="LineNr">13373 </span> <span class="subxComment"># or-with var1, lit => 81 1/subop/or var1/rm32 lit/imm32</span> +<span id="L13357" class="LineNr">13357 </span> <a href='mu.subx.html#L14921'>_string_09_or_with</a>/imm32/subx-name +<span id="L13358" class="LineNr">13358 </span> 1/imm32/rm32-is-first-inout +<span id="L13359" class="LineNr">13359 </span> 2/imm32/r32-is-second-inout +<span id="L13360" class="LineNr">13360 </span> 0/imm32/no-imm32 +<span id="L13361" class="LineNr">13361 </span> 0/imm32/no-disp32 +<span id="L13362" class="LineNr">13362 </span> 0/imm32/output-is-write-only +<span id="L13363" class="LineNr">13363 </span> 0x11/imm32/alloc-id:fake +<span id="L13364" class="LineNr">13364 </span> <a href='mu.subx.html#L13365'>_Primitive-or-mem-with-reg</a>/imm32/next +<span id="L13365" class="LineNr">13365 </span><span class="subxMinorFunction">_Primitive-or-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13366" class="LineNr">13366 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13367" class="LineNr">13367 </span> <span class="subxComment"># var1/reg <- or var2 => 0b/or var2/rm32 var1/r32</span> +<span id="L13368" class="LineNr">13368 </span> 0x11/imm32/alloc-id:fake +<span id="L13369" class="LineNr">13369 </span> <a href='mu.subx.html#L14874'>_string-or</a>/imm32/name +<span id="L13370" class="LineNr">13370 </span> 0x11/imm32/alloc-id:fake +<span id="L13371" class="LineNr">13371 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13372" class="LineNr">13372 </span> 0x11/imm32/alloc-id:fake +<span id="L13373" class="LineNr">13373 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13374" class="LineNr">13374 </span> 0x11/imm32/alloc-id:fake -<span id="L13375" class="LineNr">13375 </span> <a href='mu.subx.html#L14849'>_string-or-with</a>/imm32/name -<span id="L13376" class="LineNr">13376 </span> 0x11/imm32/alloc-id:fake -<span id="L13377" class="LineNr">13377 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13378" class="LineNr">13378 </span> 0/imm32/no-outputs -<span id="L13379" class="LineNr">13379 </span> 0/imm32/no-outputs -<span id="L13380" class="LineNr">13380 </span> 0x11/imm32/alloc-id:fake -<span id="L13381" class="LineNr">13381 </span> <a href='mu.subx.html#L15186'>_string_81_subop_or</a>/imm32/subx-name -<span id="L13382" class="LineNr">13382 </span> 1/imm32/rm32-is-first-inout -<span id="L13383" class="LineNr">13383 </span> 0/imm32/no-r32 -<span id="L13384" class="LineNr">13384 </span> 2/imm32/imm32-is-second-inout -<span id="L13385" class="LineNr">13385 </span> 0/imm32/no-disp32 -<span id="L13386" class="LineNr">13386 </span> 0/imm32/output-is-write-only -<span id="L13387" class="LineNr">13387 </span> 0x11/imm32/alloc-id:fake -<span id="L13388" class="LineNr">13388 </span> <a href='mu.subx.html#L13390'>_Primitive-xor-with-eax</a>/imm32/next -<span id="L13389" class="LineNr">13389 </span><span class="subxH1Comment"># - xor</span> -<span id="L13390" class="LineNr">13390 </span><span class="subxMinorFunction">_Primitive-xor-with-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13391" class="LineNr">13391 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13392" class="LineNr">13392 </span> <span class="subxComment"># var/eax <- xor lit => 35/xor-with-eax lit/imm32</span> -<span id="L13393" class="LineNr">13393 </span> 0x11/imm32/alloc-id:fake -<span id="L13394" class="LineNr">13394 </span> <a href='mu.subx.html#L14864'>_string-xor</a>/imm32/name -<span id="L13395" class="LineNr">13395 </span> 0x11/imm32/alloc-id:fake -<span id="L13396" class="LineNr">13396 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13397" class="LineNr">13397 </span> 0x11/imm32/alloc-id:fake -<span id="L13398" class="LineNr">13398 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L13375" class="LineNr">13375 </span> <a href='mu.subx.html#L14926'>_string_0b_or</a>/imm32/subx-name +<span id="L13376" class="LineNr">13376 </span> 1/imm32/rm32-is-first-inout +<span id="L13377" class="LineNr">13377 </span> 3/imm32/r32-is-first-output +<span id="L13378" class="LineNr">13378 </span> 0/imm32/no-imm32 +<span id="L13379" class="LineNr">13379 </span> 0/imm32/no-disp32 +<span id="L13380" class="LineNr">13380 </span> 0/imm32/output-is-write-only +<span id="L13381" class="LineNr">13381 </span> 0x11/imm32/alloc-id:fake +<span id="L13382" class="LineNr">13382 </span> <a href='mu.subx.html#L13383'>_Primitive-or-lit-with-reg</a>/imm32/next +<span id="L13383" class="LineNr">13383 </span><span class="subxMinorFunction">_Primitive-or-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13384" class="LineNr">13384 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13385" class="LineNr">13385 </span> <span class="subxComment"># var1/reg <- or lit => 81 1/subop/or var1/rm32 lit/imm32</span> +<span id="L13386" class="LineNr">13386 </span> 0x11/imm32/alloc-id:fake +<span id="L13387" class="LineNr">13387 </span> <a href='mu.subx.html#L14874'>_string-or</a>/imm32/name +<span id="L13388" class="LineNr">13388 </span> 0x11/imm32/alloc-id:fake +<span id="L13389" class="LineNr">13389 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13390" class="LineNr">13390 </span> 0x11/imm32/alloc-id:fake +<span id="L13391" class="LineNr">13391 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13392" class="LineNr">13392 </span> 0x11/imm32/alloc-id:fake +<span id="L13393" class="LineNr">13393 </span> <a href='mu.subx.html#L15216'>_string_81_subop_or</a>/imm32/subx-name +<span id="L13394" class="LineNr">13394 </span> 3/imm32/rm32-is-first-output +<span id="L13395" class="LineNr">13395 </span> 0/imm32/no-r32 +<span id="L13396" class="LineNr">13396 </span> 1/imm32/imm32-is-first-inout +<span id="L13397" class="LineNr">13397 </span> 0/imm32/no-disp32 +<span id="L13398" class="LineNr">13398 </span> 0/imm32/output-is-write-only <span id="L13399" class="LineNr">13399 </span> 0x11/imm32/alloc-id:fake -<span id="L13400" class="LineNr">13400 </span> <a href='mu.subx.html#L15101'>_string_35_xor_with_eax</a>/imm32/subx-name -<span id="L13401" class="LineNr">13401 </span> 0/imm32/no-rm32 -<span id="L13402" class="LineNr">13402 </span> 0/imm32/no-r32 -<span id="L13403" class="LineNr">13403 </span> 1/imm32/imm32-is-first-inout -<span id="L13404" class="LineNr">13404 </span> 0/imm32/no-disp32 -<span id="L13405" class="LineNr">13405 </span> 0/imm32/output-is-write-only +<span id="L13400" class="LineNr">13400 </span> <a href='mu.subx.html#L13401'>_Primitive-or-lit-with-mem</a>/imm32/next +<span id="L13401" class="LineNr">13401 </span><span class="subxMinorFunction">_Primitive-or-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13402" class="LineNr">13402 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13403" class="LineNr">13403 </span> <span class="subxComment"># or-with var1, lit => 81 1/subop/or var1/rm32 lit/imm32</span> +<span id="L13404" class="LineNr">13404 </span> 0x11/imm32/alloc-id:fake +<span id="L13405" class="LineNr">13405 </span> <a href='mu.subx.html#L14879'>_string-or-with</a>/imm32/name <span id="L13406" class="LineNr">13406 </span> 0x11/imm32/alloc-id:fake -<span id="L13407" class="LineNr">13407 </span> <a href='mu.subx.html#L13408'>_Primitive-xor-reg-with-reg</a>/imm32/next -<span id="L13408" class="LineNr">13408 </span><span class="subxMinorFunction">_Primitive-xor-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13409" class="LineNr">13409 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13410" class="LineNr">13410 </span> <span class="subxComment"># var1/reg <- xor var2/reg => 31/xor-with var1/rm32 var2/r32</span> -<span id="L13411" class="LineNr">13411 </span> 0x11/imm32/alloc-id:fake -<span id="L13412" class="LineNr">13412 </span> <a href='mu.subx.html#L14864'>_string-xor</a>/imm32/name -<span id="L13413" class="LineNr">13413 </span> 0x11/imm32/alloc-id:fake -<span id="L13414" class="LineNr">13414 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13415" class="LineNr">13415 </span> 0x11/imm32/alloc-id:fake -<span id="L13416" class="LineNr">13416 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13407" class="LineNr">13407 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13408" class="LineNr">13408 </span> 0/imm32/no-outputs +<span id="L13409" class="LineNr">13409 </span> 0/imm32/no-outputs +<span id="L13410" class="LineNr">13410 </span> 0x11/imm32/alloc-id:fake +<span id="L13411" class="LineNr">13411 </span> <a href='mu.subx.html#L15216'>_string_81_subop_or</a>/imm32/subx-name +<span id="L13412" class="LineNr">13412 </span> 1/imm32/rm32-is-first-inout +<span id="L13413" class="LineNr">13413 </span> 0/imm32/no-r32 +<span id="L13414" class="LineNr">13414 </span> 2/imm32/imm32-is-second-inout +<span id="L13415" class="LineNr">13415 </span> 0/imm32/no-disp32 +<span id="L13416" class="LineNr">13416 </span> 0/imm32/output-is-write-only <span id="L13417" class="LineNr">13417 </span> 0x11/imm32/alloc-id:fake -<span id="L13418" class="LineNr">13418 </span> <a href='mu.subx.html#L15091'>_string_31_xor_with</a>/imm32/subx-name -<span id="L13419" class="LineNr">13419 </span> 3/imm32/rm32-is-first-output -<span id="L13420" class="LineNr">13420 </span> 1/imm32/r32-is-first-inout -<span id="L13421" class="LineNr">13421 </span> 0/imm32/no-imm32 -<span id="L13422" class="LineNr">13422 </span> 0/imm32/no-disp32 -<span id="L13423" class="LineNr">13423 </span> 0/imm32/output-is-write-only -<span id="L13424" class="LineNr">13424 </span> 0x11/imm32/alloc-id:fake -<span id="L13425" class="LineNr">13425 </span> <a href='mu.subx.html#L13426'>_Primitive-xor-reg-with-mem</a>/imm32/next -<span id="L13426" class="LineNr">13426 </span><span class="subxMinorFunction">_Primitive-xor-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13427" class="LineNr">13427 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13428" class="LineNr">13428 </span> <span class="subxComment"># xor-with var1 var2/reg => 31/xor-with var1 var2/r32</span> +<span id="L13418" class="LineNr">13418 </span> <a href='mu.subx.html#L13420'>_Primitive-xor-with-eax</a>/imm32/next +<span id="L13419" class="LineNr">13419 </span><span class="subxH1Comment"># - xor</span> +<span id="L13420" class="LineNr">13420 </span><span class="subxMinorFunction">_Primitive-xor-with-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13421" class="LineNr">13421 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13422" class="LineNr">13422 </span> <span class="subxComment"># var/eax <- xor lit => 35/xor-with-eax lit/imm32</span> +<span id="L13423" class="LineNr">13423 </span> 0x11/imm32/alloc-id:fake +<span id="L13424" class="LineNr">13424 </span> <a href='mu.subx.html#L14894'>_string-xor</a>/imm32/name +<span id="L13425" class="LineNr">13425 </span> 0x11/imm32/alloc-id:fake +<span id="L13426" class="LineNr">13426 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13427" class="LineNr">13427 </span> 0x11/imm32/alloc-id:fake +<span id="L13428" class="LineNr">13428 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L13429" class="LineNr">13429 </span> 0x11/imm32/alloc-id:fake -<span id="L13430" class="LineNr">13430 </span> <a href='mu.subx.html#L14869'>_string-xor-with</a>/imm32/name -<span id="L13431" class="LineNr">13431 </span> 0x11/imm32/alloc-id:fake -<span id="L13432" class="LineNr">13432 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13433" class="LineNr">13433 </span> 0/imm32/no-outputs -<span id="L13434" class="LineNr">13434 </span> 0/imm32/no-outputs -<span id="L13435" class="LineNr">13435 </span> 0x11/imm32/alloc-id:fake -<span id="L13436" class="LineNr">13436 </span> <a href='mu.subx.html#L15091'>_string_31_xor_with</a>/imm32/subx-name -<span id="L13437" class="LineNr">13437 </span> 1/imm32/rm32-is-first-inout -<span id="L13438" class="LineNr">13438 </span> 2/imm32/r32-is-second-inout -<span id="L13439" class="LineNr">13439 </span> 0/imm32/no-imm32 -<span id="L13440" class="LineNr">13440 </span> 0/imm32/no-disp32 -<span id="L13441" class="LineNr">13441 </span> 0/imm32/output-is-write-only -<span id="L13442" class="LineNr">13442 </span> 0x11/imm32/alloc-id:fake -<span id="L13443" class="LineNr">13443 </span> <a href='mu.subx.html#L13444'>_Primitive-xor-mem-with-reg</a>/imm32/next -<span id="L13444" class="LineNr">13444 </span><span class="subxMinorFunction">_Primitive-xor-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13445" class="LineNr">13445 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13446" class="LineNr">13446 </span> <span class="subxComment"># var1/reg <- xor var2 => 33/xor var2/rm32 var1/r32</span> +<span id="L13430" class="LineNr">13430 </span> <a href='mu.subx.html#L15131'>_string_35_xor_with_eax</a>/imm32/subx-name +<span id="L13431" class="LineNr">13431 </span> 0/imm32/no-rm32 +<span id="L13432" class="LineNr">13432 </span> 0/imm32/no-r32 +<span id="L13433" class="LineNr">13433 </span> 1/imm32/imm32-is-first-inout +<span id="L13434" class="LineNr">13434 </span> 0/imm32/no-disp32 +<span id="L13435" class="LineNr">13435 </span> 0/imm32/output-is-write-only +<span id="L13436" class="LineNr">13436 </span> 0x11/imm32/alloc-id:fake +<span id="L13437" class="LineNr">13437 </span> <a href='mu.subx.html#L13438'>_Primitive-xor-reg-with-reg</a>/imm32/next +<span id="L13438" class="LineNr">13438 </span><span class="subxMinorFunction">_Primitive-xor-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13439" class="LineNr">13439 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13440" class="LineNr">13440 </span> <span class="subxComment"># var1/reg <- xor var2/reg => 31/xor-with var1/rm32 var2/r32</span> +<span id="L13441" class="LineNr">13441 </span> 0x11/imm32/alloc-id:fake +<span id="L13442" class="LineNr">13442 </span> <a href='mu.subx.html#L14894'>_string-xor</a>/imm32/name +<span id="L13443" class="LineNr">13443 </span> 0x11/imm32/alloc-id:fake +<span id="L13444" class="LineNr">13444 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13445" class="LineNr">13445 </span> 0x11/imm32/alloc-id:fake +<span id="L13446" class="LineNr">13446 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13447" class="LineNr">13447 </span> 0x11/imm32/alloc-id:fake -<span id="L13448" class="LineNr">13448 </span> <a href='mu.subx.html#L14864'>_string-xor</a>/imm32/name -<span id="L13449" class="LineNr">13449 </span> 0x11/imm32/alloc-id:fake -<span id="L13450" class="LineNr">13450 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13451" class="LineNr">13451 </span> 0x11/imm32/alloc-id:fake -<span id="L13452" class="LineNr">13452 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13453" class="LineNr">13453 </span> 0x11/imm32/alloc-id:fake -<span id="L13454" class="LineNr">13454 </span> <a href='mu.subx.html#L15096'>_string_33_xor</a>/imm32/subx-name -<span id="L13455" class="LineNr">13455 </span> 1/imm32/rm32-is-first-inout -<span id="L13456" class="LineNr">13456 </span> 3/imm32/r32-is-first-output -<span id="L13457" class="LineNr">13457 </span> 0/imm32/no-imm32 -<span id="L13458" class="LineNr">13458 </span> 0/imm32/no-disp32 -<span id="L13459" class="LineNr">13459 </span> 0/imm32/output-is-write-only -<span id="L13460" class="LineNr">13460 </span> 0x11/imm32/alloc-id:fake -<span id="L13461" class="LineNr">13461 </span> <a href='mu.subx.html#L13462'>_Primitive-xor-lit-with-reg</a>/imm32/next -<span id="L13462" class="LineNr">13462 </span><span class="subxMinorFunction">_Primitive-xor-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13463" class="LineNr">13463 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13464" class="LineNr">13464 </span> <span class="subxComment"># var1/reg <- xor lit => 81 6/subop/xor var1/rm32 lit/imm32</span> +<span id="L13448" class="LineNr">13448 </span> <a href='mu.subx.html#L15121'>_string_31_xor_with</a>/imm32/subx-name +<span id="L13449" class="LineNr">13449 </span> 3/imm32/rm32-is-first-output +<span id="L13450" class="LineNr">13450 </span> 1/imm32/r32-is-first-inout +<span id="L13451" class="LineNr">13451 </span> 0/imm32/no-imm32 +<span id="L13452" class="LineNr">13452 </span> 0/imm32/no-disp32 +<span id="L13453" class="LineNr">13453 </span> 0/imm32/output-is-write-only +<span id="L13454" class="LineNr">13454 </span> 0x11/imm32/alloc-id:fake +<span id="L13455" class="LineNr">13455 </span> <a href='mu.subx.html#L13456'>_Primitive-xor-reg-with-mem</a>/imm32/next +<span id="L13456" class="LineNr">13456 </span><span class="subxMinorFunction">_Primitive-xor-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13457" class="LineNr">13457 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13458" class="LineNr">13458 </span> <span class="subxComment"># xor-with var1 var2/reg => 31/xor-with var1 var2/r32</span> +<span id="L13459" class="LineNr">13459 </span> 0x11/imm32/alloc-id:fake +<span id="L13460" class="LineNr">13460 </span> <a href='mu.subx.html#L14899'>_string-xor-with</a>/imm32/name +<span id="L13461" class="LineNr">13461 </span> 0x11/imm32/alloc-id:fake +<span id="L13462" class="LineNr">13462 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13463" class="LineNr">13463 </span> 0/imm32/no-outputs +<span id="L13464" class="LineNr">13464 </span> 0/imm32/no-outputs <span id="L13465" class="LineNr">13465 </span> 0x11/imm32/alloc-id:fake -<span id="L13466" class="LineNr">13466 </span> <a href='mu.subx.html#L14864'>_string-xor</a>/imm32/name -<span id="L13467" class="LineNr">13467 </span> 0x11/imm32/alloc-id:fake -<span id="L13468" class="LineNr">13468 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13469" class="LineNr">13469 </span> 0x11/imm32/alloc-id:fake -<span id="L13470" class="LineNr">13470 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13471" class="LineNr">13471 </span> 0x11/imm32/alloc-id:fake -<span id="L13472" class="LineNr">13472 </span> <a href='mu.subx.html#L15201'>_string_81_subop_xor</a>/imm32/subx-name -<span id="L13473" class="LineNr">13473 </span> 3/imm32/rm32-is-first-output -<span id="L13474" class="LineNr">13474 </span> 0/imm32/no-r32 -<span id="L13475" class="LineNr">13475 </span> 1/imm32/imm32-is-first-inout -<span id="L13476" class="LineNr">13476 </span> 0/imm32/no-disp32 -<span id="L13477" class="LineNr">13477 </span> 0/imm32/output-is-write-only -<span id="L13478" class="LineNr">13478 </span> 0x11/imm32/alloc-id:fake -<span id="L13479" class="LineNr">13479 </span> <a href='mu.subx.html#L13480'>_Primitive-xor-lit-with-mem</a>/imm32/next -<span id="L13480" class="LineNr">13480 </span><span class="subxMinorFunction">_Primitive-xor-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13481" class="LineNr">13481 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13482" class="LineNr">13482 </span> <span class="subxComment"># xor-with var1, lit => 81 6/subop/xor var1/rm32 lit/imm32</span> +<span id="L13466" class="LineNr">13466 </span> <a href='mu.subx.html#L15121'>_string_31_xor_with</a>/imm32/subx-name +<span id="L13467" class="LineNr">13467 </span> 1/imm32/rm32-is-first-inout +<span id="L13468" class="LineNr">13468 </span> 2/imm32/r32-is-second-inout +<span id="L13469" class="LineNr">13469 </span> 0/imm32/no-imm32 +<span id="L13470" class="LineNr">13470 </span> 0/imm32/no-disp32 +<span id="L13471" class="LineNr">13471 </span> 0/imm32/output-is-write-only +<span id="L13472" class="LineNr">13472 </span> 0x11/imm32/alloc-id:fake +<span id="L13473" class="LineNr">13473 </span> <a href='mu.subx.html#L13474'>_Primitive-xor-mem-with-reg</a>/imm32/next +<span id="L13474" class="LineNr">13474 </span><span class="subxMinorFunction">_Primitive-xor-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13475" class="LineNr">13475 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13476" class="LineNr">13476 </span> <span class="subxComment"># var1/reg <- xor var2 => 33/xor var2/rm32 var1/r32</span> +<span id="L13477" class="LineNr">13477 </span> 0x11/imm32/alloc-id:fake +<span id="L13478" class="LineNr">13478 </span> <a href='mu.subx.html#L14894'>_string-xor</a>/imm32/name +<span id="L13479" class="LineNr">13479 </span> 0x11/imm32/alloc-id:fake +<span id="L13480" class="LineNr">13480 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13481" class="LineNr">13481 </span> 0x11/imm32/alloc-id:fake +<span id="L13482" class="LineNr">13482 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13483" class="LineNr">13483 </span> 0x11/imm32/alloc-id:fake -<span id="L13484" class="LineNr">13484 </span> <a href='mu.subx.html#L14869'>_string-xor-with</a>/imm32/name -<span id="L13485" class="LineNr">13485 </span> 0x11/imm32/alloc-id:fake -<span id="L13486" class="LineNr">13486 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13487" class="LineNr">13487 </span> 0/imm32/no-outputs -<span id="L13488" class="LineNr">13488 </span> 0/imm32/no-outputs -<span id="L13489" class="LineNr">13489 </span> 0x11/imm32/alloc-id:fake -<span id="L13490" class="LineNr">13490 </span> <a href='mu.subx.html#L15201'>_string_81_subop_xor</a>/imm32/subx-name -<span id="L13491" class="LineNr">13491 </span> 1/imm32/rm32-is-first-inout -<span id="L13492" class="LineNr">13492 </span> 0/imm32/no-r32 -<span id="L13493" class="LineNr">13493 </span> 2/imm32/imm32-is-first-inout -<span id="L13494" class="LineNr">13494 </span> 0/imm32/no-disp32 -<span id="L13495" class="LineNr">13495 </span> 0/imm32/output-is-write-only -<span id="L13496" class="LineNr">13496 </span> 0x11/imm32/alloc-id:fake -<span id="L13497" class="LineNr">13497 </span> <a href='mu.subx.html#L13499'>_Primitive-copy-to-eax</a>/imm32/next -<span id="L13498" class="LineNr">13498 </span><span class="subxH1Comment"># - copy</span> -<span id="L13499" class="LineNr">13499 </span><span class="subxMinorFunction">_Primitive-copy-to-eax</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13500" class="LineNr">13500 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13501" class="LineNr">13501 </span> <span class="subxComment"># var/eax <- copy lit => b8/copy-to-eax lit/imm32</span> -<span id="L13502" class="LineNr">13502 </span> 0x11/imm32/alloc-id:fake -<span id="L13503" class="LineNr">13503 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13504" class="LineNr">13504 </span> 0x11/imm32/alloc-id:fake -<span id="L13505" class="LineNr">13505 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13506" class="LineNr">13506 </span> 0x11/imm32/alloc-id:fake -<span id="L13507" class="LineNr">13507 </span> <span class="SpecialChar"><a href='mu.subx.html#L15445'>Single-int-var-in-eax</a></span>/imm32/outputs +<span id="L13484" class="LineNr">13484 </span> <a href='mu.subx.html#L15126'>_string_33_xor</a>/imm32/subx-name +<span id="L13485" class="LineNr">13485 </span> 1/imm32/rm32-is-first-inout +<span id="L13486" class="LineNr">13486 </span> 3/imm32/r32-is-first-output +<span id="L13487" class="LineNr">13487 </span> 0/imm32/no-imm32 +<span id="L13488" class="LineNr">13488 </span> 0/imm32/no-disp32 +<span id="L13489" class="LineNr">13489 </span> 0/imm32/output-is-write-only +<span id="L13490" class="LineNr">13490 </span> 0x11/imm32/alloc-id:fake +<span id="L13491" class="LineNr">13491 </span> <a href='mu.subx.html#L13492'>_Primitive-xor-lit-with-reg</a>/imm32/next +<span id="L13492" class="LineNr">13492 </span><span class="subxMinorFunction">_Primitive-xor-lit-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13493" class="LineNr">13493 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13494" class="LineNr">13494 </span> <span class="subxComment"># var1/reg <- xor lit => 81 6/subop/xor var1/rm32 lit/imm32</span> +<span id="L13495" class="LineNr">13495 </span> 0x11/imm32/alloc-id:fake +<span id="L13496" class="LineNr">13496 </span> <a href='mu.subx.html#L14894'>_string-xor</a>/imm32/name +<span id="L13497" class="LineNr">13497 </span> 0x11/imm32/alloc-id:fake +<span id="L13498" class="LineNr">13498 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13499" class="LineNr">13499 </span> 0x11/imm32/alloc-id:fake +<span id="L13500" class="LineNr">13500 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13501" class="LineNr">13501 </span> 0x11/imm32/alloc-id:fake +<span id="L13502" class="LineNr">13502 </span> <a href='mu.subx.html#L15231'>_string_81_subop_xor</a>/imm32/subx-name +<span id="L13503" class="LineNr">13503 </span> 3/imm32/rm32-is-first-output +<span id="L13504" class="LineNr">13504 </span> 0/imm32/no-r32 +<span id="L13505" class="LineNr">13505 </span> 1/imm32/imm32-is-first-inout +<span id="L13506" class="LineNr">13506 </span> 0/imm32/no-disp32 +<span id="L13507" class="LineNr">13507 </span> 0/imm32/output-is-write-only <span id="L13508" class="LineNr">13508 </span> 0x11/imm32/alloc-id:fake -<span id="L13509" class="LineNr">13509 </span> <a href='mu.subx.html#L15236'>_string_b8_copy_to_eax</a>/imm32/subx-name -<span id="L13510" class="LineNr">13510 </span> 0/imm32/no-rm32 -<span id="L13511" class="LineNr">13511 </span> 0/imm32/no-r32 -<span id="L13512" class="LineNr">13512 </span> 1/imm32/imm32-is-first-inout -<span id="L13513" class="LineNr">13513 </span> 0/imm32/no-disp32 -<span id="L13514" class="LineNr">13514 </span> 1/imm32/output-is-write-only +<span id="L13509" class="LineNr">13509 </span> <a href='mu.subx.html#L13510'>_Primitive-xor-lit-with-mem</a>/imm32/next +<span id="L13510" class="LineNr">13510 </span><span class="subxMinorFunction">_Primitive-xor-lit-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13511" class="LineNr">13511 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13512" class="LineNr">13512 </span> <span class="subxComment"># xor-with var1, lit => 81 6/subop/xor var1/rm32 lit/imm32</span> +<span id="L13513" class="LineNr">13513 </span> 0x11/imm32/alloc-id:fake +<span id="L13514" class="LineNr">13514 </span> <a href='mu.subx.html#L14899'>_string-xor-with</a>/imm32/name <span id="L13515" class="LineNr">13515 </span> 0x11/imm32/alloc-id:fake -<span id="L13516" class="LineNr">13516 </span> <a href='mu.subx.html#L13517'>_Primitive-copy-to-ecx</a>/imm32/next -<span id="L13517" class="LineNr">13517 </span><span class="subxMinorFunction">_Primitive-copy-to-ecx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13518" class="LineNr">13518 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13519" class="LineNr">13519 </span> <span class="subxComment"># var/ecx <- copy lit => b9/copy-to-ecx lit/imm32</span> -<span id="L13520" class="LineNr">13520 </span> 0x11/imm32/alloc-id:fake -<span id="L13521" class="LineNr">13521 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13522" class="LineNr">13522 </span> 0x11/imm32/alloc-id:fake -<span id="L13523" class="LineNr">13523 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13524" class="LineNr">13524 </span> 0x11/imm32/alloc-id:fake -<span id="L13525" class="LineNr">13525 </span> <span class="SpecialChar"><a href='mu.subx.html#L15463'>Single-int-var-in-ecx</a></span>/imm32/outputs +<span id="L13516" class="LineNr">13516 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13517" class="LineNr">13517 </span> 0/imm32/no-outputs +<span id="L13518" class="LineNr">13518 </span> 0/imm32/no-outputs +<span id="L13519" class="LineNr">13519 </span> 0x11/imm32/alloc-id:fake +<span id="L13520" class="LineNr">13520 </span> <a href='mu.subx.html#L15231'>_string_81_subop_xor</a>/imm32/subx-name +<span id="L13521" class="LineNr">13521 </span> 1/imm32/rm32-is-first-inout +<span id="L13522" class="LineNr">13522 </span> 0/imm32/no-r32 +<span id="L13523" class="LineNr">13523 </span> 2/imm32/imm32-is-first-inout +<span id="L13524" class="LineNr">13524 </span> 0/imm32/no-disp32 +<span id="L13525" class="LineNr">13525 </span> 0/imm32/output-is-write-only <span id="L13526" class="LineNr">13526 </span> 0x11/imm32/alloc-id:fake -<span id="L13527" class="LineNr">13527 </span> <a href='mu.subx.html#L15241'>_string_b9_copy_to_ecx</a>/imm32/subx-name -<span id="L13528" class="LineNr">13528 </span> 0/imm32/no-rm32 -<span id="L13529" class="LineNr">13529 </span> 0/imm32/no-r32 -<span id="L13530" class="LineNr">13530 </span> 1/imm32/imm32-is-first-inout -<span id="L13531" class="LineNr">13531 </span> 0/imm32/no-disp32 -<span id="L13532" class="LineNr">13532 </span> 1/imm32/output-is-write-only -<span id="L13533" class="LineNr">13533 </span> 0x11/imm32/alloc-id:fake -<span id="L13534" class="LineNr">13534 </span> <a href='mu.subx.html#L13535'>_Primitive-copy-to-edx</a>/imm32/next -<span id="L13535" class="LineNr">13535 </span><span class="subxMinorFunction">_Primitive-copy-to-edx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13536" class="LineNr">13536 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13537" class="LineNr">13537 </span> <span class="subxComment"># var/edx <- copy lit => ba/copy-to-edx lit/imm32</span> +<span id="L13527" class="LineNr">13527 </span> <a href='mu.subx.html#L13529'>_Primitive-copy-to-eax</a>/imm32/next +<span id="L13528" class="LineNr">13528 </span><span class="subxH1Comment"># - copy</span> +<span id="L13529" class="LineNr">13529 </span><span class="subxMinorFunction">_Primitive-copy-to-eax</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13530" class="LineNr">13530 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13531" class="LineNr">13531 </span> <span class="subxComment"># var/eax <- copy lit => b8/copy-to-eax lit/imm32</span> +<span id="L13532" class="LineNr">13532 </span> 0x11/imm32/alloc-id:fake +<span id="L13533" class="LineNr">13533 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13534" class="LineNr">13534 </span> 0x11/imm32/alloc-id:fake +<span id="L13535" class="LineNr">13535 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13536" class="LineNr">13536 </span> 0x11/imm32/alloc-id:fake +<span id="L13537" class="LineNr">13537 </span> <span class="SpecialChar"><a href='mu.subx.html#L15475'>Single-int-var-in-eax</a></span>/imm32/outputs <span id="L13538" class="LineNr">13538 </span> 0x11/imm32/alloc-id:fake -<span id="L13539" class="LineNr">13539 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13540" class="LineNr">13540 </span> 0x11/imm32/alloc-id:fake -<span id="L13541" class="LineNr">13541 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13542" class="LineNr">13542 </span> 0x11/imm32/alloc-id:fake -<span id="L13543" class="LineNr">13543 </span> <span class="SpecialChar"><a href='mu.subx.html#L15481'>Single-int-var-in-edx</a></span>/imm32/outputs -<span id="L13544" class="LineNr">13544 </span> 0x11/imm32/alloc-id:fake -<span id="L13545" class="LineNr">13545 </span> <a href='mu.subx.html#L15246'>_string_ba_copy_to_edx</a>/imm32/subx-name -<span id="L13546" class="LineNr">13546 </span> 0/imm32/no-rm32 -<span id="L13547" class="LineNr">13547 </span> 0/imm32/no-r32 -<span id="L13548" class="LineNr">13548 </span> 1/imm32/imm32-is-first-inout -<span id="L13549" class="LineNr">13549 </span> 0/imm32/no-disp32 -<span id="L13550" class="LineNr">13550 </span> 1/imm32/output-is-write-only -<span id="L13551" class="LineNr">13551 </span> 0x11/imm32/alloc-id:fake -<span id="L13552" class="LineNr">13552 </span> <a href='mu.subx.html#L13553'>_Primitive-copy-to-ebx</a>/imm32/next -<span id="L13553" class="LineNr">13553 </span><span class="subxMinorFunction">_Primitive-copy-to-ebx</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13554" class="LineNr">13554 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13555" class="LineNr">13555 </span> <span class="subxComment"># var/ebx <- copy lit => bb/copy-to-ebx lit/imm32</span> +<span id="L13539" class="LineNr">13539 </span> <a href='mu.subx.html#L15266'>_string_b8_copy_to_eax</a>/imm32/subx-name +<span id="L13540" class="LineNr">13540 </span> 0/imm32/no-rm32 +<span id="L13541" class="LineNr">13541 </span> 0/imm32/no-r32 +<span id="L13542" class="LineNr">13542 </span> 1/imm32/imm32-is-first-inout +<span id="L13543" class="LineNr">13543 </span> 0/imm32/no-disp32 +<span id="L13544" class="LineNr">13544 </span> 1/imm32/output-is-write-only +<span id="L13545" class="LineNr">13545 </span> 0x11/imm32/alloc-id:fake +<span id="L13546" class="LineNr">13546 </span> <a href='mu.subx.html#L13547'>_Primitive-copy-to-ecx</a>/imm32/next +<span id="L13547" class="LineNr">13547 </span><span class="subxMinorFunction">_Primitive-copy-to-ecx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13548" class="LineNr">13548 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13549" class="LineNr">13549 </span> <span class="subxComment"># var/ecx <- copy lit => b9/copy-to-ecx lit/imm32</span> +<span id="L13550" class="LineNr">13550 </span> 0x11/imm32/alloc-id:fake +<span id="L13551" class="LineNr">13551 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13552" class="LineNr">13552 </span> 0x11/imm32/alloc-id:fake +<span id="L13553" class="LineNr">13553 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13554" class="LineNr">13554 </span> 0x11/imm32/alloc-id:fake +<span id="L13555" class="LineNr">13555 </span> <span class="SpecialChar"><a href='mu.subx.html#L15493'>Single-int-var-in-ecx</a></span>/imm32/outputs <span id="L13556" class="LineNr">13556 </span> 0x11/imm32/alloc-id:fake -<span id="L13557" class="LineNr">13557 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13558" class="LineNr">13558 </span> 0x11/imm32/alloc-id:fake -<span id="L13559" class="LineNr">13559 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13560" class="LineNr">13560 </span> 0x11/imm32/alloc-id:fake -<span id="L13561" class="LineNr">13561 </span> <span class="SpecialChar"><a href='mu.subx.html#L15499'>Single-int-var-in-ebx</a></span>/imm32/outputs -<span id="L13562" class="LineNr">13562 </span> 0x11/imm32/alloc-id:fake -<span id="L13563" class="LineNr">13563 </span> <a href='mu.subx.html#L15251'>_string_bb_copy_to_ebx</a>/imm32/subx-name -<span id="L13564" class="LineNr">13564 </span> 0/imm32/no-rm32 -<span id="L13565" class="LineNr">13565 </span> 0/imm32/no-r32 -<span id="L13566" class="LineNr">13566 </span> 1/imm32/imm32-is-first-inout -<span id="L13567" class="LineNr">13567 </span> 0/imm32/no-disp32 -<span id="L13568" class="LineNr">13568 </span> 1/imm32/output-is-write-only -<span id="L13569" class="LineNr">13569 </span> 0x11/imm32/alloc-id:fake -<span id="L13570" class="LineNr">13570 </span> <a href='mu.subx.html#L13571'>_Primitive-copy-to-esi</a>/imm32/next -<span id="L13571" class="LineNr">13571 </span><span class="subxMinorFunction">_Primitive-copy-to-esi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13572" class="LineNr">13572 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13573" class="LineNr">13573 </span> <span class="subxComment"># var/esi <- copy lit => be/copy-to-esi lit/imm32</span> +<span id="L13557" class="LineNr">13557 </span> <a href='mu.subx.html#L15271'>_string_b9_copy_to_ecx</a>/imm32/subx-name +<span id="L13558" class="LineNr">13558 </span> 0/imm32/no-rm32 +<span id="L13559" class="LineNr">13559 </span> 0/imm32/no-r32 +<span id="L13560" class="LineNr">13560 </span> 1/imm32/imm32-is-first-inout +<span id="L13561" class="LineNr">13561 </span> 0/imm32/no-disp32 +<span id="L13562" class="LineNr">13562 </span> 1/imm32/output-is-write-only +<span id="L13563" class="LineNr">13563 </span> 0x11/imm32/alloc-id:fake +<span id="L13564" class="LineNr">13564 </span> <a href='mu.subx.html#L13565'>_Primitive-copy-to-edx</a>/imm32/next +<span id="L13565" class="LineNr">13565 </span><span class="subxMinorFunction">_Primitive-copy-to-edx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13566" class="LineNr">13566 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13567" class="LineNr">13567 </span> <span class="subxComment"># var/edx <- copy lit => ba/copy-to-edx lit/imm32</span> +<span id="L13568" class="LineNr">13568 </span> 0x11/imm32/alloc-id:fake +<span id="L13569" class="LineNr">13569 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13570" class="LineNr">13570 </span> 0x11/imm32/alloc-id:fake +<span id="L13571" class="LineNr">13571 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13572" class="LineNr">13572 </span> 0x11/imm32/alloc-id:fake +<span id="L13573" class="LineNr">13573 </span> <span class="SpecialChar"><a href='mu.subx.html#L15511'>Single-int-var-in-edx</a></span>/imm32/outputs <span id="L13574" class="LineNr">13574 </span> 0x11/imm32/alloc-id:fake -<span id="L13575" class="LineNr">13575 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13576" class="LineNr">13576 </span> 0x11/imm32/alloc-id:fake -<span id="L13577" class="LineNr">13577 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13578" class="LineNr">13578 </span> 0x11/imm32/alloc-id:fake -<span id="L13579" class="LineNr">13579 </span> <span class="SpecialChar"><a href='mu.subx.html#L15517'>Single-int-var-in-esi</a></span>/imm32/outputs -<span id="L13580" class="LineNr">13580 </span> 0x11/imm32/alloc-id:fake -<span id="L13581" class="LineNr">13581 </span> <a href='mu.subx.html#L15256'>_string_be_copy_to_esi</a>/imm32/subx-name -<span id="L13582" class="LineNr">13582 </span> 0/imm32/no-rm32 -<span id="L13583" class="LineNr">13583 </span> 0/imm32/no-r32 -<span id="L13584" class="LineNr">13584 </span> 1/imm32/imm32-is-first-inout -<span id="L13585" class="LineNr">13585 </span> 0/imm32/no-disp32 -<span id="L13586" class="LineNr">13586 </span> 1/imm32/output-is-write-only -<span id="L13587" class="LineNr">13587 </span> 0x11/imm32/alloc-id:fake -<span id="L13588" class="LineNr">13588 </span> <a href='mu.subx.html#L13589'>_Primitive-copy-to-edi</a>/imm32/next -<span id="L13589" class="LineNr">13589 </span><span class="subxMinorFunction">_Primitive-copy-to-edi</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13590" class="LineNr">13590 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13591" class="LineNr">13591 </span> <span class="subxComment"># var/edi <- copy lit => bf/copy-to-edi lit/imm32</span> +<span id="L13575" class="LineNr">13575 </span> <a href='mu.subx.html#L15276'>_string_ba_copy_to_edx</a>/imm32/subx-name +<span id="L13576" class="LineNr">13576 </span> 0/imm32/no-rm32 +<span id="L13577" class="LineNr">13577 </span> 0/imm32/no-r32 +<span id="L13578" class="LineNr">13578 </span> 1/imm32/imm32-is-first-inout +<span id="L13579" class="LineNr">13579 </span> 0/imm32/no-disp32 +<span id="L13580" class="LineNr">13580 </span> 1/imm32/output-is-write-only +<span id="L13581" class="LineNr">13581 </span> 0x11/imm32/alloc-id:fake +<span id="L13582" class="LineNr">13582 </span> <a href='mu.subx.html#L13583'>_Primitive-copy-to-ebx</a>/imm32/next +<span id="L13583" class="LineNr">13583 </span><span class="subxMinorFunction">_Primitive-copy-to-ebx</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13584" class="LineNr">13584 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13585" class="LineNr">13585 </span> <span class="subxComment"># var/ebx <- copy lit => bb/copy-to-ebx lit/imm32</span> +<span id="L13586" class="LineNr">13586 </span> 0x11/imm32/alloc-id:fake +<span id="L13587" class="LineNr">13587 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13588" class="LineNr">13588 </span> 0x11/imm32/alloc-id:fake +<span id="L13589" class="LineNr">13589 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13590" class="LineNr">13590 </span> 0x11/imm32/alloc-id:fake +<span id="L13591" class="LineNr">13591 </span> <span class="SpecialChar"><a href='mu.subx.html#L15529'>Single-int-var-in-ebx</a></span>/imm32/outputs <span id="L13592" class="LineNr">13592 </span> 0x11/imm32/alloc-id:fake -<span id="L13593" class="LineNr">13593 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13594" class="LineNr">13594 </span> 0x11/imm32/alloc-id:fake -<span id="L13595" class="LineNr">13595 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13596" class="LineNr">13596 </span> 0x11/imm32/alloc-id:fake -<span id="L13597" class="LineNr">13597 </span> <span class="SpecialChar"><a href='mu.subx.html#L15535'>Single-int-var-in-edi</a></span>/imm32/outputs -<span id="L13598" class="LineNr">13598 </span> 0x11/imm32/alloc-id:fake -<span id="L13599" class="LineNr">13599 </span> <a href='mu.subx.html#L15261'>_string_bf_copy_to_edi</a>/imm32/subx-name -<span id="L13600" class="LineNr">13600 </span> 0/imm32/no-rm32 -<span id="L13601" class="LineNr">13601 </span> 0/imm32/no-r32 -<span id="L13602" class="LineNr">13602 </span> 1/imm32/imm32-is-first-inout -<span id="L13603" class="LineNr">13603 </span> 0/imm32/no-disp32 -<span id="L13604" class="LineNr">13604 </span> 1/imm32/output-is-write-only -<span id="L13605" class="LineNr">13605 </span> 0x11/imm32/alloc-id:fake -<span id="L13606" class="LineNr">13606 </span> <a href='mu.subx.html#L13607'>_Primitive-copy-reg-to-reg</a>/imm32/next -<span id="L13607" class="LineNr">13607 </span><span class="subxMinorFunction">_Primitive-copy-reg-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13608" class="LineNr">13608 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13609" class="LineNr">13609 </span> <span class="subxComment"># var1/reg <- copy var2/reg => 89/<- var1/rm32 var2/r32</span> +<span id="L13593" class="LineNr">13593 </span> <a href='mu.subx.html#L15281'>_string_bb_copy_to_ebx</a>/imm32/subx-name +<span id="L13594" class="LineNr">13594 </span> 0/imm32/no-rm32 +<span id="L13595" class="LineNr">13595 </span> 0/imm32/no-r32 +<span id="L13596" class="LineNr">13596 </span> 1/imm32/imm32-is-first-inout +<span id="L13597" class="LineNr">13597 </span> 0/imm32/no-disp32 +<span id="L13598" class="LineNr">13598 </span> 1/imm32/output-is-write-only +<span id="L13599" class="LineNr">13599 </span> 0x11/imm32/alloc-id:fake +<span id="L13600" class="LineNr">13600 </span> <a href='mu.subx.html#L13601'>_Primitive-copy-to-esi</a>/imm32/next +<span id="L13601" class="LineNr">13601 </span><span class="subxMinorFunction">_Primitive-copy-to-esi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13602" class="LineNr">13602 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13603" class="LineNr">13603 </span> <span class="subxComment"># var/esi <- copy lit => be/copy-to-esi lit/imm32</span> +<span id="L13604" class="LineNr">13604 </span> 0x11/imm32/alloc-id:fake +<span id="L13605" class="LineNr">13605 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13606" class="LineNr">13606 </span> 0x11/imm32/alloc-id:fake +<span id="L13607" class="LineNr">13607 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13608" class="LineNr">13608 </span> 0x11/imm32/alloc-id:fake +<span id="L13609" class="LineNr">13609 </span> <span class="SpecialChar"><a href='mu.subx.html#L15547'>Single-int-var-in-esi</a></span>/imm32/outputs <span id="L13610" class="LineNr">13610 </span> 0x11/imm32/alloc-id:fake -<span id="L13611" class="LineNr">13611 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13612" class="LineNr">13612 </span> 0x11/imm32/alloc-id:fake -<span id="L13613" class="LineNr">13613 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13614" class="LineNr">13614 </span> 0x11/imm32/alloc-id:fake -<span id="L13615" class="LineNr">13615 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13616" class="LineNr">13616 </span> 0x11/imm32/alloc-id:fake -<span id="L13617" class="LineNr">13617 </span> <a href='mu.subx.html#L15211'>_string_89_<-</a>/imm32/subx-name -<span id="L13618" class="LineNr">13618 </span> 3/imm32/rm32-is-first-output -<span id="L13619" class="LineNr">13619 </span> 1/imm32/r32-is-first-inout -<span id="L13620" class="LineNr">13620 </span> 0/imm32/no-imm32 -<span id="L13621" class="LineNr">13621 </span> 0/imm32/no-disp32 -<span id="L13622" class="LineNr">13622 </span> 1/imm32/output-is-write-only -<span id="L13623" class="LineNr">13623 </span> 0x11/imm32/alloc-id:fake -<span id="L13624" class="LineNr">13624 </span> <a href='mu.subx.html#L13625'>_Primitive-copy-reg-to-mem</a>/imm32/next -<span id="L13625" class="LineNr">13625 </span><span class="subxMinorFunction">_Primitive-copy-reg-to-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13626" class="LineNr">13626 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13627" class="LineNr">13627 </span> <span class="subxComment"># copy-to var1 var2/reg => 89/<- var1 var2/r32</span> +<span id="L13611" class="LineNr">13611 </span> <a href='mu.subx.html#L15286'>_string_be_copy_to_esi</a>/imm32/subx-name +<span id="L13612" class="LineNr">13612 </span> 0/imm32/no-rm32 +<span id="L13613" class="LineNr">13613 </span> 0/imm32/no-r32 +<span id="L13614" class="LineNr">13614 </span> 1/imm32/imm32-is-first-inout +<span id="L13615" class="LineNr">13615 </span> 0/imm32/no-disp32 +<span id="L13616" class="LineNr">13616 </span> 1/imm32/output-is-write-only +<span id="L13617" class="LineNr">13617 </span> 0x11/imm32/alloc-id:fake +<span id="L13618" class="LineNr">13618 </span> <a href='mu.subx.html#L13619'>_Primitive-copy-to-edi</a>/imm32/next +<span id="L13619" class="LineNr">13619 </span><span class="subxMinorFunction">_Primitive-copy-to-edi</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13620" class="LineNr">13620 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13621" class="LineNr">13621 </span> <span class="subxComment"># var/edi <- copy lit => bf/copy-to-edi lit/imm32</span> +<span id="L13622" class="LineNr">13622 </span> 0x11/imm32/alloc-id:fake +<span id="L13623" class="LineNr">13623 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13624" class="LineNr">13624 </span> 0x11/imm32/alloc-id:fake +<span id="L13625" class="LineNr">13625 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13626" class="LineNr">13626 </span> 0x11/imm32/alloc-id:fake +<span id="L13627" class="LineNr">13627 </span> <span class="SpecialChar"><a href='mu.subx.html#L15565'>Single-int-var-in-edi</a></span>/imm32/outputs <span id="L13628" class="LineNr">13628 </span> 0x11/imm32/alloc-id:fake -<span id="L13629" class="LineNr">13629 </span> <a href='mu.subx.html#L14759'>_string-copy-to</a>/imm32/name -<span id="L13630" class="LineNr">13630 </span> 0x11/imm32/alloc-id:fake -<span id="L13631" class="LineNr">13631 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13632" class="LineNr">13632 </span> 0/imm32/no-outputs -<span id="L13633" class="LineNr">13633 </span> 0/imm32/no-outputs -<span id="L13634" class="LineNr">13634 </span> 0x11/imm32/alloc-id:fake -<span id="L13635" class="LineNr">13635 </span> <a href='mu.subx.html#L15211'>_string_89_<-</a>/imm32/subx-name -<span id="L13636" class="LineNr">13636 </span> 1/imm32/rm32-is-first-inout -<span id="L13637" class="LineNr">13637 </span> 2/imm32/r32-is-second-inout -<span id="L13638" class="LineNr">13638 </span> 0/imm32/no-imm32 -<span id="L13639" class="LineNr">13639 </span> 0/imm32/no-disp32 -<span id="L13640" class="LineNr">13640 </span> 1/imm32/output-is-write-only -<span id="L13641" class="LineNr">13641 </span> 0x11/imm32/alloc-id:fake -<span id="L13642" class="LineNr">13642 </span> <a href='mu.subx.html#L13643'>_Primitive-copy-mem-to-reg</a>/imm32/next -<span id="L13643" class="LineNr">13643 </span><span class="subxMinorFunction">_Primitive-copy-mem-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13644" class="LineNr">13644 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13645" class="LineNr">13645 </span> <span class="subxComment"># var1/reg <- copy var2 => 8b/-> var2/rm32 var1/r32</span> +<span id="L13629" class="LineNr">13629 </span> <a href='mu.subx.html#L15291'>_string_bf_copy_to_edi</a>/imm32/subx-name +<span id="L13630" class="LineNr">13630 </span> 0/imm32/no-rm32 +<span id="L13631" class="LineNr">13631 </span> 0/imm32/no-r32 +<span id="L13632" class="LineNr">13632 </span> 1/imm32/imm32-is-first-inout +<span id="L13633" class="LineNr">13633 </span> 0/imm32/no-disp32 +<span id="L13634" class="LineNr">13634 </span> 1/imm32/output-is-write-only +<span id="L13635" class="LineNr">13635 </span> 0x11/imm32/alloc-id:fake +<span id="L13636" class="LineNr">13636 </span> <a href='mu.subx.html#L13637'>_Primitive-copy-reg-to-reg</a>/imm32/next +<span id="L13637" class="LineNr">13637 </span><span class="subxMinorFunction">_Primitive-copy-reg-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13638" class="LineNr">13638 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13639" class="LineNr">13639 </span> <span class="subxComment"># var1/reg <- copy var2/reg => 89/<- var1/rm32 var2/r32</span> +<span id="L13640" class="LineNr">13640 </span> 0x11/imm32/alloc-id:fake +<span id="L13641" class="LineNr">13641 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13642" class="LineNr">13642 </span> 0x11/imm32/alloc-id:fake +<span id="L13643" class="LineNr">13643 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13644" class="LineNr">13644 </span> 0x11/imm32/alloc-id:fake +<span id="L13645" class="LineNr">13645 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13646" class="LineNr">13646 </span> 0x11/imm32/alloc-id:fake -<span id="L13647" class="LineNr">13647 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13648" class="LineNr">13648 </span> 0x11/imm32/alloc-id:fake -<span id="L13649" class="LineNr">13649 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13650" class="LineNr">13650 </span> 0x11/imm32/alloc-id:fake -<span id="L13651" class="LineNr">13651 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13652" class="LineNr">13652 </span> 0x11/imm32/alloc-id:fake -<span id="L13653" class="LineNr">13653 </span> <a href='mu.subx.html#L15216'>_string_8b_-></a>/imm32/subx-name -<span id="L13654" class="LineNr">13654 </span> 1/imm32/rm32-is-first-inout -<span id="L13655" class="LineNr">13655 </span> 3/imm32/r32-is-first-output -<span id="L13656" class="LineNr">13656 </span> 0/imm32/no-imm32 -<span id="L13657" class="LineNr">13657 </span> 0/imm32/no-disp32 -<span id="L13658" class="LineNr">13658 </span> 1/imm32/output-is-write-only -<span id="L13659" class="LineNr">13659 </span> 0x11/imm32/alloc-id:fake -<span id="L13660" class="LineNr">13660 </span> <a href='mu.subx.html#L13661'>_Primitive-copy-lit-to-reg</a>/imm32/next -<span id="L13661" class="LineNr">13661 </span><span class="subxMinorFunction">_Primitive-copy-lit-to-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13662" class="LineNr">13662 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13663" class="LineNr">13663 </span> <span class="subxComment"># var1/reg <- copy lit => c7 0/subop/copy var1/rm32 lit/imm32</span> +<span id="L13647" class="LineNr">13647 </span> <a href='mu.subx.html#L15241'>_string_89_<-</a>/imm32/subx-name +<span id="L13648" class="LineNr">13648 </span> 3/imm32/rm32-is-first-output +<span id="L13649" class="LineNr">13649 </span> 1/imm32/r32-is-first-inout +<span id="L13650" class="LineNr">13650 </span> 0/imm32/no-imm32 +<span id="L13651" class="LineNr">13651 </span> 0/imm32/no-disp32 +<span id="L13652" class="LineNr">13652 </span> 1/imm32/output-is-write-only +<span id="L13653" class="LineNr">13653 </span> 0x11/imm32/alloc-id:fake +<span id="L13654" class="LineNr">13654 </span> <a href='mu.subx.html#L13655'>_Primitive-copy-reg-to-mem</a>/imm32/next +<span id="L13655" class="LineNr">13655 </span><span class="subxMinorFunction">_Primitive-copy-reg-to-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13656" class="LineNr">13656 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13657" class="LineNr">13657 </span> <span class="subxComment"># copy-to var1 var2/reg => 89/<- var1 var2/r32</span> +<span id="L13658" class="LineNr">13658 </span> 0x11/imm32/alloc-id:fake +<span id="L13659" class="LineNr">13659 </span> <a href='mu.subx.html#L14789'>_string-copy-to</a>/imm32/name +<span id="L13660" class="LineNr">13660 </span> 0x11/imm32/alloc-id:fake +<span id="L13661" class="LineNr">13661 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13662" class="LineNr">13662 </span> 0/imm32/no-outputs +<span id="L13663" class="LineNr">13663 </span> 0/imm32/no-outputs <span id="L13664" class="LineNr">13664 </span> 0x11/imm32/alloc-id:fake -<span id="L13665" class="LineNr">13665 </span> <a href='mu.subx.html#L14754'>_string-copy</a>/imm32/name -<span id="L13666" class="LineNr">13666 </span> 0x11/imm32/alloc-id:fake -<span id="L13667" class="LineNr">13667 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L13668" class="LineNr">13668 </span> 0x11/imm32/alloc-id:fake -<span id="L13669" class="LineNr">13669 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs -<span id="L13670" class="LineNr">13670 </span> 0x11/imm32/alloc-id:fake -<span id="L13671" class="LineNr">13671 </span> <a href='mu.subx.html#L15266'>_string_c7_subop_copy</a>/imm32/subx-name -<span id="L13672" class="LineNr">13672 </span> 3/imm32/rm32-is-first-output -<span id="L13673" class="LineNr">13673 </span> 0/imm32/no-r32 -<span id="L13674" class="LineNr">13674 </span> 1/imm32/imm32-is-first-inout -<span id="L13675" class="LineNr">13675 </span> 0/imm32/no-disp32 -<span id="L13676" class="LineNr">13676 </span> 1/imm32/output-is-write-only -<span id="L13677" class="LineNr">13677 </span> 0x11/imm32/alloc-id:fake -<span id="L13678" class="LineNr">13678 </span> <a href='mu.subx.html#L13679'>_Primitive-copy-lit-to-mem</a>/imm32/next -<span id="L13679" class="LineNr">13679 </span><span class="subxMinorFunction">_Primitive-copy-lit-to-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13680" class="LineNr">13680 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13681" class="LineNr">13681 </span> <span class="subxComment"># copy-to var1, lit => c7 0/subop/copy var1/rm32 lit/imm32</span> +<span id="L13665" class="LineNr">13665 </span> <a href='mu.subx.html#L15241'>_string_89_<-</a>/imm32/subx-name +<span id="L13666" class="LineNr">13666 </span> 1/imm32/rm32-is-first-inout +<span id="L13667" class="LineNr">13667 </span> 2/imm32/r32-is-second-inout +<span id="L13668" class="LineNr">13668 </span> 0/imm32/no-imm32 +<span id="L13669" class="LineNr">13669 </span> 0/imm32/no-disp32 +<span id="L13670" class="LineNr">13670 </span> 1/imm32/output-is-write-only +<span id="L13671" class="LineNr">13671 </span> 0x11/imm32/alloc-id:fake +<span id="L13672" class="LineNr">13672 </span> <a href='mu.subx.html#L13673'>_Primitive-copy-mem-to-reg</a>/imm32/next +<span id="L13673" class="LineNr">13673 </span><span class="subxMinorFunction">_Primitive-copy-mem-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13674" class="LineNr">13674 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13675" class="LineNr">13675 </span> <span class="subxComment"># var1/reg <- copy var2 => 8b/-> var2/rm32 var1/r32</span> +<span id="L13676" class="LineNr">13676 </span> 0x11/imm32/alloc-id:fake +<span id="L13677" class="LineNr">13677 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13678" class="LineNr">13678 </span> 0x11/imm32/alloc-id:fake +<span id="L13679" class="LineNr">13679 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13680" class="LineNr">13680 </span> 0x11/imm32/alloc-id:fake +<span id="L13681" class="LineNr">13681 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13682" class="LineNr">13682 </span> 0x11/imm32/alloc-id:fake -<span id="L13683" class="LineNr">13683 </span> <a href='mu.subx.html#L14759'>_string-copy-to</a>/imm32/name -<span id="L13684" class="LineNr">13684 </span> 0x11/imm32/alloc-id:fake -<span id="L13685" class="LineNr">13685 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13686" class="LineNr">13686 </span> 0/imm32/no-outputs -<span id="L13687" class="LineNr">13687 </span> 0/imm32/no-outputs -<span id="L13688" class="LineNr">13688 </span> 0x11/imm32/alloc-id:fake -<span id="L13689" class="LineNr">13689 </span> <a href='mu.subx.html#L15266'>_string_c7_subop_copy</a>/imm32/subx-name -<span id="L13690" class="LineNr">13690 </span> 1/imm32/rm32-is-first-inout -<span id="L13691" class="LineNr">13691 </span> 0/imm32/no-r32 -<span id="L13692" class="LineNr">13692 </span> 2/imm32/imm32-is-first-inout -<span id="L13693" class="LineNr">13693 </span> 0/imm32/no-disp32 -<span id="L13694" class="LineNr">13694 </span> 1/imm32/output-is-write-only -<span id="L13695" class="LineNr">13695 </span> 0x11/imm32/alloc-id:fake -<span id="L13696" class="LineNr">13696 </span> <a href='mu.subx.html#L13698'>_Primitive-copy-byte-from-reg</a>/imm32/next -<span id="L13697" class="LineNr">13697 </span><span class="subxH1Comment"># - copy byte</span> -<span id="L13698" class="LineNr">13698 </span><span class="subxMinorFunction">_Primitive-copy-byte-from-reg</span>: -<span id="L13699" class="LineNr">13699 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13700" class="LineNr">13700 </span> <span class="subxComment"># var/reg <- copy-byte var2/reg2 => 8a/byte-> %var2 var/r32</span> -<span id="L13701" class="LineNr">13701 </span> 0x11/imm32/alloc-id:fake -<span id="L13702" class="LineNr">13702 </span> <a href='mu.subx.html#L14764'>_string-copy-byte</a>/imm32/name -<span id="L13703" class="LineNr">13703 </span> 0x11/imm32/alloc-id:fake -<span id="L13704" class="LineNr">13704 </span> <span class="SpecialChar"><a href='mu.subx.html#L15399'>Single-byte-var-in-some-register</a></span>/imm32/inouts -<span id="L13705" class="LineNr">13705 </span> 0x11/imm32/alloc-id:fake -<span id="L13706" class="LineNr">13706 </span> <span class="SpecialChar"><a href='mu.subx.html#L15399'>Single-byte-var-in-some-register</a></span>/imm32/outputs +<span id="L13683" class="LineNr">13683 </span> <a href='mu.subx.html#L15246'>_string_8b_-></a>/imm32/subx-name +<span id="L13684" class="LineNr">13684 </span> 1/imm32/rm32-is-first-inout +<span id="L13685" class="LineNr">13685 </span> 3/imm32/r32-is-first-output +<span id="L13686" class="LineNr">13686 </span> 0/imm32/no-imm32 +<span id="L13687" class="LineNr">13687 </span> 0/imm32/no-disp32 +<span id="L13688" class="LineNr">13688 </span> 1/imm32/output-is-write-only +<span id="L13689" class="LineNr">13689 </span> 0x11/imm32/alloc-id:fake +<span id="L13690" class="LineNr">13690 </span> <a href='mu.subx.html#L13691'>_Primitive-copy-lit-to-reg</a>/imm32/next +<span id="L13691" class="LineNr">13691 </span><span class="subxMinorFunction">_Primitive-copy-lit-to-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13692" class="LineNr">13692 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13693" class="LineNr">13693 </span> <span class="subxComment"># var1/reg <- copy lit => c7 0/subop/copy var1/rm32 lit/imm32</span> +<span id="L13694" class="LineNr">13694 </span> 0x11/imm32/alloc-id:fake +<span id="L13695" class="LineNr">13695 </span> <a href='mu.subx.html#L14784'>_string-copy</a>/imm32/name +<span id="L13696" class="LineNr">13696 </span> 0x11/imm32/alloc-id:fake +<span id="L13697" class="LineNr">13697 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L13698" class="LineNr">13698 </span> 0x11/imm32/alloc-id:fake +<span id="L13699" class="LineNr">13699 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13700" class="LineNr">13700 </span> 0x11/imm32/alloc-id:fake +<span id="L13701" class="LineNr">13701 </span> <a href='mu.subx.html#L15296'>_string_c7_subop_copy</a>/imm32/subx-name +<span id="L13702" class="LineNr">13702 </span> 3/imm32/rm32-is-first-output +<span id="L13703" class="LineNr">13703 </span> 0/imm32/no-r32 +<span id="L13704" class="LineNr">13704 </span> 1/imm32/imm32-is-first-inout +<span id="L13705" class="LineNr">13705 </span> 0/imm32/no-disp32 +<span id="L13706" class="LineNr">13706 </span> 1/imm32/output-is-write-only <span id="L13707" class="LineNr">13707 </span> 0x11/imm32/alloc-id:fake -<span id="L13708" class="LineNr">13708 </span> <a href='mu.subx.html#L15221'>_string_8a_copy_byte</a>/imm32/subx-name -<span id="L13709" class="LineNr">13709 </span> 1/imm32/rm32-is-first-inout -<span id="L13710" class="LineNr">13710 </span> 3/imm32/r32-is-first-output -<span id="L13711" class="LineNr">13711 </span> 0/imm32/no-imm32 -<span id="L13712" class="LineNr">13712 </span> 0/imm32/no-disp32 -<span id="L13713" class="LineNr">13713 </span> 1/imm32/output-is-write-only +<span id="L13708" class="LineNr">13708 </span> <a href='mu.subx.html#L13709'>_Primitive-copy-lit-to-mem</a>/imm32/next +<span id="L13709" class="LineNr">13709 </span><span class="subxMinorFunction">_Primitive-copy-lit-to-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13710" class="LineNr">13710 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13711" class="LineNr">13711 </span> <span class="subxComment"># copy-to var1, lit => c7 0/subop/copy var1/rm32 lit/imm32</span> +<span id="L13712" class="LineNr">13712 </span> 0x11/imm32/alloc-id:fake +<span id="L13713" class="LineNr">13713 </span> <a href='mu.subx.html#L14789'>_string-copy-to</a>/imm32/name <span id="L13714" class="LineNr">13714 </span> 0x11/imm32/alloc-id:fake -<span id="L13715" class="LineNr">13715 </span> <a href='mu.subx.html#L13716'>_Primitive-copy-byte-from-mem</a>/imm32/next -<span id="L13716" class="LineNr">13716 </span><span class="subxMinorFunction">_Primitive-copy-byte-from-mem</span>: -<span id="L13717" class="LineNr">13717 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13718" class="LineNr">13718 </span> <span class="subxComment"># var/reg <- copy-byte *var2/reg2 => 8a/byte-> *var2 var/r32</span> -<span id="L13719" class="LineNr">13719 </span> 0x11/imm32/alloc-id:fake -<span id="L13720" class="LineNr">13720 </span> <a href='mu.subx.html#L14764'>_string-copy-byte</a>/imm32/name -<span id="L13721" class="LineNr">13721 </span> 0x11/imm32/alloc-id:fake -<span id="L13722" class="LineNr">13722 </span> <span class="SpecialChar"><a href='mu.subx.html#L15316'>Single-byte-var-in-mem</a></span>/imm32/inouts -<span id="L13723" class="LineNr">13723 </span> 0x11/imm32/alloc-id:fake -<span id="L13724" class="LineNr">13724 </span> <span class="SpecialChar"><a href='mu.subx.html#L15399'>Single-byte-var-in-some-register</a></span>/imm32/outputs +<span id="L13715" class="LineNr">13715 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13716" class="LineNr">13716 </span> 0/imm32/no-outputs +<span id="L13717" class="LineNr">13717 </span> 0/imm32/no-outputs +<span id="L13718" class="LineNr">13718 </span> 0x11/imm32/alloc-id:fake +<span id="L13719" class="LineNr">13719 </span> <a href='mu.subx.html#L15296'>_string_c7_subop_copy</a>/imm32/subx-name +<span id="L13720" class="LineNr">13720 </span> 1/imm32/rm32-is-first-inout +<span id="L13721" class="LineNr">13721 </span> 0/imm32/no-r32 +<span id="L13722" class="LineNr">13722 </span> 2/imm32/imm32-is-first-inout +<span id="L13723" class="LineNr">13723 </span> 0/imm32/no-disp32 +<span id="L13724" class="LineNr">13724 </span> 1/imm32/output-is-write-only <span id="L13725" class="LineNr">13725 </span> 0x11/imm32/alloc-id:fake -<span id="L13726" class="LineNr">13726 </span> <a href='mu.subx.html#L15221'>_string_8a_copy_byte</a>/imm32/subx-name -<span id="L13727" class="LineNr">13727 </span> 1/imm32/rm32-is-first-inout -<span id="L13728" class="LineNr">13728 </span> 3/imm32/r32-is-first-output -<span id="L13729" class="LineNr">13729 </span> 0/imm32/no-imm32 -<span id="L13730" class="LineNr">13730 </span> 0/imm32/no-disp32 -<span id="L13731" class="LineNr">13731 </span> 1/imm32/output-is-write-only -<span id="L13732" class="LineNr">13732 </span> 0x11/imm32/alloc-id:fake -<span id="L13733" class="LineNr">13733 </span> <a href='mu.subx.html#L13734'>_Primitive-copy-byte-to-mem</a>/imm32/next -<span id="L13734" class="LineNr">13734 </span><span class="subxMinorFunction">_Primitive-copy-byte-to-mem</span>: -<span id="L13735" class="LineNr">13735 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13736" class="LineNr">13736 </span> <span class="subxComment"># copy-byte-to *var1/reg1, var2/reg2 => 88/byte<- *reg1 reg2/r32</span> +<span id="L13726" class="LineNr">13726 </span> <a href='mu.subx.html#L13728'>_Primitive-copy-byte-from-reg</a>/imm32/next +<span id="L13727" class="LineNr">13727 </span><span class="subxH1Comment"># - copy byte</span> +<span id="L13728" class="LineNr">13728 </span><span class="subxMinorFunction">_Primitive-copy-byte-from-reg</span>: +<span id="L13729" class="LineNr">13729 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13730" class="LineNr">13730 </span> <span class="subxComment"># var/reg <- copy-byte var2/reg2 => 8a/byte-> %var2 var/r32</span> +<span id="L13731" class="LineNr">13731 </span> 0x11/imm32/alloc-id:fake +<span id="L13732" class="LineNr">13732 </span> <a href='mu.subx.html#L14794'>_string-copy-byte</a>/imm32/name +<span id="L13733" class="LineNr">13733 </span> 0x11/imm32/alloc-id:fake +<span id="L13734" class="LineNr">13734 </span> <span class="SpecialChar"><a href='mu.subx.html#L15429'>Single-byte-var-in-some-register</a></span>/imm32/inouts +<span id="L13735" class="LineNr">13735 </span> 0x11/imm32/alloc-id:fake +<span id="L13736" class="LineNr">13736 </span> <span class="SpecialChar"><a href='mu.subx.html#L15429'>Single-byte-var-in-some-register</a></span>/imm32/outputs <span id="L13737" class="LineNr">13737 </span> 0x11/imm32/alloc-id:fake -<span id="L13738" class="LineNr">13738 </span> <a href='mu.subx.html#L14769'>_string-copy-byte-to</a>/imm32/name -<span id="L13739" class="LineNr">13739 </span> 0x11/imm32/alloc-id:fake -<span id="L13740" class="LineNr">13740 </span> <span class="SpecialChar"><a href='mu.subx.html#L15350'>Two-args-byte-stack-byte-reg</a></span>/imm32/inouts -<span id="L13741" class="LineNr">13741 </span> 0/imm32/no-outputs -<span id="L13742" class="LineNr">13742 </span> 0/imm32/no-outputs -<span id="L13743" class="LineNr">13743 </span> 0x11/imm32/alloc-id:fake -<span id="L13744" class="LineNr">13744 </span> <a href='mu.subx.html#L15226'>_string_88_copy_byte</a>/imm32/subx-name -<span id="L13745" class="LineNr">13745 </span> 1/imm32/rm32-is-first-inout -<span id="L13746" class="LineNr">13746 </span> 2/imm32/r32-is-second-inout -<span id="L13747" class="LineNr">13747 </span> 0/imm32/no-imm32 -<span id="L13748" class="LineNr">13748 </span> 0/imm32/no-disp32 -<span id="L13749" class="LineNr">13749 </span> 0/imm32/output-is-write-only -<span id="L13750" class="LineNr">13750 </span> 0x11/imm32/alloc-id:fake -<span id="L13751" class="LineNr">13751 </span> <a href='mu.subx.html#L13753'>_Primitive-address</a>/imm32/next -<span id="L13752" class="LineNr">13752 </span><span class="subxH1Comment"># - address</span> -<span id="L13753" class="LineNr">13753 </span><span class="subxMinorFunction">_Primitive-address</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13754" class="LineNr">13754 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13755" class="LineNr">13755 </span> <span class="subxComment"># var1/reg <- address var2 => 8d/copy-address var2/rm32 var1/r32</span> -<span id="L13756" class="LineNr">13756 </span> 0x11/imm32/alloc-id:fake -<span id="L13757" class="LineNr">13757 </span> <a href='mu.subx.html#L14674'>_string-address</a>/imm32/name -<span id="L13758" class="LineNr">13758 </span> 0x11/imm32/alloc-id:fake -<span id="L13759" class="LineNr">13759 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13760" class="LineNr">13760 </span> 0x11/imm32/alloc-id:fake -<span id="L13761" class="LineNr">13761 </span> <span class="SpecialChar"><a href='mu.subx.html#L15392'>Single-addr-var-in-some-register</a></span>/imm32/outputs +<span id="L13738" class="LineNr">13738 </span> <a href='mu.subx.html#L15251'>_string_8a_copy_byte</a>/imm32/subx-name +<span id="L13739" class="LineNr">13739 </span> 1/imm32/rm32-is-first-inout +<span id="L13740" class="LineNr">13740 </span> 3/imm32/r32-is-first-output +<span id="L13741" class="LineNr">13741 </span> 0/imm32/no-imm32 +<span id="L13742" class="LineNr">13742 </span> 0/imm32/no-disp32 +<span id="L13743" class="LineNr">13743 </span> 1/imm32/output-is-write-only +<span id="L13744" class="LineNr">13744 </span> 0x11/imm32/alloc-id:fake +<span id="L13745" class="LineNr">13745 </span> <a href='mu.subx.html#L13746'>_Primitive-copy-byte-from-mem</a>/imm32/next +<span id="L13746" class="LineNr">13746 </span><span class="subxMinorFunction">_Primitive-copy-byte-from-mem</span>: +<span id="L13747" class="LineNr">13747 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13748" class="LineNr">13748 </span> <span class="subxComment"># var/reg <- copy-byte *var2/reg2 => 8a/byte-> *var2 var/r32</span> +<span id="L13749" class="LineNr">13749 </span> 0x11/imm32/alloc-id:fake +<span id="L13750" class="LineNr">13750 </span> <a href='mu.subx.html#L14794'>_string-copy-byte</a>/imm32/name +<span id="L13751" class="LineNr">13751 </span> 0x11/imm32/alloc-id:fake +<span id="L13752" class="LineNr">13752 </span> <span class="SpecialChar"><a href='mu.subx.html#L15346'>Single-byte-var-in-mem</a></span>/imm32/inouts +<span id="L13753" class="LineNr">13753 </span> 0x11/imm32/alloc-id:fake +<span id="L13754" class="LineNr">13754 </span> <span class="SpecialChar"><a href='mu.subx.html#L15429'>Single-byte-var-in-some-register</a></span>/imm32/outputs +<span id="L13755" class="LineNr">13755 </span> 0x11/imm32/alloc-id:fake +<span id="L13756" class="LineNr">13756 </span> <a href='mu.subx.html#L15251'>_string_8a_copy_byte</a>/imm32/subx-name +<span id="L13757" class="LineNr">13757 </span> 1/imm32/rm32-is-first-inout +<span id="L13758" class="LineNr">13758 </span> 3/imm32/r32-is-first-output +<span id="L13759" class="LineNr">13759 </span> 0/imm32/no-imm32 +<span id="L13760" class="LineNr">13760 </span> 0/imm32/no-disp32 +<span id="L13761" class="LineNr">13761 </span> 1/imm32/output-is-write-only <span id="L13762" class="LineNr">13762 </span> 0x11/imm32/alloc-id:fake -<span id="L13763" class="LineNr">13763 </span> <a href='mu.subx.html#L15231'>_string_8d_copy_address</a>/imm32/subx-name -<span id="L13764" class="LineNr">13764 </span> 1/imm32/rm32-is-first-inout -<span id="L13765" class="LineNr">13765 </span> 3/imm32/r32-is-first-output -<span id="L13766" class="LineNr">13766 </span> 0/imm32/no-imm32 -<span id="L13767" class="LineNr">13767 </span> 0/imm32/no-disp32 -<span id="L13768" class="LineNr">13768 </span> 1/imm32/output-is-write-only +<span id="L13763" class="LineNr">13763 </span> <a href='mu.subx.html#L13764'>_Primitive-copy-byte-to-mem</a>/imm32/next +<span id="L13764" class="LineNr">13764 </span><span class="subxMinorFunction">_Primitive-copy-byte-to-mem</span>: +<span id="L13765" class="LineNr">13765 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13766" class="LineNr">13766 </span> <span class="subxComment"># copy-byte-to *var1/reg1, var2/reg2 => 88/byte<- *reg1 reg2/r32</span> +<span id="L13767" class="LineNr">13767 </span> 0x11/imm32/alloc-id:fake +<span id="L13768" class="LineNr">13768 </span> <a href='mu.subx.html#L14799'>_string-copy-byte-to</a>/imm32/name <span id="L13769" class="LineNr">13769 </span> 0x11/imm32/alloc-id:fake -<span id="L13770" class="LineNr">13770 </span> <a href='mu.subx.html#L13772'>_Primitive-compare-reg-with-reg</a>/imm32/next -<span id="L13771" class="LineNr">13771 </span><span class="subxH1Comment"># - compare</span> -<span id="L13772" class="LineNr">13772 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13773" class="LineNr">13773 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13774" class="LineNr">13774 </span> <span class="subxComment"># compare var1/reg1 var2/reg2 => 39/compare var1/rm32 var2/r32</span> -<span id="L13775" class="LineNr">13775 </span> 0x11/imm32/alloc-id:fake -<span id="L13776" class="LineNr">13776 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13777" class="LineNr">13777 </span> 0x11/imm32/alloc-id:fake -<span id="L13778" class="LineNr">13778 </span> <span class="SpecialChar"><a href='mu.subx.html#L15342'>Two-int-args-in-regs</a></span>/imm32/inouts -<span id="L13779" class="LineNr">13779 </span> 0/imm32/no-outputs -<span id="L13780" class="LineNr">13780 </span> 0/imm32/no-outputs -<span id="L13781" class="LineNr">13781 </span> 0x11/imm32/alloc-id:fake -<span id="L13782" class="LineNr">13782 </span> <a href='mu.subx.html#L15106'>_string_39_compare-></a>/imm32/subx-name -<span id="L13783" class="LineNr">13783 </span> 1/imm32/rm32-is-first-inout -<span id="L13784" class="LineNr">13784 </span> 2/imm32/r32-is-second-inout -<span id="L13785" class="LineNr">13785 </span> 0/imm32/no-imm32 -<span id="L13786" class="LineNr">13786 </span> 0/imm32/no-disp32 -<span id="L13787" class="LineNr">13787 </span> 0/imm32/output-is-write-only +<span id="L13770" class="LineNr">13770 </span> <span class="SpecialChar"><a href='mu.subx.html#L15380'>Two-args-byte-stack-byte-reg</a></span>/imm32/inouts +<span id="L13771" class="LineNr">13771 </span> 0/imm32/no-outputs +<span id="L13772" class="LineNr">13772 </span> 0/imm32/no-outputs +<span id="L13773" class="LineNr">13773 </span> 0x11/imm32/alloc-id:fake +<span id="L13774" class="LineNr">13774 </span> <a href='mu.subx.html#L15256'>_string_88_copy_byte</a>/imm32/subx-name +<span id="L13775" class="LineNr">13775 </span> 1/imm32/rm32-is-first-inout +<span id="L13776" class="LineNr">13776 </span> 2/imm32/r32-is-second-inout +<span id="L13777" class="LineNr">13777 </span> 0/imm32/no-imm32 +<span id="L13778" class="LineNr">13778 </span> 0/imm32/no-disp32 +<span id="L13779" class="LineNr">13779 </span> 0/imm32/output-is-write-only +<span id="L13780" class="LineNr">13780 </span> 0x11/imm32/alloc-id:fake +<span id="L13781" class="LineNr">13781 </span> <a href='mu.subx.html#L13783'>_Primitive-address</a>/imm32/next +<span id="L13782" class="LineNr">13782 </span><span class="subxH1Comment"># - address</span> +<span id="L13783" class="LineNr">13783 </span><span class="subxMinorFunction">_Primitive-address</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13784" class="LineNr">13784 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13785" class="LineNr">13785 </span> <span class="subxComment"># var1/reg <- address var2 => 8d/copy-address var2/rm32 var1/r32</span> +<span id="L13786" class="LineNr">13786 </span> 0x11/imm32/alloc-id:fake +<span id="L13787" class="LineNr">13787 </span> <a href='mu.subx.html#L14704'>_string-address</a>/imm32/name <span id="L13788" class="LineNr">13788 </span> 0x11/imm32/alloc-id:fake -<span id="L13789" class="LineNr">13789 </span> <a href='mu.subx.html#L13790'>_Primitive-compare-mem-with-reg</a>/imm32/next -<span id="L13790" class="LineNr">13790 </span><span class="subxMinorFunction">_Primitive-compare-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13791" class="LineNr">13791 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13792" class="LineNr">13792 </span> <span class="subxComment"># compare var1 var2/reg => 39/compare var1/rm32 var2/r32</span> -<span id="L13793" class="LineNr">13793 </span> 0x11/imm32/alloc-id:fake -<span id="L13794" class="LineNr">13794 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13795" class="LineNr">13795 </span> 0x11/imm32/alloc-id:fake -<span id="L13796" class="LineNr">13796 </span> <span class="SpecialChar"><a href='mu.subx.html#L15335'>Two-args-int-stack-int-reg</a></span>/imm32/inouts -<span id="L13797" class="LineNr">13797 </span> 0/imm32/no-outputs -<span id="L13798" class="LineNr">13798 </span> 0/imm32/no-outputs +<span id="L13789" class="LineNr">13789 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13790" class="LineNr">13790 </span> 0x11/imm32/alloc-id:fake +<span id="L13791" class="LineNr">13791 </span> <span class="SpecialChar"><a href='mu.subx.html#L15422'>Single-addr-var-in-some-register</a></span>/imm32/outputs +<span id="L13792" class="LineNr">13792 </span> 0x11/imm32/alloc-id:fake +<span id="L13793" class="LineNr">13793 </span> <a href='mu.subx.html#L15261'>_string_8d_copy_address</a>/imm32/subx-name +<span id="L13794" class="LineNr">13794 </span> 1/imm32/rm32-is-first-inout +<span id="L13795" class="LineNr">13795 </span> 3/imm32/r32-is-first-output +<span id="L13796" class="LineNr">13796 </span> 0/imm32/no-imm32 +<span id="L13797" class="LineNr">13797 </span> 0/imm32/no-disp32 +<span id="L13798" class="LineNr">13798 </span> 1/imm32/output-is-write-only <span id="L13799" class="LineNr">13799 </span> 0x11/imm32/alloc-id:fake -<span id="L13800" class="LineNr">13800 </span> <a href='mu.subx.html#L15106'>_string_39_compare-></a>/imm32/subx-name -<span id="L13801" class="LineNr">13801 </span> 1/imm32/rm32-is-first-inout -<span id="L13802" class="LineNr">13802 </span> 2/imm32/r32-is-second-inout -<span id="L13803" class="LineNr">13803 </span> 0/imm32/no-imm32 -<span id="L13804" class="LineNr">13804 </span> 0/imm32/no-disp32 -<span id="L13805" class="LineNr">13805 </span> 0/imm32/output-is-write-only -<span id="L13806" class="LineNr">13806 </span> 0x11/imm32/alloc-id:fake -<span id="L13807" class="LineNr">13807 </span> <a href='mu.subx.html#L13808'>_Primitive-compare-reg-with-mem</a>/imm32/next -<span id="L13808" class="LineNr">13808 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13809" class="LineNr">13809 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13810" class="LineNr">13810 </span> <span class="subxComment"># compare var1/reg var2 => 3b/compare<- var2/rm32 var1/r32</span> +<span id="L13800" class="LineNr">13800 </span> <a href='mu.subx.html#L13802'>_Primitive-compare-reg-with-reg</a>/imm32/next +<span id="L13801" class="LineNr">13801 </span><span class="subxH1Comment"># - compare</span> +<span id="L13802" class="LineNr">13802 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13803" class="LineNr">13803 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13804" class="LineNr">13804 </span> <span class="subxComment"># compare var1/reg1 var2/reg2 => 39/compare var1/rm32 var2/r32</span> +<span id="L13805" class="LineNr">13805 </span> 0x11/imm32/alloc-id:fake +<span id="L13806" class="LineNr">13806 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name +<span id="L13807" class="LineNr">13807 </span> 0x11/imm32/alloc-id:fake +<span id="L13808" class="LineNr">13808 </span> <span class="SpecialChar"><a href='mu.subx.html#L15372'>Two-int-args-in-regs</a></span>/imm32/inouts +<span id="L13809" class="LineNr">13809 </span> 0/imm32/no-outputs +<span id="L13810" class="LineNr">13810 </span> 0/imm32/no-outputs <span id="L13811" class="LineNr">13811 </span> 0x11/imm32/alloc-id:fake -<span id="L13812" class="LineNr">13812 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13813" class="LineNr">13813 </span> 0x11/imm32/alloc-id:fake -<span id="L13814" class="LineNr">13814 </span> <span class="SpecialChar"><a href='mu.subx.html#L15357'>Two-args-int-reg-int-stack</a></span>/imm32/inouts -<span id="L13815" class="LineNr">13815 </span> 0/imm32/no-outputs -<span id="L13816" class="LineNr">13816 </span> 0/imm32/no-outputs -<span id="L13817" class="LineNr">13817 </span> 0x11/imm32/alloc-id:fake -<span id="L13818" class="LineNr">13818 </span> <a href='mu.subx.html#L15111'>_string_3b_compare<-</a>/imm32/subx-name -<span id="L13819" class="LineNr">13819 </span> 2/imm32/rm32-is-second-inout -<span id="L13820" class="LineNr">13820 </span> 1/imm32/r32-is-first-inout -<span id="L13821" class="LineNr">13821 </span> 0/imm32/no-imm32 -<span id="L13822" class="LineNr">13822 </span> 0/imm32/no-disp32 -<span id="L13823" class="LineNr">13823 </span> 0/imm32/output-is-write-only -<span id="L13824" class="LineNr">13824 </span> 0x11/imm32/alloc-id:fake -<span id="L13825" class="LineNr">13825 </span> <a href='mu.subx.html#L13826'>_Primitive-compare-eax-with-literal</a>/imm32/next -<span id="L13826" class="LineNr">13826 </span><span class="subxMinorFunction">_Primitive-compare-eax-with-literal</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13827" class="LineNr">13827 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13828" class="LineNr">13828 </span> <span class="subxComment"># compare var1/eax n => 3d/compare-eax-with n/imm32</span> +<span id="L13812" class="LineNr">13812 </span> <a href='mu.subx.html#L15136'>_string_39_compare-></a>/imm32/subx-name +<span id="L13813" class="LineNr">13813 </span> 1/imm32/rm32-is-first-inout +<span id="L13814" class="LineNr">13814 </span> 2/imm32/r32-is-second-inout +<span id="L13815" class="LineNr">13815 </span> 0/imm32/no-imm32 +<span id="L13816" class="LineNr">13816 </span> 0/imm32/no-disp32 +<span id="L13817" class="LineNr">13817 </span> 0/imm32/output-is-write-only +<span id="L13818" class="LineNr">13818 </span> 0x11/imm32/alloc-id:fake +<span id="L13819" class="LineNr">13819 </span> <a href='mu.subx.html#L13820'>_Primitive-compare-mem-with-reg</a>/imm32/next +<span id="L13820" class="LineNr">13820 </span><span class="subxMinorFunction">_Primitive-compare-mem-with-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13821" class="LineNr">13821 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13822" class="LineNr">13822 </span> <span class="subxComment"># compare var1 var2/reg => 39/compare var1/rm32 var2/r32</span> +<span id="L13823" class="LineNr">13823 </span> 0x11/imm32/alloc-id:fake +<span id="L13824" class="LineNr">13824 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name +<span id="L13825" class="LineNr">13825 </span> 0x11/imm32/alloc-id:fake +<span id="L13826" class="LineNr">13826 </span> <span class="SpecialChar"><a href='mu.subx.html#L15365'>Two-args-int-stack-int-reg</a></span>/imm32/inouts +<span id="L13827" class="LineNr">13827 </span> 0/imm32/no-outputs +<span id="L13828" class="LineNr">13828 </span> 0/imm32/no-outputs <span id="L13829" class="LineNr">13829 </span> 0x11/imm32/alloc-id:fake -<span id="L13830" class="LineNr">13830 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13831" class="LineNr">13831 </span> 0x11/imm32/alloc-id:fake -<span id="L13832" class="LineNr">13832 </span> <span class="SpecialChar"><a href='mu.subx.html#L15364'>Two-args-int-eax-int-literal</a></span>/imm32/inouts -<span id="L13833" class="LineNr">13833 </span> 0/imm32/no-outputs -<span id="L13834" class="LineNr">13834 </span> 0/imm32/no-outputs -<span id="L13835" class="LineNr">13835 </span> 0x11/imm32/alloc-id:fake -<span id="L13836" class="LineNr">13836 </span> <a href='mu.subx.html#L15116'>_string_3d_compare_eax_with</a>/imm32/subx-name -<span id="L13837" class="LineNr">13837 </span> 0/imm32/no-rm32 -<span id="L13838" class="LineNr">13838 </span> 0/imm32/no-r32 -<span id="L13839" class="LineNr">13839 </span> 2/imm32/imm32-is-second-inout -<span id="L13840" class="LineNr">13840 </span> 0/imm32/no-disp32 -<span id="L13841" class="LineNr">13841 </span> 0/imm32/output-is-write-only -<span id="L13842" class="LineNr">13842 </span> 0x11/imm32/alloc-id:fake -<span id="L13843" class="LineNr">13843 </span> <a href='mu.subx.html#L13844'>_Primitive-compare-reg-with-literal</a>/imm32/next -<span id="L13844" class="LineNr">13844 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-literal</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13845" class="LineNr">13845 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13846" class="LineNr">13846 </span> <span class="subxComment"># compare var1/reg n => 81 7/subop/compare %reg n/imm32</span> +<span id="L13830" class="LineNr">13830 </span> <a href='mu.subx.html#L15136'>_string_39_compare-></a>/imm32/subx-name +<span id="L13831" class="LineNr">13831 </span> 1/imm32/rm32-is-first-inout +<span id="L13832" class="LineNr">13832 </span> 2/imm32/r32-is-second-inout +<span id="L13833" class="LineNr">13833 </span> 0/imm32/no-imm32 +<span id="L13834" class="LineNr">13834 </span> 0/imm32/no-disp32 +<span id="L13835" class="LineNr">13835 </span> 0/imm32/output-is-write-only +<span id="L13836" class="LineNr">13836 </span> 0x11/imm32/alloc-id:fake +<span id="L13837" class="LineNr">13837 </span> <a href='mu.subx.html#L13838'>_Primitive-compare-reg-with-mem</a>/imm32/next +<span id="L13838" class="LineNr">13838 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13839" class="LineNr">13839 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13840" class="LineNr">13840 </span> <span class="subxComment"># compare var1/reg var2 => 3b/compare<- var2/rm32 var1/r32</span> +<span id="L13841" class="LineNr">13841 </span> 0x11/imm32/alloc-id:fake +<span id="L13842" class="LineNr">13842 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name +<span id="L13843" class="LineNr">13843 </span> 0x11/imm32/alloc-id:fake +<span id="L13844" class="LineNr">13844 </span> <span class="SpecialChar"><a href='mu.subx.html#L15387'>Two-args-int-reg-int-stack</a></span>/imm32/inouts +<span id="L13845" class="LineNr">13845 </span> 0/imm32/no-outputs +<span id="L13846" class="LineNr">13846 </span> 0/imm32/no-outputs <span id="L13847" class="LineNr">13847 </span> 0x11/imm32/alloc-id:fake -<span id="L13848" class="LineNr">13848 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13849" class="LineNr">13849 </span> 0x11/imm32/alloc-id:fake -<span id="L13850" class="LineNr">13850 </span> <span class="SpecialChar"><a href='mu.subx.html#L15378'>Int-var-in-register-and-literal</a></span>/imm32/inouts -<span id="L13851" class="LineNr">13851 </span> 0/imm32/no-outputs -<span id="L13852" class="LineNr">13852 </span> 0/imm32/no-outputs -<span id="L13853" class="LineNr">13853 </span> 0x11/imm32/alloc-id:fake -<span id="L13854" class="LineNr">13854 </span> <a href='mu.subx.html#L15206'>_string_81_subop_compare</a>/imm32/subx-name -<span id="L13855" class="LineNr">13855 </span> 1/imm32/rm32-is-first-inout -<span id="L13856" class="LineNr">13856 </span> 0/imm32/no-r32 -<span id="L13857" class="LineNr">13857 </span> 2/imm32/imm32-is-second-inout -<span id="L13858" class="LineNr">13858 </span> 0/imm32/no-disp32 -<span id="L13859" class="LineNr">13859 </span> 0/imm32/output-is-write-only -<span id="L13860" class="LineNr">13860 </span> 0x11/imm32/alloc-id:fake -<span id="L13861" class="LineNr">13861 </span> <a href='mu.subx.html#L13862'>_Primitive-compare-mem-with-literal</a>/imm32/next -<span id="L13862" class="LineNr">13862 </span><span class="subxMinorFunction">_Primitive-compare-mem-with-literal</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13863" class="LineNr">13863 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13864" class="LineNr">13864 </span> <span class="subxComment"># compare var1 n => 81 7/subop/compare *(ebp+___) n/imm32</span> +<span id="L13848" class="LineNr">13848 </span> <a href='mu.subx.html#L15141'>_string_3b_compare<-</a>/imm32/subx-name +<span id="L13849" class="LineNr">13849 </span> 2/imm32/rm32-is-second-inout +<span id="L13850" class="LineNr">13850 </span> 1/imm32/r32-is-first-inout +<span id="L13851" class="LineNr">13851 </span> 0/imm32/no-imm32 +<span id="L13852" class="LineNr">13852 </span> 0/imm32/no-disp32 +<span id="L13853" class="LineNr">13853 </span> 0/imm32/output-is-write-only +<span id="L13854" class="LineNr">13854 </span> 0x11/imm32/alloc-id:fake +<span id="L13855" class="LineNr">13855 </span> <a href='mu.subx.html#L13856'>_Primitive-compare-eax-with-literal</a>/imm32/next +<span id="L13856" class="LineNr">13856 </span><span class="subxMinorFunction">_Primitive-compare-eax-with-literal</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13857" class="LineNr">13857 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13858" class="LineNr">13858 </span> <span class="subxComment"># compare var1/eax n => 3d/compare-eax-with n/imm32</span> +<span id="L13859" class="LineNr">13859 </span> 0x11/imm32/alloc-id:fake +<span id="L13860" class="LineNr">13860 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name +<span id="L13861" class="LineNr">13861 </span> 0x11/imm32/alloc-id:fake +<span id="L13862" class="LineNr">13862 </span> <span class="SpecialChar"><a href='mu.subx.html#L15394'>Two-args-int-eax-int-literal</a></span>/imm32/inouts +<span id="L13863" class="LineNr">13863 </span> 0/imm32/no-outputs +<span id="L13864" class="LineNr">13864 </span> 0/imm32/no-outputs <span id="L13865" class="LineNr">13865 </span> 0x11/imm32/alloc-id:fake -<span id="L13866" class="LineNr">13866 </span> <a href='mu.subx.html#L14749'>_string-compare</a>/imm32/name -<span id="L13867" class="LineNr">13867 </span> 0x11/imm32/alloc-id:fake -<span id="L13868" class="LineNr">13868 </span> <span class="SpecialChar"><a href='mu.subx.html#L15371'>Int-var-and-literal</a></span>/imm32/inouts -<span id="L13869" class="LineNr">13869 </span> 0/imm32/no-outputs -<span id="L13870" class="LineNr">13870 </span> 0/imm32/no-outputs -<span id="L13871" class="LineNr">13871 </span> 0x11/imm32/alloc-id:fake -<span id="L13872" class="LineNr">13872 </span> <a href='mu.subx.html#L15206'>_string_81_subop_compare</a>/imm32/subx-name -<span id="L13873" class="LineNr">13873 </span> 1/imm32/rm32-is-first-inout -<span id="L13874" class="LineNr">13874 </span> 0/imm32/no-r32 -<span id="L13875" class="LineNr">13875 </span> 2/imm32/imm32-is-second-inout -<span id="L13876" class="LineNr">13876 </span> 0/imm32/no-disp32 -<span id="L13877" class="LineNr">13877 </span> 0/imm32/output-is-write-only -<span id="L13878" class="LineNr">13878 </span> 0x11/imm32/alloc-id:fake -<span id="L13879" class="LineNr">13879 </span> <a href='mu.subx.html#L13881'>_Primitive-multiply-reg-by-reg</a>/imm32/next -<span id="L13880" class="LineNr">13880 </span><span class="subxH1Comment"># - multiply</span> -<span id="L13881" class="LineNr">13881 </span><span class="subxMinorFunction">_Primitive-multiply-reg-by-reg</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13882" class="LineNr">13882 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13883" class="LineNr">13883 </span> <span class="subxComment"># var1/reg <- multiply var2 => 0f af/multiply var2/rm32 var1/r32</span> -<span id="L13884" class="LineNr">13884 </span> 0x11/imm32/alloc-id:fake -<span id="L13885" class="LineNr">13885 </span> <a href='mu.subx.html#L14839'>_string-multiply</a>/imm32/name -<span id="L13886" class="LineNr">13886 </span> 0x11/imm32/alloc-id:fake -<span id="L13887" class="LineNr">13887 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/inouts -<span id="L13888" class="LineNr">13888 </span> 0x11/imm32/alloc-id:fake -<span id="L13889" class="LineNr">13889 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13866" class="LineNr">13866 </span> <a href='mu.subx.html#L15146'>_string_3d_compare_eax_with</a>/imm32/subx-name +<span id="L13867" class="LineNr">13867 </span> 0/imm32/no-rm32 +<span id="L13868" class="LineNr">13868 </span> 0/imm32/no-r32 +<span id="L13869" class="LineNr">13869 </span> 2/imm32/imm32-is-second-inout +<span id="L13870" class="LineNr">13870 </span> 0/imm32/no-disp32 +<span id="L13871" class="LineNr">13871 </span> 0/imm32/output-is-write-only +<span id="L13872" class="LineNr">13872 </span> 0x11/imm32/alloc-id:fake +<span id="L13873" class="LineNr">13873 </span> <a href='mu.subx.html#L13874'>_Primitive-compare-reg-with-literal</a>/imm32/next +<span id="L13874" class="LineNr">13874 </span><span class="subxMinorFunction">_Primitive-compare-reg-with-literal</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13875" class="LineNr">13875 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13876" class="LineNr">13876 </span> <span class="subxComment"># compare var1/reg n => 81 7/subop/compare %reg n/imm32</span> +<span id="L13877" class="LineNr">13877 </span> 0x11/imm32/alloc-id:fake +<span id="L13878" class="LineNr">13878 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name +<span id="L13879" class="LineNr">13879 </span> 0x11/imm32/alloc-id:fake +<span id="L13880" class="LineNr">13880 </span> <span class="SpecialChar"><a href='mu.subx.html#L15408'>Int-var-in-register-and-literal</a></span>/imm32/inouts +<span id="L13881" class="LineNr">13881 </span> 0/imm32/no-outputs +<span id="L13882" class="LineNr">13882 </span> 0/imm32/no-outputs +<span id="L13883" class="LineNr">13883 </span> 0x11/imm32/alloc-id:fake +<span id="L13884" class="LineNr">13884 </span> <a href='mu.subx.html#L15236'>_string_81_subop_compare</a>/imm32/subx-name +<span id="L13885" class="LineNr">13885 </span> 1/imm32/rm32-is-first-inout +<span id="L13886" class="LineNr">13886 </span> 0/imm32/no-r32 +<span id="L13887" class="LineNr">13887 </span> 2/imm32/imm32-is-second-inout +<span id="L13888" class="LineNr">13888 </span> 0/imm32/no-disp32 +<span id="L13889" class="LineNr">13889 </span> 0/imm32/output-is-write-only <span id="L13890" class="LineNr">13890 </span> 0x11/imm32/alloc-id:fake -<span id="L13891" class="LineNr">13891 </span> <a href='mu.subx.html#L15056'>_string_0f_af_multiply</a>/imm32/subx-name -<span id="L13892" class="LineNr">13892 </span> 1/imm32/rm32-is-first-inout -<span id="L13893" class="LineNr">13893 </span> 3/imm32/r32-is-first-output -<span id="L13894" class="LineNr">13894 </span> 0/imm32/no-imm32 -<span id="L13895" class="LineNr">13895 </span> 0/imm32/no-disp32 -<span id="L13896" class="LineNr">13896 </span> 0/imm32/output-is-write-only +<span id="L13891" class="LineNr">13891 </span> <a href='mu.subx.html#L13892'>_Primitive-compare-mem-with-literal</a>/imm32/next +<span id="L13892" class="LineNr">13892 </span><span class="subxMinorFunction">_Primitive-compare-mem-with-literal</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13893" class="LineNr">13893 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13894" class="LineNr">13894 </span> <span class="subxComment"># compare var1 n => 81 7/subop/compare *(ebp+___) n/imm32</span> +<span id="L13895" class="LineNr">13895 </span> 0x11/imm32/alloc-id:fake +<span id="L13896" class="LineNr">13896 </span> <a href='mu.subx.html#L14779'>_string-compare</a>/imm32/name <span id="L13897" class="LineNr">13897 </span> 0x11/imm32/alloc-id:fake -<span id="L13898" class="LineNr">13898 </span> <a href='mu.subx.html#L13899'>_Primitive-multiply-reg-by-mem</a>/imm32/next -<span id="L13899" class="LineNr">13899 </span><span class="subxMinorFunction">_Primitive-multiply-reg-by-mem</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13900" class="LineNr">13900 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13901" class="LineNr">13901 </span> <span class="subxComment"># var1/reg <- multiply var2 => 0f af/multiply var2/rm32 var1/r32</span> -<span id="L13902" class="LineNr">13902 </span> 0x11/imm32/alloc-id:fake -<span id="L13903" class="LineNr">13903 </span> <a href='mu.subx.html#L14839'>_string-multiply</a>/imm32/name -<span id="L13904" class="LineNr">13904 </span> 0x11/imm32/alloc-id:fake -<span id="L13905" class="LineNr">13905 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/inouts -<span id="L13906" class="LineNr">13906 </span> 0x11/imm32/alloc-id:fake -<span id="L13907" class="LineNr">13907 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13898" class="LineNr">13898 </span> <span class="SpecialChar"><a href='mu.subx.html#L15401'>Int-var-and-literal</a></span>/imm32/inouts +<span id="L13899" class="LineNr">13899 </span> 0/imm32/no-outputs +<span id="L13900" class="LineNr">13900 </span> 0/imm32/no-outputs +<span id="L13901" class="LineNr">13901 </span> 0x11/imm32/alloc-id:fake +<span id="L13902" class="LineNr">13902 </span> <a href='mu.subx.html#L15236'>_string_81_subop_compare</a>/imm32/subx-name +<span id="L13903" class="LineNr">13903 </span> 1/imm32/rm32-is-first-inout +<span id="L13904" class="LineNr">13904 </span> 0/imm32/no-r32 +<span id="L13905" class="LineNr">13905 </span> 2/imm32/imm32-is-second-inout +<span id="L13906" class="LineNr">13906 </span> 0/imm32/no-disp32 +<span id="L13907" class="LineNr">13907 </span> 0/imm32/output-is-write-only <span id="L13908" class="LineNr">13908 </span> 0x11/imm32/alloc-id:fake -<span id="L13909" class="LineNr">13909 </span> <a href='mu.subx.html#L15056'>_string_0f_af_multiply</a>/imm32/subx-name -<span id="L13910" class="LineNr">13910 </span> 1/imm32/rm32-is-first-inout -<span id="L13911" class="LineNr">13911 </span> 3/imm32/r32-is-first-output -<span id="L13912" class="LineNr">13912 </span> 0/imm32/no-imm32 -<span id="L13913" class="LineNr">13913 </span> 0/imm32/no-disp32 -<span id="L13914" class="LineNr">13914 </span> 0/imm32/output-is-write-only -<span id="L13915" class="LineNr">13915 </span> 0x11/imm32/alloc-id:fake -<span id="L13916" class="LineNr">13916 </span> <a href='mu.subx.html#L13918'>_Primitive-break-if-addr<</a>/imm32/next -<span id="L13917" class="LineNr">13917 </span><span class="subxH1Comment"># - branches</span> -<span id="L13918" class="LineNr">13918 </span><span class="subxMinorFunction">_Primitive-break-if-addr<</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13919" class="LineNr">13919 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13909" class="LineNr">13909 </span> <a href='mu.subx.html#L13911'>_Primitive-multiply-reg-by-reg</a>/imm32/next +<span id="L13910" class="LineNr">13910 </span><span class="subxH1Comment"># - multiply</span> +<span id="L13911" class="LineNr">13911 </span><span class="subxMinorFunction">_Primitive-multiply-reg-by-reg</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13912" class="LineNr">13912 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13913" class="LineNr">13913 </span> <span class="subxComment"># var1/reg <- multiply var2 => 0f af/multiply var2/rm32 var1/r32</span> +<span id="L13914" class="LineNr">13914 </span> 0x11/imm32/alloc-id:fake +<span id="L13915" class="LineNr">13915 </span> <a href='mu.subx.html#L14869'>_string-multiply</a>/imm32/name +<span id="L13916" class="LineNr">13916 </span> 0x11/imm32/alloc-id:fake +<span id="L13917" class="LineNr">13917 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/inouts +<span id="L13918" class="LineNr">13918 </span> 0x11/imm32/alloc-id:fake +<span id="L13919" class="LineNr">13919 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs <span id="L13920" class="LineNr">13920 </span> 0x11/imm32/alloc-id:fake -<span id="L13921" class="LineNr">13921 </span> <a href='mu.subx.html#L14729'>_string-break-if-addr<</a>/imm32/name -<span id="L13922" class="LineNr">13922 </span> 0/imm32/no-inouts -<span id="L13923" class="LineNr">13923 </span> 0/imm32/no-inouts -<span id="L13924" class="LineNr">13924 </span> 0/imm32/no-outputs -<span id="L13925" class="LineNr">13925 </span> 0/imm32/no-outputs -<span id="L13926" class="LineNr">13926 </span> 0x11/imm32/alloc-id:fake -<span id="L13927" class="LineNr">13927 </span> <a href='mu.subx.html#L14911'>_string_0f_82_jump_break</a>/imm32/subx-name -<span id="L13928" class="LineNr">13928 </span> 0/imm32/no-rm32 -<span id="L13929" class="LineNr">13929 </span> 0/imm32/no-r32 -<span id="L13930" class="LineNr">13930 </span> 0/imm32/no-imm32 -<span id="L13931" class="LineNr">13931 </span> 0/imm32/no-disp32 -<span id="L13932" class="LineNr">13932 </span> 0/imm32/no-output -<span id="L13933" class="LineNr">13933 </span> 0x11/imm32/alloc-id:fake -<span id="L13934" class="LineNr">13934 </span> <a href='mu.subx.html#L13935'>_Primitive-break-if-addr>=</a>/imm32/next -<span id="L13935" class="LineNr">13935 </span><span class="subxMinorFunction">_Primitive-break-if-addr>=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13936" class="LineNr">13936 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13937" class="LineNr">13937 </span> 0x11/imm32/alloc-id:fake -<span id="L13938" class="LineNr">13938 </span> <a href='mu.subx.html#L14744'>_string-break-if-addr>=</a>/imm32/name -<span id="L13939" class="LineNr">13939 </span> 0/imm32/no-inouts -<span id="L13940" class="LineNr">13940 </span> 0/imm32/no-inouts -<span id="L13941" class="LineNr">13941 </span> 0/imm32/no-outputs -<span id="L13942" class="LineNr">13942 </span> 0/imm32/no-outputs -<span id="L13943" class="LineNr">13943 </span> 0x11/imm32/alloc-id:fake -<span id="L13944" class="LineNr">13944 </span> <a href='mu.subx.html#L14926'>_string_0f_83_jump_break</a>/imm32/subx-name -<span id="L13945" class="LineNr">13945 </span> 0/imm32/no-rm32 -<span id="L13946" class="LineNr">13946 </span> 0/imm32/no-r32 -<span id="L13947" class="LineNr">13947 </span> 0/imm32/no-imm32 -<span id="L13948" class="LineNr">13948 </span> 0/imm32/no-disp32 -<span id="L13949" class="LineNr">13949 </span> 0/imm32/no-output +<span id="L13921" class="LineNr">13921 </span> <a href='mu.subx.html#L15086'>_string_0f_af_multiply</a>/imm32/subx-name +<span id="L13922" class="LineNr">13922 </span> 1/imm32/rm32-is-first-inout +<span id="L13923" class="LineNr">13923 </span> 3/imm32/r32-is-first-output +<span id="L13924" class="LineNr">13924 </span> 0/imm32/no-imm32 +<span id="L13925" class="LineNr">13925 </span> 0/imm32/no-disp32 +<span id="L13926" class="LineNr">13926 </span> 0/imm32/output-is-write-only +<span id="L13927" class="LineNr">13927 </span> 0x11/imm32/alloc-id:fake +<span id="L13928" class="LineNr">13928 </span> <a href='mu.subx.html#L13929'>_Primitive-multiply-reg-by-mem</a>/imm32/next +<span id="L13929" class="LineNr">13929 </span><span class="subxMinorFunction">_Primitive-multiply-reg-by-mem</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13930" class="LineNr">13930 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L13931" class="LineNr">13931 </span> <span class="subxComment"># var1/reg <- multiply var2 => 0f af/multiply var2/rm32 var1/r32</span> +<span id="L13932" class="LineNr">13932 </span> 0x11/imm32/alloc-id:fake +<span id="L13933" class="LineNr">13933 </span> <a href='mu.subx.html#L14869'>_string-multiply</a>/imm32/name +<span id="L13934" class="LineNr">13934 </span> 0x11/imm32/alloc-id:fake +<span id="L13935" class="LineNr">13935 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/inouts +<span id="L13936" class="LineNr">13936 </span> 0x11/imm32/alloc-id:fake +<span id="L13937" class="LineNr">13937 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/outputs +<span id="L13938" class="LineNr">13938 </span> 0x11/imm32/alloc-id:fake +<span id="L13939" class="LineNr">13939 </span> <a href='mu.subx.html#L15086'>_string_0f_af_multiply</a>/imm32/subx-name +<span id="L13940" class="LineNr">13940 </span> 1/imm32/rm32-is-first-inout +<span id="L13941" class="LineNr">13941 </span> 3/imm32/r32-is-first-output +<span id="L13942" class="LineNr">13942 </span> 0/imm32/no-imm32 +<span id="L13943" class="LineNr">13943 </span> 0/imm32/no-disp32 +<span id="L13944" class="LineNr">13944 </span> 0/imm32/output-is-write-only +<span id="L13945" class="LineNr">13945 </span> 0x11/imm32/alloc-id:fake +<span id="L13946" class="LineNr">13946 </span> <a href='mu.subx.html#L13948'>_Primitive-break-if-addr<</a>/imm32/next +<span id="L13947" class="LineNr">13947 </span><span class="subxH1Comment"># - branches</span> +<span id="L13948" class="LineNr">13948 </span><span class="subxMinorFunction">_Primitive-break-if-addr<</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13949" class="LineNr">13949 </span> 0x11/imm32/alloc-id:fake:payload <span id="L13950" class="LineNr">13950 </span> 0x11/imm32/alloc-id:fake -<span id="L13951" class="LineNr">13951 </span> <a href='mu.subx.html#L13952'>_Primitive-break-if-=</a>/imm32/next -<span id="L13952" class="LineNr">13952 </span><span class="subxMinorFunction">_Primitive-break-if-=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13953" class="LineNr">13953 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13954" class="LineNr">13954 </span> 0x11/imm32/alloc-id:fake -<span id="L13955" class="LineNr">13955 </span> <a href='mu.subx.html#L14709'>_string-break-if-=</a>/imm32/name -<span id="L13956" class="LineNr">13956 </span> 0/imm32/no-inouts -<span id="L13957" class="LineNr">13957 </span> 0/imm32/no-inouts -<span id="L13958" class="LineNr">13958 </span> 0/imm32/no-outputs -<span id="L13959" class="LineNr">13959 </span> 0/imm32/no-outputs -<span id="L13960" class="LineNr">13960 </span> 0x11/imm32/alloc-id:fake -<span id="L13961" class="LineNr">13961 </span> <a href='mu.subx.html#L14941'>_string_0f_84_jump_break</a>/imm32/subx-name -<span id="L13962" class="LineNr">13962 </span> 0/imm32/no-rm32 -<span id="L13963" class="LineNr">13963 </span> 0/imm32/no-r32 -<span id="L13964" class="LineNr">13964 </span> 0/imm32/no-imm32 -<span id="L13965" class="LineNr">13965 </span> 0/imm32/no-disp32 -<span id="L13966" class="LineNr">13966 </span> 0/imm32/no-output +<span id="L13951" class="LineNr">13951 </span> <a href='mu.subx.html#L14759'>_string-break-if-addr<</a>/imm32/name +<span id="L13952" class="LineNr">13952 </span> 0/imm32/no-inouts +<span id="L13953" class="LineNr">13953 </span> 0/imm32/no-inouts +<span id="L13954" class="LineNr">13954 </span> 0/imm32/no-outputs +<span id="L13955" class="LineNr">13955 </span> 0/imm32/no-outputs +<span id="L13956" class="LineNr">13956 </span> 0x11/imm32/alloc-id:fake +<span id="L13957" class="LineNr">13957 </span> <a href='mu.subx.html#L14941'>_string_0f_82_jump_break</a>/imm32/subx-name +<span id="L13958" class="LineNr">13958 </span> 0/imm32/no-rm32 +<span id="L13959" class="LineNr">13959 </span> 0/imm32/no-r32 +<span id="L13960" class="LineNr">13960 </span> 0/imm32/no-imm32 +<span id="L13961" class="LineNr">13961 </span> 0/imm32/no-disp32 +<span id="L13962" class="LineNr">13962 </span> 0/imm32/no-output +<span id="L13963" class="LineNr">13963 </span> 0x11/imm32/alloc-id:fake +<span id="L13964" class="LineNr">13964 </span> <a href='mu.subx.html#L13965'>_Primitive-break-if-addr>=</a>/imm32/next +<span id="L13965" class="LineNr">13965 </span><span class="subxMinorFunction">_Primitive-break-if-addr>=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13966" class="LineNr">13966 </span> 0x11/imm32/alloc-id:fake:payload <span id="L13967" class="LineNr">13967 </span> 0x11/imm32/alloc-id:fake -<span id="L13968" class="LineNr">13968 </span> <a href='mu.subx.html#L13969'>_Primitive-break-if-!=</a>/imm32/next -<span id="L13969" class="LineNr">13969 </span><span class="subxMinorFunction">_Primitive-break-if-!=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13970" class="LineNr">13970 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13971" class="LineNr">13971 </span> 0x11/imm32/alloc-id:fake -<span id="L13972" class="LineNr">13972 </span> <a href='mu.subx.html#L14724'>_string-break-if-!=</a>/imm32/name -<span id="L13973" class="LineNr">13973 </span> 0/imm32/no-inouts -<span id="L13974" class="LineNr">13974 </span> 0/imm32/no-inouts -<span id="L13975" class="LineNr">13975 </span> 0/imm32/no-outputs -<span id="L13976" class="LineNr">13976 </span> 0/imm32/no-outputs -<span id="L13977" class="LineNr">13977 </span> 0x11/imm32/alloc-id:fake -<span id="L13978" class="LineNr">13978 </span> <a href='mu.subx.html#L14956'>_string_0f_85_jump_break</a>/imm32/subx-name -<span id="L13979" class="LineNr">13979 </span> 0/imm32/no-rm32 -<span id="L13980" class="LineNr">13980 </span> 0/imm32/no-r32 -<span id="L13981" class="LineNr">13981 </span> 0/imm32/no-imm32 -<span id="L13982" class="LineNr">13982 </span> 0/imm32/no-disp32 -<span id="L13983" class="LineNr">13983 </span> 0/imm32/no-output +<span id="L13968" class="LineNr">13968 </span> <a href='mu.subx.html#L14774'>_string-break-if-addr>=</a>/imm32/name +<span id="L13969" class="LineNr">13969 </span> 0/imm32/no-inouts +<span id="L13970" class="LineNr">13970 </span> 0/imm32/no-inouts +<span id="L13971" class="LineNr">13971 </span> 0/imm32/no-outputs +<span id="L13972" class="LineNr">13972 </span> 0/imm32/no-outputs +<span id="L13973" class="LineNr">13973 </span> 0x11/imm32/alloc-id:fake +<span id="L13974" class="LineNr">13974 </span> <a href='mu.subx.html#L14956'>_string_0f_83_jump_break</a>/imm32/subx-name +<span id="L13975" class="LineNr">13975 </span> 0/imm32/no-rm32 +<span id="L13976" class="LineNr">13976 </span> 0/imm32/no-r32 +<span id="L13977" class="LineNr">13977 </span> 0/imm32/no-imm32 +<span id="L13978" class="LineNr">13978 </span> 0/imm32/no-disp32 +<span id="L13979" class="LineNr">13979 </span> 0/imm32/no-output +<span id="L13980" class="LineNr">13980 </span> 0x11/imm32/alloc-id:fake +<span id="L13981" class="LineNr">13981 </span> <a href='mu.subx.html#L13982'>_Primitive-break-if-=</a>/imm32/next +<span id="L13982" class="LineNr">13982 </span><span class="subxMinorFunction">_Primitive-break-if-=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L13983" class="LineNr">13983 </span> 0x11/imm32/alloc-id:fake:payload <span id="L13984" class="LineNr">13984 </span> 0x11/imm32/alloc-id:fake -<span id="L13985" class="LineNr">13985 </span> <a href='mu.subx.html#L13986'>_Primitive-break-if-addr<=</a>/imm32/next -<span id="L13986" class="LineNr">13986 </span><span class="subxMinorFunction">_Primitive-break-if-addr<=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L13987" class="LineNr">13987 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L13988" class="LineNr">13988 </span> 0x11/imm32/alloc-id:fake -<span id="L13989" class="LineNr">13989 </span> <a href='mu.subx.html#L14734'>_string-break-if-addr<=</a>/imm32/name -<span id="L13990" class="LineNr">13990 </span> 0/imm32/no-inouts -<span id="L13991" class="LineNr">13991 </span> 0/imm32/no-inouts -<span id="L13992" class="LineNr">13992 </span> 0/imm32/no-outputs -<span id="L13993" class="LineNr">13993 </span> 0/imm32/no-outputs -<span id="L13994" class="LineNr">13994 </span> 0x11/imm32/alloc-id:fake -<span id="L13995" class="LineNr">13995 </span> <a href='mu.subx.html#L14971'>_string_0f_86_jump_break</a>/imm32/subx-name -<span id="L13996" class="LineNr">13996 </span> 0/imm32/no-rm32 -<span id="L13997" class="LineNr">13997 </span> 0/imm32/no-r32 -<span id="L13998" class="LineNr">13998 </span> 0/imm32/no-imm32 -<span id="L13999" class="LineNr">13999 </span> 0/imm32/no-disp32 -<span id="L14000" class="LineNr">14000 </span> 0/imm32/no-output +<span id="L13985" class="LineNr">13985 </span> <a href='mu.subx.html#L14739'>_string-break-if-=</a>/imm32/name +<span id="L13986" class="LineNr">13986 </span> 0/imm32/no-inouts +<span id="L13987" class="LineNr">13987 </span> 0/imm32/no-inouts +<span id="L13988" class="LineNr">13988 </span> 0/imm32/no-outputs +<span id="L13989" class="LineNr">13989 </span> 0/imm32/no-outputs +<span id="L13990" class="LineNr">13990 </span> 0x11/imm32/alloc-id:fake +<span id="L13991" class="LineNr">13991 </span> <a href='mu.subx.html#L14971'>_string_0f_84_jump_break</a>/imm32/subx-name +<span id="L13992" class="LineNr">13992 </span> 0/imm32/no-rm32 +<span id="L13993" class="LineNr">13993 </span> 0/imm32/no-r32 +<span id="L13994" class="LineNr">13994 </span> 0/imm32/no-imm32 +<span id="L13995" class="LineNr">13995 </span> 0/imm32/no-disp32 +<span id="L13996" class="LineNr">13996 </span> 0/imm32/no-output +<span id="L13997" class="LineNr">13997 </span> 0x11/imm32/alloc-id:fake +<span id="L13998" class="LineNr">13998 </span> <a href='mu.subx.html#L13999'>_Primitive-break-if-!=</a>/imm32/next +<span id="L13999" class="LineNr">13999 </span><span class="subxMinorFunction">_Primitive-break-if-!=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14000" class="LineNr">14000 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14001" class="LineNr">14001 </span> 0x11/imm32/alloc-id:fake -<span id="L14002" class="LineNr">14002 </span> <a href='mu.subx.html#L14003'>_Primitive-break-if-addr></a>/imm32/next -<span id="L14003" class="LineNr">14003 </span><span class="subxMinorFunction">_Primitive-break-if-addr></span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14004" class="LineNr">14004 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14005" class="LineNr">14005 </span> 0x11/imm32/alloc-id:fake -<span id="L14006" class="LineNr">14006 </span> <a href='mu.subx.html#L14739'>_string-break-if-addr></a>/imm32/name -<span id="L14007" class="LineNr">14007 </span> 0/imm32/no-inouts -<span id="L14008" class="LineNr">14008 </span> 0/imm32/no-inouts -<span id="L14009" class="LineNr">14009 </span> 0/imm32/no-outputs -<span id="L14010" class="LineNr">14010 </span> 0/imm32/no-outputs -<span id="L14011" class="LineNr">14011 </span> 0x11/imm32/alloc-id:fake -<span id="L14012" class="LineNr">14012 </span> <a href='mu.subx.html#L14986'>_string_0f_87_jump_break</a>/imm32/subx-name -<span id="L14013" class="LineNr">14013 </span> 0/imm32/no-rm32 -<span id="L14014" class="LineNr">14014 </span> 0/imm32/no-r32 -<span id="L14015" class="LineNr">14015 </span> 0/imm32/no-imm32 -<span id="L14016" class="LineNr">14016 </span> 0/imm32/no-disp32 -<span id="L14017" class="LineNr">14017 </span> 0/imm32/no-output +<span id="L14002" class="LineNr">14002 </span> <a href='mu.subx.html#L14754'>_string-break-if-!=</a>/imm32/name +<span id="L14003" class="LineNr">14003 </span> 0/imm32/no-inouts +<span id="L14004" class="LineNr">14004 </span> 0/imm32/no-inouts +<span id="L14005" class="LineNr">14005 </span> 0/imm32/no-outputs +<span id="L14006" class="LineNr">14006 </span> 0/imm32/no-outputs +<span id="L14007" class="LineNr">14007 </span> 0x11/imm32/alloc-id:fake +<span id="L14008" class="LineNr">14008 </span> <a href='mu.subx.html#L14986'>_string_0f_85_jump_break</a>/imm32/subx-name +<span id="L14009" class="LineNr">14009 </span> 0/imm32/no-rm32 +<span id="L14010" class="LineNr">14010 </span> 0/imm32/no-r32 +<span id="L14011" class="LineNr">14011 </span> 0/imm32/no-imm32 +<span id="L14012" class="LineNr">14012 </span> 0/imm32/no-disp32 +<span id="L14013" class="LineNr">14013 </span> 0/imm32/no-output +<span id="L14014" class="LineNr">14014 </span> 0x11/imm32/alloc-id:fake +<span id="L14015" class="LineNr">14015 </span> <a href='mu.subx.html#L14016'>_Primitive-break-if-addr<=</a>/imm32/next +<span id="L14016" class="LineNr">14016 </span><span class="subxMinorFunction">_Primitive-break-if-addr<=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14017" class="LineNr">14017 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14018" class="LineNr">14018 </span> 0x11/imm32/alloc-id:fake -<span id="L14019" class="LineNr">14019 </span> <a href='mu.subx.html#L14020'>_Primitive-break-if-<</a>/imm32/next -<span id="L14020" class="LineNr">14020 </span><span class="subxMinorFunction">_Primitive-break-if-<</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14021" class="LineNr">14021 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14022" class="LineNr">14022 </span> 0x11/imm32/alloc-id:fake -<span id="L14023" class="LineNr">14023 </span> <a href='mu.subx.html#L14699'>_string-break-if-<</a>/imm32/name -<span id="L14024" class="LineNr">14024 </span> 0/imm32/no-inouts -<span id="L14025" class="LineNr">14025 </span> 0/imm32/no-inouts -<span id="L14026" class="LineNr">14026 </span> 0/imm32/no-outputs -<span id="L14027" class="LineNr">14027 </span> 0/imm32/no-outputs -<span id="L14028" class="LineNr">14028 </span> 0x11/imm32/alloc-id:fake -<span id="L14029" class="LineNr">14029 </span> <a href='mu.subx.html#L15001'>_string_0f_8c_jump_break</a>/imm32/subx-name -<span id="L14030" class="LineNr">14030 </span> 0/imm32/no-rm32 -<span id="L14031" class="LineNr">14031 </span> 0/imm32/no-r32 -<span id="L14032" class="LineNr">14032 </span> 0/imm32/no-imm32 -<span id="L14033" class="LineNr">14033 </span> 0/imm32/no-disp32 -<span id="L14034" class="LineNr">14034 </span> 0/imm32/no-output +<span id="L14019" class="LineNr">14019 </span> <a href='mu.subx.html#L14764'>_string-break-if-addr<=</a>/imm32/name +<span id="L14020" class="LineNr">14020 </span> 0/imm32/no-inouts +<span id="L14021" class="LineNr">14021 </span> 0/imm32/no-inouts +<span id="L14022" class="LineNr">14022 </span> 0/imm32/no-outputs +<span id="L14023" class="LineNr">14023 </span> 0/imm32/no-outputs +<span id="L14024" class="LineNr">14024 </span> 0x11/imm32/alloc-id:fake +<span id="L14025" class="LineNr">14025 </span> <a href='mu.subx.html#L15001'>_string_0f_86_jump_break</a>/imm32/subx-name +<span id="L14026" class="LineNr">14026 </span> 0/imm32/no-rm32 +<span id="L14027" class="LineNr">14027 </span> 0/imm32/no-r32 +<span id="L14028" class="LineNr">14028 </span> 0/imm32/no-imm32 +<span id="L14029" class="LineNr">14029 </span> 0/imm32/no-disp32 +<span id="L14030" class="LineNr">14030 </span> 0/imm32/no-output +<span id="L14031" class="LineNr">14031 </span> 0x11/imm32/alloc-id:fake +<span id="L14032" class="LineNr">14032 </span> <a href='mu.subx.html#L14033'>_Primitive-break-if-addr></a>/imm32/next +<span id="L14033" class="LineNr">14033 </span><span class="subxMinorFunction">_Primitive-break-if-addr></span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14034" class="LineNr">14034 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14035" class="LineNr">14035 </span> 0x11/imm32/alloc-id:fake -<span id="L14036" class="LineNr">14036 </span> <a href='mu.subx.html#L14037'>_Primitive-break-if->=</a>/imm32/next -<span id="L14037" class="LineNr">14037 </span><span class="subxMinorFunction">_Primitive-break-if->=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14038" class="LineNr">14038 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14039" class="LineNr">14039 </span> 0x11/imm32/alloc-id:fake -<span id="L14040" class="LineNr">14040 </span> <a href='mu.subx.html#L14719'>_string-break-if->=</a>/imm32/name -<span id="L14041" class="LineNr">14041 </span> 0/imm32/no-inouts -<span id="L14042" class="LineNr">14042 </span> 0/imm32/no-inouts -<span id="L14043" class="LineNr">14043 </span> 0/imm32/no-outputs -<span id="L14044" class="LineNr">14044 </span> 0/imm32/no-outputs -<span id="L14045" class="LineNr">14045 </span> 0x11/imm32/alloc-id:fake -<span id="L14046" class="LineNr">14046 </span> <a href='mu.subx.html#L15016'>_string_0f_8d_jump_break</a>/imm32/subx-name -<span id="L14047" class="LineNr">14047 </span> 0/imm32/no-rm32 -<span id="L14048" class="LineNr">14048 </span> 0/imm32/no-r32 -<span id="L14049" class="LineNr">14049 </span> 0/imm32/no-imm32 -<span id="L14050" class="LineNr">14050 </span> 0/imm32/no-disp32 -<span id="L14051" class="LineNr">14051 </span> 0/imm32/no-output +<span id="L14036" class="LineNr">14036 </span> <a href='mu.subx.html#L14769'>_string-break-if-addr></a>/imm32/name +<span id="L14037" class="LineNr">14037 </span> 0/imm32/no-inouts +<span id="L14038" class="LineNr">14038 </span> 0/imm32/no-inouts +<span id="L14039" class="LineNr">14039 </span> 0/imm32/no-outputs +<span id="L14040" class="LineNr">14040 </span> 0/imm32/no-outputs +<span id="L14041" class="LineNr">14041 </span> 0x11/imm32/alloc-id:fake +<span id="L14042" class="LineNr">14042 </span> <a href='mu.subx.html#L15016'>_string_0f_87_jump_break</a>/imm32/subx-name +<span id="L14043" class="LineNr">14043 </span> 0/imm32/no-rm32 +<span id="L14044" class="LineNr">14044 </span> 0/imm32/no-r32 +<span id="L14045" class="LineNr">14045 </span> 0/imm32/no-imm32 +<span id="L14046" class="LineNr">14046 </span> 0/imm32/no-disp32 +<span id="L14047" class="LineNr">14047 </span> 0/imm32/no-output +<span id="L14048" class="LineNr">14048 </span> 0x11/imm32/alloc-id:fake +<span id="L14049" class="LineNr">14049 </span> <a href='mu.subx.html#L14050'>_Primitive-break-if-<</a>/imm32/next +<span id="L14050" class="LineNr">14050 </span><span class="subxMinorFunction">_Primitive-break-if-<</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14051" class="LineNr">14051 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14052" class="LineNr">14052 </span> 0x11/imm32/alloc-id:fake -<span id="L14053" class="LineNr">14053 </span> <a href='mu.subx.html#L14054'>_Primitive-break-if-<=</a>/imm32/next -<span id="L14054" class="LineNr">14054 </span><span class="subxMinorFunction">_Primitive-break-if-<=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14055" class="LineNr">14055 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14056" class="LineNr">14056 </span> 0x11/imm32/alloc-id:fake -<span id="L14057" class="LineNr">14057 </span> <a href='mu.subx.html#L14704'>_string-break-if-<=</a>/imm32/name -<span id="L14058" class="LineNr">14058 </span> 0/imm32/no-inouts -<span id="L14059" class="LineNr">14059 </span> 0/imm32/no-inouts -<span id="L14060" class="LineNr">14060 </span> 0/imm32/no-outputs -<span id="L14061" class="LineNr">14061 </span> 0/imm32/no-outputs -<span id="L14062" class="LineNr">14062 </span> 0x11/imm32/alloc-id:fake -<span id="L14063" class="LineNr">14063 </span> <a href='mu.subx.html#L15031'>_string_0f_8e_jump_break</a>/imm32/subx-name -<span id="L14064" class="LineNr">14064 </span> 0/imm32/no-rm32 -<span id="L14065" class="LineNr">14065 </span> 0/imm32/no-r32 -<span id="L14066" class="LineNr">14066 </span> 0/imm32/no-imm32 -<span id="L14067" class="LineNr">14067 </span> 0/imm32/no-disp32 -<span id="L14068" class="LineNr">14068 </span> 0/imm32/no-output +<span id="L14053" class="LineNr">14053 </span> <a href='mu.subx.html#L14729'>_string-break-if-<</a>/imm32/name +<span id="L14054" class="LineNr">14054 </span> 0/imm32/no-inouts +<span id="L14055" class="LineNr">14055 </span> 0/imm32/no-inouts +<span id="L14056" class="LineNr">14056 </span> 0/imm32/no-outputs +<span id="L14057" class="LineNr">14057 </span> 0/imm32/no-outputs +<span id="L14058" class="LineNr">14058 </span> 0x11/imm32/alloc-id:fake +<span id="L14059" class="LineNr">14059 </span> <a href='mu.subx.html#L15031'>_string_0f_8c_jump_break</a>/imm32/subx-name +<span id="L14060" class="LineNr">14060 </span> 0/imm32/no-rm32 +<span id="L14061" class="LineNr">14061 </span> 0/imm32/no-r32 +<span id="L14062" class="LineNr">14062 </span> 0/imm32/no-imm32 +<span id="L14063" class="LineNr">14063 </span> 0/imm32/no-disp32 +<span id="L14064" class="LineNr">14064 </span> 0/imm32/no-output +<span id="L14065" class="LineNr">14065 </span> 0x11/imm32/alloc-id:fake +<span id="L14066" class="LineNr">14066 </span> <a href='mu.subx.html#L14067'>_Primitive-break-if->=</a>/imm32/next +<span id="L14067" class="LineNr">14067 </span><span class="subxMinorFunction">_Primitive-break-if->=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14068" class="LineNr">14068 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14069" class="LineNr">14069 </span> 0x11/imm32/alloc-id:fake -<span id="L14070" class="LineNr">14070 </span> <a href='mu.subx.html#L14071'>_Primitive-break-if-></a>/imm32/next -<span id="L14071" class="LineNr">14071 </span><span class="subxMinorFunction">_Primitive-break-if-></span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14072" class="LineNr">14072 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14073" class="LineNr">14073 </span> 0x11/imm32/alloc-id:fake -<span id="L14074" class="LineNr">14074 </span> <a href='mu.subx.html#L14714'>_string-break-if-></a>/imm32/name -<span id="L14075" class="LineNr">14075 </span> 0/imm32/no-inouts -<span id="L14076" class="LineNr">14076 </span> 0/imm32/no-inouts -<span id="L14077" class="LineNr">14077 </span> 0/imm32/no-outputs -<span id="L14078" class="LineNr">14078 </span> 0/imm32/no-outputs -<span id="L14079" class="LineNr">14079 </span> 0x11/imm32/alloc-id:fake -<span id="L14080" class="LineNr">14080 </span> <a href='mu.subx.html#L15046'>_string_0f_8f_jump_break</a>/imm32/subx-name -<span id="L14081" class="LineNr">14081 </span> 0/imm32/no-rm32 -<span id="L14082" class="LineNr">14082 </span> 0/imm32/no-r32 -<span id="L14083" class="LineNr">14083 </span> 0/imm32/no-imm32 -<span id="L14084" class="LineNr">14084 </span> 0/imm32/no-disp32 -<span id="L14085" class="LineNr">14085 </span> 0/imm32/no-output +<span id="L14070" class="LineNr">14070 </span> <a href='mu.subx.html#L14749'>_string-break-if->=</a>/imm32/name +<span id="L14071" class="LineNr">14071 </span> 0/imm32/no-inouts +<span id="L14072" class="LineNr">14072 </span> 0/imm32/no-inouts +<span id="L14073" class="LineNr">14073 </span> 0/imm32/no-outputs +<span id="L14074" class="LineNr">14074 </span> 0/imm32/no-outputs +<span id="L14075" class="LineNr">14075 </span> 0x11/imm32/alloc-id:fake +<span id="L14076" class="LineNr">14076 </span> <a href='mu.subx.html#L15046'>_string_0f_8d_jump_break</a>/imm32/subx-name +<span id="L14077" class="LineNr">14077 </span> 0/imm32/no-rm32 +<span id="L14078" class="LineNr">14078 </span> 0/imm32/no-r32 +<span id="L14079" class="LineNr">14079 </span> 0/imm32/no-imm32 +<span id="L14080" class="LineNr">14080 </span> 0/imm32/no-disp32 +<span id="L14081" class="LineNr">14081 </span> 0/imm32/no-output +<span id="L14082" class="LineNr">14082 </span> 0x11/imm32/alloc-id:fake +<span id="L14083" class="LineNr">14083 </span> <a href='mu.subx.html#L14084'>_Primitive-break-if-<=</a>/imm32/next +<span id="L14084" class="LineNr">14084 </span><span class="subxMinorFunction">_Primitive-break-if-<=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14085" class="LineNr">14085 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14086" class="LineNr">14086 </span> 0x11/imm32/alloc-id:fake -<span id="L14087" class="LineNr">14087 </span> <a href='mu.subx.html#L14088'>_Primitive-break</a>/imm32/next -<span id="L14088" class="LineNr">14088 </span><span class="subxMinorFunction">_Primitive-break</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14089" class="LineNr">14089 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14090" class="LineNr">14090 </span> 0x11/imm32/alloc-id:fake -<span id="L14091" class="LineNr">14091 </span> <a href='mu.subx.html#L14694'>_string-break</a>/imm32/name -<span id="L14092" class="LineNr">14092 </span> 0/imm32/no-inouts -<span id="L14093" class="LineNr">14093 </span> 0/imm32/no-inouts -<span id="L14094" class="LineNr">14094 </span> 0/imm32/no-outputs -<span id="L14095" class="LineNr">14095 </span> 0/imm32/no-outputs -<span id="L14096" class="LineNr">14096 </span> 0x11/imm32/alloc-id:fake -<span id="L14097" class="LineNr">14097 </span> <a href='mu.subx.html#L15276'>_string_e9_jump_break</a>/imm32/subx-name -<span id="L14098" class="LineNr">14098 </span> 0/imm32/no-rm32 -<span id="L14099" class="LineNr">14099 </span> 0/imm32/no-r32 -<span id="L14100" class="LineNr">14100 </span> 0/imm32/no-imm32 -<span id="L14101" class="LineNr">14101 </span> 0/imm32/no-disp32 -<span id="L14102" class="LineNr">14102 </span> 0/imm32/no-output +<span id="L14087" class="LineNr">14087 </span> <a href='mu.subx.html#L14734'>_string-break-if-<=</a>/imm32/name +<span id="L14088" class="LineNr">14088 </span> 0/imm32/no-inouts +<span id="L14089" class="LineNr">14089 </span> 0/imm32/no-inouts +<span id="L14090" class="LineNr">14090 </span> 0/imm32/no-outputs +<span id="L14091" class="LineNr">14091 </span> 0/imm32/no-outputs +<span id="L14092" class="LineNr">14092 </span> 0x11/imm32/alloc-id:fake +<span id="L14093" class="LineNr">14093 </span> <a href='mu.subx.html#L15061'>_string_0f_8e_jump_break</a>/imm32/subx-name +<span id="L14094" class="LineNr">14094 </span> 0/imm32/no-rm32 +<span id="L14095" class="LineNr">14095 </span> 0/imm32/no-r32 +<span id="L14096" class="LineNr">14096 </span> 0/imm32/no-imm32 +<span id="L14097" class="LineNr">14097 </span> 0/imm32/no-disp32 +<span id="L14098" class="LineNr">14098 </span> 0/imm32/no-output +<span id="L14099" class="LineNr">14099 </span> 0x11/imm32/alloc-id:fake +<span id="L14100" class="LineNr">14100 </span> <a href='mu.subx.html#L14101'>_Primitive-break-if-></a>/imm32/next +<span id="L14101" class="LineNr">14101 </span><span class="subxMinorFunction">_Primitive-break-if-></span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14102" class="LineNr">14102 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14103" class="LineNr">14103 </span> 0x11/imm32/alloc-id:fake -<span id="L14104" class="LineNr">14104 </span> <a href='mu.subx.html#L14105'>_Primitive-loop-if-addr<</a>/imm32/next -<span id="L14105" class="LineNr">14105 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14106" class="LineNr">14106 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14107" class="LineNr">14107 </span> 0x11/imm32/alloc-id:fake -<span id="L14108" class="LineNr">14108 </span> <a href='mu.subx.html#L14819'>_string-loop-if-addr<</a>/imm32/name -<span id="L14109" class="LineNr">14109 </span> 0/imm32/no-inouts -<span id="L14110" class="LineNr">14110 </span> 0/imm32/no-inouts -<span id="L14111" class="LineNr">14111 </span> 0/imm32/no-outputs -<span id="L14112" class="LineNr">14112 </span> 0/imm32/no-outputs -<span id="L14113" class="LineNr">14113 </span> 0x11/imm32/alloc-id:fake -<span id="L14114" class="LineNr">14114 </span> <a href='mu.subx.html#L14916'>_string_0f_82_jump_loop</a>/imm32/subx-name -<span id="L14115" class="LineNr">14115 </span> 0/imm32/no-rm32 -<span id="L14116" class="LineNr">14116 </span> 0/imm32/no-r32 -<span id="L14117" class="LineNr">14117 </span> 0/imm32/no-imm32 -<span id="L14118" class="LineNr">14118 </span> 0/imm32/no-disp32 -<span id="L14119" class="LineNr">14119 </span> 0/imm32/no-output +<span id="L14104" class="LineNr">14104 </span> <a href='mu.subx.html#L14744'>_string-break-if-></a>/imm32/name +<span id="L14105" class="LineNr">14105 </span> 0/imm32/no-inouts +<span id="L14106" class="LineNr">14106 </span> 0/imm32/no-inouts +<span id="L14107" class="LineNr">14107 </span> 0/imm32/no-outputs +<span id="L14108" class="LineNr">14108 </span> 0/imm32/no-outputs +<span id="L14109" class="LineNr">14109 </span> 0x11/imm32/alloc-id:fake +<span id="L14110" class="LineNr">14110 </span> <a href='mu.subx.html#L15076'>_string_0f_8f_jump_break</a>/imm32/subx-name +<span id="L14111" class="LineNr">14111 </span> 0/imm32/no-rm32 +<span id="L14112" class="LineNr">14112 </span> 0/imm32/no-r32 +<span id="L14113" class="LineNr">14113 </span> 0/imm32/no-imm32 +<span id="L14114" class="LineNr">14114 </span> 0/imm32/no-disp32 +<span id="L14115" class="LineNr">14115 </span> 0/imm32/no-output +<span id="L14116" class="LineNr">14116 </span> 0x11/imm32/alloc-id:fake +<span id="L14117" class="LineNr">14117 </span> <a href='mu.subx.html#L14118'>_Primitive-break</a>/imm32/next +<span id="L14118" class="LineNr">14118 </span><span class="subxMinorFunction">_Primitive-break</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14119" class="LineNr">14119 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14120" class="LineNr">14120 </span> 0x11/imm32/alloc-id:fake -<span id="L14121" class="LineNr">14121 </span> <a href='mu.subx.html#L14122'>_Primitive-loop-if-addr>=</a>/imm32/next -<span id="L14122" class="LineNr">14122 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14123" class="LineNr">14123 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14124" class="LineNr">14124 </span> 0x11/imm32/alloc-id:fake -<span id="L14125" class="LineNr">14125 </span> <a href='mu.subx.html#L14834'>_string-loop-if-addr>=</a>/imm32/name -<span id="L14126" class="LineNr">14126 </span> 0/imm32/no-inouts -<span id="L14127" class="LineNr">14127 </span> 0/imm32/no-inouts -<span id="L14128" class="LineNr">14128 </span> 0/imm32/no-outputs -<span id="L14129" class="LineNr">14129 </span> 0/imm32/no-outputs -<span id="L14130" class="LineNr">14130 </span> 0x11/imm32/alloc-id:fake -<span id="L14131" class="LineNr">14131 </span> <a href='mu.subx.html#L14931'>_string_0f_83_jump_loop</a>/imm32/subx-name -<span id="L14132" class="LineNr">14132 </span> 0/imm32/no-rm32 -<span id="L14133" class="LineNr">14133 </span> 0/imm32/no-r32 -<span id="L14134" class="LineNr">14134 </span> 0/imm32/no-imm32 -<span id="L14135" class="LineNr">14135 </span> 0/imm32/no-disp32 -<span id="L14136" class="LineNr">14136 </span> 0/imm32/no-output +<span id="L14121" class="LineNr">14121 </span> <a href='mu.subx.html#L14724'>_string-break</a>/imm32/name +<span id="L14122" class="LineNr">14122 </span> 0/imm32/no-inouts +<span id="L14123" class="LineNr">14123 </span> 0/imm32/no-inouts +<span id="L14124" class="LineNr">14124 </span> 0/imm32/no-outputs +<span id="L14125" class="LineNr">14125 </span> 0/imm32/no-outputs +<span id="L14126" class="LineNr">14126 </span> 0x11/imm32/alloc-id:fake +<span id="L14127" class="LineNr">14127 </span> <a href='mu.subx.html#L15306'>_string_e9_jump_break</a>/imm32/subx-name +<span id="L14128" class="LineNr">14128 </span> 0/imm32/no-rm32 +<span id="L14129" class="LineNr">14129 </span> 0/imm32/no-r32 +<span id="L14130" class="LineNr">14130 </span> 0/imm32/no-imm32 +<span id="L14131" class="LineNr">14131 </span> 0/imm32/no-disp32 +<span id="L14132" class="LineNr">14132 </span> 0/imm32/no-output +<span id="L14133" class="LineNr">14133 </span> 0x11/imm32/alloc-id:fake +<span id="L14134" class="LineNr">14134 </span> <a href='mu.subx.html#L14135'>_Primitive-loop-if-addr<</a>/imm32/next +<span id="L14135" class="LineNr">14135 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14136" class="LineNr">14136 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14137" class="LineNr">14137 </span> 0x11/imm32/alloc-id:fake -<span id="L14138" class="LineNr">14138 </span> <a href='mu.subx.html#L14139'>_Primitive-loop-if-=</a>/imm32/next -<span id="L14139" class="LineNr">14139 </span><span class="subxMinorFunction">_Primitive-loop-if-=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14140" class="LineNr">14140 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14141" class="LineNr">14141 </span> 0x11/imm32/alloc-id:fake -<span id="L14142" class="LineNr">14142 </span> <a href='mu.subx.html#L14799'>_string-loop-if-=</a>/imm32/name -<span id="L14143" class="LineNr">14143 </span> 0/imm32/no-inouts -<span id="L14144" class="LineNr">14144 </span> 0/imm32/no-inouts -<span id="L14145" class="LineNr">14145 </span> 0/imm32/no-outputs -<span id="L14146" class="LineNr">14146 </span> 0/imm32/no-outputs -<span id="L14147" class="LineNr">14147 </span> 0x11/imm32/alloc-id:fake -<span id="L14148" class="LineNr">14148 </span> <a href='mu.subx.html#L14946'>_string_0f_84_jump_loop</a>/imm32/subx-name -<span id="L14149" class="LineNr">14149 </span> 0/imm32/no-rm32 -<span id="L14150" class="LineNr">14150 </span> 0/imm32/no-r32 -<span id="L14151" class="LineNr">14151 </span> 0/imm32/no-imm32 -<span id="L14152" class="LineNr">14152 </span> 0/imm32/no-disp32 -<span id="L14153" class="LineNr">14153 </span> 0/imm32/no-output +<span id="L14138" class="LineNr">14138 </span> <a href='mu.subx.html#L14849'>_string-loop-if-addr<</a>/imm32/name +<span id="L14139" class="LineNr">14139 </span> 0/imm32/no-inouts +<span id="L14140" class="LineNr">14140 </span> 0/imm32/no-inouts +<span id="L14141" class="LineNr">14141 </span> 0/imm32/no-outputs +<span id="L14142" class="LineNr">14142 </span> 0/imm32/no-outputs +<span id="L14143" class="LineNr">14143 </span> 0x11/imm32/alloc-id:fake +<span id="L14144" class="LineNr">14144 </span> <a href='mu.subx.html#L14946'>_string_0f_82_jump_loop</a>/imm32/subx-name +<span id="L14145" class="LineNr">14145 </span> 0/imm32/no-rm32 +<span id="L14146" class="LineNr">14146 </span> 0/imm32/no-r32 +<span id="L14147" class="LineNr">14147 </span> 0/imm32/no-imm32 +<span id="L14148" class="LineNr">14148 </span> 0/imm32/no-disp32 +<span id="L14149" class="LineNr">14149 </span> 0/imm32/no-output +<span id="L14150" class="LineNr">14150 </span> 0x11/imm32/alloc-id:fake +<span id="L14151" class="LineNr">14151 </span> <a href='mu.subx.html#L14152'>_Primitive-loop-if-addr>=</a>/imm32/next +<span id="L14152" class="LineNr">14152 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14153" class="LineNr">14153 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14154" class="LineNr">14154 </span> 0x11/imm32/alloc-id:fake -<span id="L14155" class="LineNr">14155 </span> <a href='mu.subx.html#L14156'>_Primitive-loop-if-!=</a>/imm32/next -<span id="L14156" class="LineNr">14156 </span><span class="subxMinorFunction">_Primitive-loop-if-!=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14157" class="LineNr">14157 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14158" class="LineNr">14158 </span> 0x11/imm32/alloc-id:fake -<span id="L14159" class="LineNr">14159 </span> <a href='mu.subx.html#L14814'>_string-loop-if-!=</a>/imm32/name -<span id="L14160" class="LineNr">14160 </span> 0/imm32/no-inouts -<span id="L14161" class="LineNr">14161 </span> 0/imm32/no-inouts -<span id="L14162" class="LineNr">14162 </span> 0/imm32/no-outputs -<span id="L14163" class="LineNr">14163 </span> 0/imm32/no-outputs -<span id="L14164" class="LineNr">14164 </span> 0x11/imm32/alloc-id:fake -<span id="L14165" class="LineNr">14165 </span> <a href='mu.subx.html#L14961'>_string_0f_85_jump_loop</a>/imm32/subx-name -<span id="L14166" class="LineNr">14166 </span> 0/imm32/no-rm32 -<span id="L14167" class="LineNr">14167 </span> 0/imm32/no-r32 -<span id="L14168" class="LineNr">14168 </span> 0/imm32/no-imm32 -<span id="L14169" class="LineNr">14169 </span> 0/imm32/no-disp32 -<span id="L14170" class="LineNr">14170 </span> 0/imm32/no-output +<span id="L14155" class="LineNr">14155 </span> <a href='mu.subx.html#L14864'>_string-loop-if-addr>=</a>/imm32/name +<span id="L14156" class="LineNr">14156 </span> 0/imm32/no-inouts +<span id="L14157" class="LineNr">14157 </span> 0/imm32/no-inouts +<span id="L14158" class="LineNr">14158 </span> 0/imm32/no-outputs +<span id="L14159" class="LineNr">14159 </span> 0/imm32/no-outputs +<span id="L14160" class="LineNr">14160 </span> 0x11/imm32/alloc-id:fake +<span id="L14161" class="LineNr">14161 </span> <a href='mu.subx.html#L14961'>_string_0f_83_jump_loop</a>/imm32/subx-name +<span id="L14162" class="LineNr">14162 </span> 0/imm32/no-rm32 +<span id="L14163" class="LineNr">14163 </span> 0/imm32/no-r32 +<span id="L14164" class="LineNr">14164 </span> 0/imm32/no-imm32 +<span id="L14165" class="LineNr">14165 </span> 0/imm32/no-disp32 +<span id="L14166" class="LineNr">14166 </span> 0/imm32/no-output +<span id="L14167" class="LineNr">14167 </span> 0x11/imm32/alloc-id:fake +<span id="L14168" class="LineNr">14168 </span> <a href='mu.subx.html#L14169'>_Primitive-loop-if-=</a>/imm32/next +<span id="L14169" class="LineNr">14169 </span><span class="subxMinorFunction">_Primitive-loop-if-=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14170" class="LineNr">14170 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14171" class="LineNr">14171 </span> 0x11/imm32/alloc-id:fake -<span id="L14172" class="LineNr">14172 </span> <a href='mu.subx.html#L14173'>_Primitive-loop-if-addr<=</a>/imm32/next -<span id="L14173" class="LineNr">14173 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14174" class="LineNr">14174 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14175" class="LineNr">14175 </span> 0x11/imm32/alloc-id:fake -<span id="L14176" class="LineNr">14176 </span> <a href='mu.subx.html#L14824'>_string-loop-if-addr<=</a>/imm32/name -<span id="L14177" class="LineNr">14177 </span> 0/imm32/no-inouts -<span id="L14178" class="LineNr">14178 </span> 0/imm32/no-inouts -<span id="L14179" class="LineNr">14179 </span> 0/imm32/no-outputs -<span id="L14180" class="LineNr">14180 </span> 0/imm32/no-outputs -<span id="L14181" class="LineNr">14181 </span> 0x11/imm32/alloc-id:fake -<span id="L14182" class="LineNr">14182 </span> <a href='mu.subx.html#L14976'>_string_0f_86_jump_loop</a>/imm32/subx-name -<span id="L14183" class="LineNr">14183 </span> 0/imm32/no-rm32 -<span id="L14184" class="LineNr">14184 </span> 0/imm32/no-r32 -<span id="L14185" class="LineNr">14185 </span> 0/imm32/no-imm32 -<span id="L14186" class="LineNr">14186 </span> 0/imm32/no-disp32 -<span id="L14187" class="LineNr">14187 </span> 0/imm32/no-output +<span id="L14172" class="LineNr">14172 </span> <a href='mu.subx.html#L14829'>_string-loop-if-=</a>/imm32/name +<span id="L14173" class="LineNr">14173 </span> 0/imm32/no-inouts +<span id="L14174" class="LineNr">14174 </span> 0/imm32/no-inouts +<span id="L14175" class="LineNr">14175 </span> 0/imm32/no-outputs +<span id="L14176" class="LineNr">14176 </span> 0/imm32/no-outputs +<span id="L14177" class="LineNr">14177 </span> 0x11/imm32/alloc-id:fake +<span id="L14178" class="LineNr">14178 </span> <a href='mu.subx.html#L14976'>_string_0f_84_jump_loop</a>/imm32/subx-name +<span id="L14179" class="LineNr">14179 </span> 0/imm32/no-rm32 +<span id="L14180" class="LineNr">14180 </span> 0/imm32/no-r32 +<span id="L14181" class="LineNr">14181 </span> 0/imm32/no-imm32 +<span id="L14182" class="LineNr">14182 </span> 0/imm32/no-disp32 +<span id="L14183" class="LineNr">14183 </span> 0/imm32/no-output +<span id="L14184" class="LineNr">14184 </span> 0x11/imm32/alloc-id:fake +<span id="L14185" class="LineNr">14185 </span> <a href='mu.subx.html#L14186'>_Primitive-loop-if-!=</a>/imm32/next +<span id="L14186" class="LineNr">14186 </span><span class="subxMinorFunction">_Primitive-loop-if-!=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14187" class="LineNr">14187 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14188" class="LineNr">14188 </span> 0x11/imm32/alloc-id:fake -<span id="L14189" class="LineNr">14189 </span> <a href='mu.subx.html#L14190'>_Primitive-loop-if-addr></a>/imm32/next -<span id="L14190" class="LineNr">14190 </span><span class="subxMinorFunction">_Primitive-loop-if-addr></span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14191" class="LineNr">14191 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14192" class="LineNr">14192 </span> 0x11/imm32/alloc-id:fake -<span id="L14193" class="LineNr">14193 </span> <a href='mu.subx.html#L14829'>_string-loop-if-addr></a>/imm32/name -<span id="L14194" class="LineNr">14194 </span> 0/imm32/no-inouts -<span id="L14195" class="LineNr">14195 </span> 0/imm32/no-inouts -<span id="L14196" class="LineNr">14196 </span> 0/imm32/no-outputs -<span id="L14197" class="LineNr">14197 </span> 0/imm32/no-outputs -<span id="L14198" class="LineNr">14198 </span> 0x11/imm32/alloc-id:fake -<span id="L14199" class="LineNr">14199 </span> <a href='mu.subx.html#L14991'>_string_0f_87_jump_loop</a>/imm32/subx-name -<span id="L14200" class="LineNr">14200 </span> 0/imm32/no-rm32 -<span id="L14201" class="LineNr">14201 </span> 0/imm32/no-r32 -<span id="L14202" class="LineNr">14202 </span> 0/imm32/no-imm32 -<span id="L14203" class="LineNr">14203 </span> 0/imm32/no-disp32 -<span id="L14204" class="LineNr">14204 </span> 0/imm32/no-output +<span id="L14189" class="LineNr">14189 </span> <a href='mu.subx.html#L14844'>_string-loop-if-!=</a>/imm32/name +<span id="L14190" class="LineNr">14190 </span> 0/imm32/no-inouts +<span id="L14191" class="LineNr">14191 </span> 0/imm32/no-inouts +<span id="L14192" class="LineNr">14192 </span> 0/imm32/no-outputs +<span id="L14193" class="LineNr">14193 </span> 0/imm32/no-outputs +<span id="L14194" class="LineNr">14194 </span> 0x11/imm32/alloc-id:fake +<span id="L14195" class="LineNr">14195 </span> <a href='mu.subx.html#L14991'>_string_0f_85_jump_loop</a>/imm32/subx-name +<span id="L14196" class="LineNr">14196 </span> 0/imm32/no-rm32 +<span id="L14197" class="LineNr">14197 </span> 0/imm32/no-r32 +<span id="L14198" class="LineNr">14198 </span> 0/imm32/no-imm32 +<span id="L14199" class="LineNr">14199 </span> 0/imm32/no-disp32 +<span id="L14200" class="LineNr">14200 </span> 0/imm32/no-output +<span id="L14201" class="LineNr">14201 </span> 0x11/imm32/alloc-id:fake +<span id="L14202" class="LineNr">14202 </span> <a href='mu.subx.html#L14203'>_Primitive-loop-if-addr<=</a>/imm32/next +<span id="L14203" class="LineNr">14203 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14204" class="LineNr">14204 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14205" class="LineNr">14205 </span> 0x11/imm32/alloc-id:fake -<span id="L14206" class="LineNr">14206 </span> <a href='mu.subx.html#L14207'>_Primitive-loop-if-<</a>/imm32/next -<span id="L14207" class="LineNr">14207 </span><span class="subxMinorFunction">_Primitive-loop-if-<</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14208" class="LineNr">14208 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14209" class="LineNr">14209 </span> 0x11/imm32/alloc-id:fake -<span id="L14210" class="LineNr">14210 </span> <a href='mu.subx.html#L14789'>_string-loop-if-<</a>/imm32/name -<span id="L14211" class="LineNr">14211 </span> 0/imm32/no-inouts -<span id="L14212" class="LineNr">14212 </span> 0/imm32/no-inouts -<span id="L14213" class="LineNr">14213 </span> 0/imm32/no-outputs -<span id="L14214" class="LineNr">14214 </span> 0/imm32/no-outputs -<span id="L14215" class="LineNr">14215 </span> 0x11/imm32/alloc-id:fake -<span id="L14216" class="LineNr">14216 </span> <a href='mu.subx.html#L15006'>_string_0f_8c_jump_loop</a>/imm32/subx-name -<span id="L14217" class="LineNr">14217 </span> 0/imm32/no-rm32 -<span id="L14218" class="LineNr">14218 </span> 0/imm32/no-r32 -<span id="L14219" class="LineNr">14219 </span> 0/imm32/no-imm32 -<span id="L14220" class="LineNr">14220 </span> 0/imm32/no-disp32 -<span id="L14221" class="LineNr">14221 </span> 0/imm32/no-output +<span id="L14206" class="LineNr">14206 </span> <a href='mu.subx.html#L14854'>_string-loop-if-addr<=</a>/imm32/name +<span id="L14207" class="LineNr">14207 </span> 0/imm32/no-inouts +<span id="L14208" class="LineNr">14208 </span> 0/imm32/no-inouts +<span id="L14209" class="LineNr">14209 </span> 0/imm32/no-outputs +<span id="L14210" class="LineNr">14210 </span> 0/imm32/no-outputs +<span id="L14211" class="LineNr">14211 </span> 0x11/imm32/alloc-id:fake +<span id="L14212" class="LineNr">14212 </span> <a href='mu.subx.html#L15006'>_string_0f_86_jump_loop</a>/imm32/subx-name +<span id="L14213" class="LineNr">14213 </span> 0/imm32/no-rm32 +<span id="L14214" class="LineNr">14214 </span> 0/imm32/no-r32 +<span id="L14215" class="LineNr">14215 </span> 0/imm32/no-imm32 +<span id="L14216" class="LineNr">14216 </span> 0/imm32/no-disp32 +<span id="L14217" class="LineNr">14217 </span> 0/imm32/no-output +<span id="L14218" class="LineNr">14218 </span> 0x11/imm32/alloc-id:fake +<span id="L14219" class="LineNr">14219 </span> <a href='mu.subx.html#L14220'>_Primitive-loop-if-addr></a>/imm32/next +<span id="L14220" class="LineNr">14220 </span><span class="subxMinorFunction">_Primitive-loop-if-addr></span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14221" class="LineNr">14221 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14222" class="LineNr">14222 </span> 0x11/imm32/alloc-id:fake -<span id="L14223" class="LineNr">14223 </span> <a href='mu.subx.html#L14224'>_Primitive-loop-if->=</a>/imm32/next -<span id="L14224" class="LineNr">14224 </span><span class="subxMinorFunction">_Primitive-loop-if->=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14225" class="LineNr">14225 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14226" class="LineNr">14226 </span> 0x11/imm32/alloc-id:fake -<span id="L14227" class="LineNr">14227 </span> <a href='mu.subx.html#L14809'>_string-loop-if->=</a>/imm32/name -<span id="L14228" class="LineNr">14228 </span> 0/imm32/no-inouts -<span id="L14229" class="LineNr">14229 </span> 0/imm32/no-inouts -<span id="L14230" class="LineNr">14230 </span> 0/imm32/no-outputs -<span id="L14231" class="LineNr">14231 </span> 0/imm32/no-outputs -<span id="L14232" class="LineNr">14232 </span> 0x11/imm32/alloc-id:fake -<span id="L14233" class="LineNr">14233 </span> <a href='mu.subx.html#L15021'>_string_0f_8d_jump_loop</a>/imm32/subx-name -<span id="L14234" class="LineNr">14234 </span> 0/imm32/no-rm32 -<span id="L14235" class="LineNr">14235 </span> 0/imm32/no-r32 -<span id="L14236" class="LineNr">14236 </span> 0/imm32/no-imm32 -<span id="L14237" class="LineNr">14237 </span> 0/imm32/no-disp32 -<span id="L14238" class="LineNr">14238 </span> 0/imm32/no-output +<span id="L14223" class="LineNr">14223 </span> <a href='mu.subx.html#L14859'>_string-loop-if-addr></a>/imm32/name +<span id="L14224" class="LineNr">14224 </span> 0/imm32/no-inouts +<span id="L14225" class="LineNr">14225 </span> 0/imm32/no-inouts +<span id="L14226" class="LineNr">14226 </span> 0/imm32/no-outputs +<span id="L14227" class="LineNr">14227 </span> 0/imm32/no-outputs +<span id="L14228" class="LineNr">14228 </span> 0x11/imm32/alloc-id:fake +<span id="L14229" class="LineNr">14229 </span> <a href='mu.subx.html#L15021'>_string_0f_87_jump_loop</a>/imm32/subx-name +<span id="L14230" class="LineNr">14230 </span> 0/imm32/no-rm32 +<span id="L14231" class="LineNr">14231 </span> 0/imm32/no-r32 +<span id="L14232" class="LineNr">14232 </span> 0/imm32/no-imm32 +<span id="L14233" class="LineNr">14233 </span> 0/imm32/no-disp32 +<span id="L14234" class="LineNr">14234 </span> 0/imm32/no-output +<span id="L14235" class="LineNr">14235 </span> 0x11/imm32/alloc-id:fake +<span id="L14236" class="LineNr">14236 </span> <a href='mu.subx.html#L14237'>_Primitive-loop-if-<</a>/imm32/next +<span id="L14237" class="LineNr">14237 </span><span class="subxMinorFunction">_Primitive-loop-if-<</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14238" class="LineNr">14238 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14239" class="LineNr">14239 </span> 0x11/imm32/alloc-id:fake -<span id="L14240" class="LineNr">14240 </span> <a href='mu.subx.html#L14241'>_Primitive-loop-if-<=</a>/imm32/next -<span id="L14241" class="LineNr">14241 </span><span class="subxMinorFunction">_Primitive-loop-if-<=</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14242" class="LineNr">14242 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14243" class="LineNr">14243 </span> 0x11/imm32/alloc-id:fake -<span id="L14244" class="LineNr">14244 </span> <a href='mu.subx.html#L14794'>_string-loop-if-<=</a>/imm32/name -<span id="L14245" class="LineNr">14245 </span> 0/imm32/no-inouts -<span id="L14246" class="LineNr">14246 </span> 0/imm32/no-inouts -<span id="L14247" class="LineNr">14247 </span> 0/imm32/no-outputs -<span id="L14248" class="LineNr">14248 </span> 0/imm32/no-outputs -<span id="L14249" class="LineNr">14249 </span> 0x11/imm32/alloc-id:fake -<span id="L14250" class="LineNr">14250 </span> <a href='mu.subx.html#L15036'>_string_0f_8e_jump_loop</a>/imm32/subx-name -<span id="L14251" class="LineNr">14251 </span> 0/imm32/no-rm32 -<span id="L14252" class="LineNr">14252 </span> 0/imm32/no-r32 -<span id="L14253" class="LineNr">14253 </span> 0/imm32/no-imm32 -<span id="L14254" class="LineNr">14254 </span> 0/imm32/no-disp32 -<span id="L14255" class="LineNr">14255 </span> 0/imm32/no-output +<span id="L14240" class="LineNr">14240 </span> <a href='mu.subx.html#L14819'>_string-loop-if-<</a>/imm32/name +<span id="L14241" class="LineNr">14241 </span> 0/imm32/no-inouts +<span id="L14242" class="LineNr">14242 </span> 0/imm32/no-inouts +<span id="L14243" class="LineNr">14243 </span> 0/imm32/no-outputs +<span id="L14244" class="LineNr">14244 </span> 0/imm32/no-outputs +<span id="L14245" class="LineNr">14245 </span> 0x11/imm32/alloc-id:fake +<span id="L14246" class="LineNr">14246 </span> <a href='mu.subx.html#L15036'>_string_0f_8c_jump_loop</a>/imm32/subx-name +<span id="L14247" class="LineNr">14247 </span> 0/imm32/no-rm32 +<span id="L14248" class="LineNr">14248 </span> 0/imm32/no-r32 +<span id="L14249" class="LineNr">14249 </span> 0/imm32/no-imm32 +<span id="L14250" class="LineNr">14250 </span> 0/imm32/no-disp32 +<span id="L14251" class="LineNr">14251 </span> 0/imm32/no-output +<span id="L14252" class="LineNr">14252 </span> 0x11/imm32/alloc-id:fake +<span id="L14253" class="LineNr">14253 </span> <a href='mu.subx.html#L14254'>_Primitive-loop-if->=</a>/imm32/next +<span id="L14254" class="LineNr">14254 </span><span class="subxMinorFunction">_Primitive-loop-if->=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14255" class="LineNr">14255 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14256" class="LineNr">14256 </span> 0x11/imm32/alloc-id:fake -<span id="L14257" class="LineNr">14257 </span> <a href='mu.subx.html#L14258'>_Primitive-loop-if-></a>/imm32/next -<span id="L14258" class="LineNr">14258 </span><span class="subxMinorFunction">_Primitive-loop-if-></span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14259" class="LineNr">14259 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14260" class="LineNr">14260 </span> 0x11/imm32/alloc-id:fake -<span id="L14261" class="LineNr">14261 </span> <a href='mu.subx.html#L14804'>_string-loop-if-></a>/imm32/name -<span id="L14262" class="LineNr">14262 </span> 0/imm32/no-inouts -<span id="L14263" class="LineNr">14263 </span> 0/imm32/no-inouts -<span id="L14264" class="LineNr">14264 </span> 0/imm32/no-outputs -<span id="L14265" class="LineNr">14265 </span> 0/imm32/no-outputs -<span id="L14266" class="LineNr">14266 </span> 0x11/imm32/alloc-id:fake -<span id="L14267" class="LineNr">14267 </span> <a href='mu.subx.html#L15051'>_string_0f_8f_jump_loop</a>/imm32/subx-name -<span id="L14268" class="LineNr">14268 </span> 0/imm32/no-rm32 -<span id="L14269" class="LineNr">14269 </span> 0/imm32/no-r32 -<span id="L14270" class="LineNr">14270 </span> 0/imm32/no-imm32 -<span id="L14271" class="LineNr">14271 </span> 0/imm32/no-disp32 -<span id="L14272" class="LineNr">14272 </span> 0/imm32/no-output +<span id="L14257" class="LineNr">14257 </span> <a href='mu.subx.html#L14839'>_string-loop-if->=</a>/imm32/name +<span id="L14258" class="LineNr">14258 </span> 0/imm32/no-inouts +<span id="L14259" class="LineNr">14259 </span> 0/imm32/no-inouts +<span id="L14260" class="LineNr">14260 </span> 0/imm32/no-outputs +<span id="L14261" class="LineNr">14261 </span> 0/imm32/no-outputs +<span id="L14262" class="LineNr">14262 </span> 0x11/imm32/alloc-id:fake +<span id="L14263" class="LineNr">14263 </span> <a href='mu.subx.html#L15051'>_string_0f_8d_jump_loop</a>/imm32/subx-name +<span id="L14264" class="LineNr">14264 </span> 0/imm32/no-rm32 +<span id="L14265" class="LineNr">14265 </span> 0/imm32/no-r32 +<span id="L14266" class="LineNr">14266 </span> 0/imm32/no-imm32 +<span id="L14267" class="LineNr">14267 </span> 0/imm32/no-disp32 +<span id="L14268" class="LineNr">14268 </span> 0/imm32/no-output +<span id="L14269" class="LineNr">14269 </span> 0x11/imm32/alloc-id:fake +<span id="L14270" class="LineNr">14270 </span> <a href='mu.subx.html#L14271'>_Primitive-loop-if-<=</a>/imm32/next +<span id="L14271" class="LineNr">14271 </span><span class="subxMinorFunction">_Primitive-loop-if-<=</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14272" class="LineNr">14272 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14273" class="LineNr">14273 </span> 0x11/imm32/alloc-id:fake -<span id="L14274" class="LineNr">14274 </span> <a href='mu.subx.html#L14275'>_Primitive-loop</a>/imm32/next <span class="subxComment"># we probably don't need an unconditional break</span> -<span id="L14275" class="LineNr">14275 </span><span class="subxMinorFunction">_Primitive-loop</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14276" class="LineNr">14276 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14277" class="LineNr">14277 </span> 0x11/imm32/alloc-id:fake -<span id="L14278" class="LineNr">14278 </span> <a href='mu.subx.html#L14784'>_string-loop</a>/imm32/name -<span id="L14279" class="LineNr">14279 </span> 0/imm32/no-inouts -<span id="L14280" class="LineNr">14280 </span> 0/imm32/no-inouts -<span id="L14281" class="LineNr">14281 </span> 0/imm32/no-outputs -<span id="L14282" class="LineNr">14282 </span> 0/imm32/no-outputs -<span id="L14283" class="LineNr">14283 </span> 0x11/imm32/alloc-id:fake -<span id="L14284" class="LineNr">14284 </span> <a href='mu.subx.html#L15281'>_string_e9_jump_loop</a>/imm32/subx-name -<span id="L14285" class="LineNr">14285 </span> 0/imm32/no-rm32 -<span id="L14286" class="LineNr">14286 </span> 0/imm32/no-r32 -<span id="L14287" class="LineNr">14287 </span> 0/imm32/no-imm32 -<span id="L14288" class="LineNr">14288 </span> 0/imm32/no-disp32 -<span id="L14289" class="LineNr">14289 </span> 0/imm32/no-output +<span id="L14274" class="LineNr">14274 </span> <a href='mu.subx.html#L14824'>_string-loop-if-<=</a>/imm32/name +<span id="L14275" class="LineNr">14275 </span> 0/imm32/no-inouts +<span id="L14276" class="LineNr">14276 </span> 0/imm32/no-inouts +<span id="L14277" class="LineNr">14277 </span> 0/imm32/no-outputs +<span id="L14278" class="LineNr">14278 </span> 0/imm32/no-outputs +<span id="L14279" class="LineNr">14279 </span> 0x11/imm32/alloc-id:fake +<span id="L14280" class="LineNr">14280 </span> <a href='mu.subx.html#L15066'>_string_0f_8e_jump_loop</a>/imm32/subx-name +<span id="L14281" class="LineNr">14281 </span> 0/imm32/no-rm32 +<span id="L14282" class="LineNr">14282 </span> 0/imm32/no-r32 +<span id="L14283" class="LineNr">14283 </span> 0/imm32/no-imm32 +<span id="L14284" class="LineNr">14284 </span> 0/imm32/no-disp32 +<span id="L14285" class="LineNr">14285 </span> 0/imm32/no-output +<span id="L14286" class="LineNr">14286 </span> 0x11/imm32/alloc-id:fake +<span id="L14287" class="LineNr">14287 </span> <a href='mu.subx.html#L14288'>_Primitive-loop-if-></a>/imm32/next +<span id="L14288" class="LineNr">14288 </span><span class="subxMinorFunction">_Primitive-loop-if-></span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14289" class="LineNr">14289 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14290" class="LineNr">14290 </span> 0x11/imm32/alloc-id:fake -<span id="L14291" class="LineNr">14291 </span> <a href='mu.subx.html#L14293'>_Primitive-break-if-addr<-named</a>/imm32/next -<span id="L14292" class="LineNr">14292 </span><span class="subxH1Comment"># - branches to named blocks</span> -<span id="L14293" class="LineNr">14293 </span><span class="subxMinorFunction">_Primitive-break-if-addr<-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14294" class="LineNr">14294 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14295" class="LineNr">14295 </span> 0x11/imm32/alloc-id:fake -<span id="L14296" class="LineNr">14296 </span> <a href='mu.subx.html#L14729'>_string-break-if-addr<</a>/imm32/name -<span id="L14297" class="LineNr">14297 </span> 0x11/imm32/alloc-id:fake -<span id="L14298" class="LineNr">14298 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14299" class="LineNr">14299 </span> 0/imm32/no-outputs -<span id="L14300" class="LineNr">14300 </span> 0/imm32/no-outputs -<span id="L14301" class="LineNr">14301 </span> 0x11/imm32/alloc-id:fake -<span id="L14302" class="LineNr">14302 </span> <a href='mu.subx.html#L14906'>_string_0f_82_jump_label</a>/imm32/subx-name -<span id="L14303" class="LineNr">14303 </span> 0/imm32/no-rm32 -<span id="L14304" class="LineNr">14304 </span> 0/imm32/no-r32 -<span id="L14305" class="LineNr">14305 </span> 0/imm32/no-imm32 -<span id="L14306" class="LineNr">14306 </span> 1/imm32/disp32-is-first-inout -<span id="L14307" class="LineNr">14307 </span> 0/imm32/no-output -<span id="L14308" class="LineNr">14308 </span> 0x11/imm32/alloc-id:fake -<span id="L14309" class="LineNr">14309 </span> <a href='mu.subx.html#L14310'>_Primitive-break-if-addr>=-named</a>/imm32/next -<span id="L14310" class="LineNr">14310 </span><span class="subxMinorFunction">_Primitive-break-if-addr>=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14311" class="LineNr">14311 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14312" class="LineNr">14312 </span> 0x11/imm32/alloc-id:fake -<span id="L14313" class="LineNr">14313 </span> <a href='mu.subx.html#L14744'>_string-break-if-addr>=</a>/imm32/name -<span id="L14314" class="LineNr">14314 </span> 0x11/imm32/alloc-id:fake -<span id="L14315" class="LineNr">14315 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14316" class="LineNr">14316 </span> 0/imm32/no-outputs -<span id="L14317" class="LineNr">14317 </span> 0/imm32/no-outputs -<span id="L14318" class="LineNr">14318 </span> 0x11/imm32/alloc-id:fake -<span id="L14319" class="LineNr">14319 </span> <a href='mu.subx.html#L14921'>_string_0f_83_jump_label</a>/imm32/subx-name -<span id="L14320" class="LineNr">14320 </span> 0/imm32/no-rm32 -<span id="L14321" class="LineNr">14321 </span> 0/imm32/no-r32 -<span id="L14322" class="LineNr">14322 </span> 0/imm32/no-imm32 -<span id="L14323" class="LineNr">14323 </span> 1/imm32/disp32-is-first-inout -<span id="L14324" class="LineNr">14324 </span> 0/imm32/no-output +<span id="L14291" class="LineNr">14291 </span> <a href='mu.subx.html#L14834'>_string-loop-if-></a>/imm32/name +<span id="L14292" class="LineNr">14292 </span> 0/imm32/no-inouts +<span id="L14293" class="LineNr">14293 </span> 0/imm32/no-inouts +<span id="L14294" class="LineNr">14294 </span> 0/imm32/no-outputs +<span id="L14295" class="LineNr">14295 </span> 0/imm32/no-outputs +<span id="L14296" class="LineNr">14296 </span> 0x11/imm32/alloc-id:fake +<span id="L14297" class="LineNr">14297 </span> <a href='mu.subx.html#L15081'>_string_0f_8f_jump_loop</a>/imm32/subx-name +<span id="L14298" class="LineNr">14298 </span> 0/imm32/no-rm32 +<span id="L14299" class="LineNr">14299 </span> 0/imm32/no-r32 +<span id="L14300" class="LineNr">14300 </span> 0/imm32/no-imm32 +<span id="L14301" class="LineNr">14301 </span> 0/imm32/no-disp32 +<span id="L14302" class="LineNr">14302 </span> 0/imm32/no-output +<span id="L14303" class="LineNr">14303 </span> 0x11/imm32/alloc-id:fake +<span id="L14304" class="LineNr">14304 </span> <a href='mu.subx.html#L14305'>_Primitive-loop</a>/imm32/next <span class="subxComment"># we probably don't need an unconditional break</span> +<span id="L14305" class="LineNr">14305 </span><span class="subxMinorFunction">_Primitive-loop</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14306" class="LineNr">14306 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14307" class="LineNr">14307 </span> 0x11/imm32/alloc-id:fake +<span id="L14308" class="LineNr">14308 </span> <a href='mu.subx.html#L14814'>_string-loop</a>/imm32/name +<span id="L14309" class="LineNr">14309 </span> 0/imm32/no-inouts +<span id="L14310" class="LineNr">14310 </span> 0/imm32/no-inouts +<span id="L14311" class="LineNr">14311 </span> 0/imm32/no-outputs +<span id="L14312" class="LineNr">14312 </span> 0/imm32/no-outputs +<span id="L14313" class="LineNr">14313 </span> 0x11/imm32/alloc-id:fake +<span id="L14314" class="LineNr">14314 </span> <a href='mu.subx.html#L15311'>_string_e9_jump_loop</a>/imm32/subx-name +<span id="L14315" class="LineNr">14315 </span> 0/imm32/no-rm32 +<span id="L14316" class="LineNr">14316 </span> 0/imm32/no-r32 +<span id="L14317" class="LineNr">14317 </span> 0/imm32/no-imm32 +<span id="L14318" class="LineNr">14318 </span> 0/imm32/no-disp32 +<span id="L14319" class="LineNr">14319 </span> 0/imm32/no-output +<span id="L14320" class="LineNr">14320 </span> 0x11/imm32/alloc-id:fake +<span id="L14321" class="LineNr">14321 </span> <a href='mu.subx.html#L14323'>_Primitive-break-if-addr<-named</a>/imm32/next +<span id="L14322" class="LineNr">14322 </span><span class="subxH1Comment"># - branches to named blocks</span> +<span id="L14323" class="LineNr">14323 </span><span class="subxMinorFunction">_Primitive-break-if-addr<-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14324" class="LineNr">14324 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14325" class="LineNr">14325 </span> 0x11/imm32/alloc-id:fake -<span id="L14326" class="LineNr">14326 </span> <a href='mu.subx.html#L14327'>_Primitive-break-if-=-named</a>/imm32/next -<span id="L14327" class="LineNr">14327 </span><span class="subxMinorFunction">_Primitive-break-if-=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14328" class="LineNr">14328 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14329" class="LineNr">14329 </span> 0x11/imm32/alloc-id:fake -<span id="L14330" class="LineNr">14330 </span> <a href='mu.subx.html#L14709'>_string-break-if-=</a>/imm32/name +<span id="L14326" class="LineNr">14326 </span> <a href='mu.subx.html#L14759'>_string-break-if-addr<</a>/imm32/name +<span id="L14327" class="LineNr">14327 </span> 0x11/imm32/alloc-id:fake +<span id="L14328" class="LineNr">14328 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14329" class="LineNr">14329 </span> 0/imm32/no-outputs +<span id="L14330" class="LineNr">14330 </span> 0/imm32/no-outputs <span id="L14331" class="LineNr">14331 </span> 0x11/imm32/alloc-id:fake -<span id="L14332" class="LineNr">14332 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14333" class="LineNr">14333 </span> 0/imm32/no-outputs -<span id="L14334" class="LineNr">14334 </span> 0/imm32/no-outputs -<span id="L14335" class="LineNr">14335 </span> 0x11/imm32/alloc-id:fake -<span id="L14336" class="LineNr">14336 </span> <a href='mu.subx.html#L14936'>_string_0f_84_jump_label</a>/imm32/subx-name -<span id="L14337" class="LineNr">14337 </span> 0/imm32/no-rm32 -<span id="L14338" class="LineNr">14338 </span> 0/imm32/no-r32 -<span id="L14339" class="LineNr">14339 </span> 0/imm32/no-imm32 -<span id="L14340" class="LineNr">14340 </span> 1/imm32/disp32-is-first-inout -<span id="L14341" class="LineNr">14341 </span> 0/imm32/no-output +<span id="L14332" class="LineNr">14332 </span> <a href='mu.subx.html#L14936'>_string_0f_82_jump_label</a>/imm32/subx-name +<span id="L14333" class="LineNr">14333 </span> 0/imm32/no-rm32 +<span id="L14334" class="LineNr">14334 </span> 0/imm32/no-r32 +<span id="L14335" class="LineNr">14335 </span> 0/imm32/no-imm32 +<span id="L14336" class="LineNr">14336 </span> 1/imm32/disp32-is-first-inout +<span id="L14337" class="LineNr">14337 </span> 0/imm32/no-output +<span id="L14338" class="LineNr">14338 </span> 0x11/imm32/alloc-id:fake +<span id="L14339" class="LineNr">14339 </span> <a href='mu.subx.html#L14340'>_Primitive-break-if-addr>=-named</a>/imm32/next +<span id="L14340" class="LineNr">14340 </span><span class="subxMinorFunction">_Primitive-break-if-addr>=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14341" class="LineNr">14341 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14342" class="LineNr">14342 </span> 0x11/imm32/alloc-id:fake -<span id="L14343" class="LineNr">14343 </span> <a href='mu.subx.html#L14344'>_Primitive-break-if-!=-named</a>/imm32/next -<span id="L14344" class="LineNr">14344 </span><span class="subxMinorFunction">_Primitive-break-if-!=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14345" class="LineNr">14345 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14346" class="LineNr">14346 </span> 0x11/imm32/alloc-id:fake -<span id="L14347" class="LineNr">14347 </span> <a href='mu.subx.html#L14724'>_string-break-if-!=</a>/imm32/name +<span id="L14343" class="LineNr">14343 </span> <a href='mu.subx.html#L14774'>_string-break-if-addr>=</a>/imm32/name +<span id="L14344" class="LineNr">14344 </span> 0x11/imm32/alloc-id:fake +<span id="L14345" class="LineNr">14345 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14346" class="LineNr">14346 </span> 0/imm32/no-outputs +<span id="L14347" class="LineNr">14347 </span> 0/imm32/no-outputs <span id="L14348" class="LineNr">14348 </span> 0x11/imm32/alloc-id:fake -<span id="L14349" class="LineNr">14349 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14350" class="LineNr">14350 </span> 0/imm32/no-outputs -<span id="L14351" class="LineNr">14351 </span> 0/imm32/no-outputs -<span id="L14352" class="LineNr">14352 </span> 0x11/imm32/alloc-id:fake -<span id="L14353" class="LineNr">14353 </span> <a href='mu.subx.html#L14951'>_string_0f_85_jump_label</a>/imm32/subx-name -<span id="L14354" class="LineNr">14354 </span> 0/imm32/no-rm32 -<span id="L14355" class="LineNr">14355 </span> 0/imm32/no-r32 -<span id="L14356" class="LineNr">14356 </span> 0/imm32/no-imm32 -<span id="L14357" class="LineNr">14357 </span> 1/imm32/disp32-is-first-inout -<span id="L14358" class="LineNr">14358 </span> 0/imm32/no-output +<span id="L14349" class="LineNr">14349 </span> <a href='mu.subx.html#L14951'>_string_0f_83_jump_label</a>/imm32/subx-name +<span id="L14350" class="LineNr">14350 </span> 0/imm32/no-rm32 +<span id="L14351" class="LineNr">14351 </span> 0/imm32/no-r32 +<span id="L14352" class="LineNr">14352 </span> 0/imm32/no-imm32 +<span id="L14353" class="LineNr">14353 </span> 1/imm32/disp32-is-first-inout +<span id="L14354" class="LineNr">14354 </span> 0/imm32/no-output +<span id="L14355" class="LineNr">14355 </span> 0x11/imm32/alloc-id:fake +<span id="L14356" class="LineNr">14356 </span> <a href='mu.subx.html#L14357'>_Primitive-break-if-=-named</a>/imm32/next +<span id="L14357" class="LineNr">14357 </span><span class="subxMinorFunction">_Primitive-break-if-=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14358" class="LineNr">14358 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14359" class="LineNr">14359 </span> 0x11/imm32/alloc-id:fake -<span id="L14360" class="LineNr">14360 </span> <a href='mu.subx.html#L14361'>_Primitive-break-if-addr<=-named</a>/imm32/next -<span id="L14361" class="LineNr">14361 </span><span class="subxMinorFunction">_Primitive-break-if-addr<=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14362" class="LineNr">14362 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14363" class="LineNr">14363 </span> 0x11/imm32/alloc-id:fake -<span id="L14364" class="LineNr">14364 </span> <a href='mu.subx.html#L14734'>_string-break-if-addr<=</a>/imm32/name +<span id="L14360" class="LineNr">14360 </span> <a href='mu.subx.html#L14739'>_string-break-if-=</a>/imm32/name +<span id="L14361" class="LineNr">14361 </span> 0x11/imm32/alloc-id:fake +<span id="L14362" class="LineNr">14362 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14363" class="LineNr">14363 </span> 0/imm32/no-outputs +<span id="L14364" class="LineNr">14364 </span> 0/imm32/no-outputs <span id="L14365" class="LineNr">14365 </span> 0x11/imm32/alloc-id:fake -<span id="L14366" class="LineNr">14366 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14367" class="LineNr">14367 </span> 0/imm32/no-outputs -<span id="L14368" class="LineNr">14368 </span> 0/imm32/no-outputs -<span id="L14369" class="LineNr">14369 </span> 0x11/imm32/alloc-id:fake -<span id="L14370" class="LineNr">14370 </span> <a href='mu.subx.html#L14966'>_string_0f_86_jump_label</a>/imm32/subx-name -<span id="L14371" class="LineNr">14371 </span> 0/imm32/no-rm32 -<span id="L14372" class="LineNr">14372 </span> 0/imm32/no-r32 -<span id="L14373" class="LineNr">14373 </span> 0/imm32/no-imm32 -<span id="L14374" class="LineNr">14374 </span> 1/imm32/disp32-is-first-inout -<span id="L14375" class="LineNr">14375 </span> 0/imm32/no-output +<span id="L14366" class="LineNr">14366 </span> <a href='mu.subx.html#L14966'>_string_0f_84_jump_label</a>/imm32/subx-name +<span id="L14367" class="LineNr">14367 </span> 0/imm32/no-rm32 +<span id="L14368" class="LineNr">14368 </span> 0/imm32/no-r32 +<span id="L14369" class="LineNr">14369 </span> 0/imm32/no-imm32 +<span id="L14370" class="LineNr">14370 </span> 1/imm32/disp32-is-first-inout +<span id="L14371" class="LineNr">14371 </span> 0/imm32/no-output +<span id="L14372" class="LineNr">14372 </span> 0x11/imm32/alloc-id:fake +<span id="L14373" class="LineNr">14373 </span> <a href='mu.subx.html#L14374'>_Primitive-break-if-!=-named</a>/imm32/next +<span id="L14374" class="LineNr">14374 </span><span class="subxMinorFunction">_Primitive-break-if-!=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14375" class="LineNr">14375 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14376" class="LineNr">14376 </span> 0x11/imm32/alloc-id:fake -<span id="L14377" class="LineNr">14377 </span> <a href='mu.subx.html#L14378'>_Primitive-break-if-addr>-named</a>/imm32/next -<span id="L14378" class="LineNr">14378 </span><span class="subxMinorFunction">_Primitive-break-if-addr>-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14379" class="LineNr">14379 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14380" class="LineNr">14380 </span> 0x11/imm32/alloc-id:fake -<span id="L14381" class="LineNr">14381 </span> <a href='mu.subx.html#L14739'>_string-break-if-addr></a>/imm32/name +<span id="L14377" class="LineNr">14377 </span> <a href='mu.subx.html#L14754'>_string-break-if-!=</a>/imm32/name +<span id="L14378" class="LineNr">14378 </span> 0x11/imm32/alloc-id:fake +<span id="L14379" class="LineNr">14379 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14380" class="LineNr">14380 </span> 0/imm32/no-outputs +<span id="L14381" class="LineNr">14381 </span> 0/imm32/no-outputs <span id="L14382" class="LineNr">14382 </span> 0x11/imm32/alloc-id:fake -<span id="L14383" class="LineNr">14383 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14384" class="LineNr">14384 </span> 0/imm32/no-outputs -<span id="L14385" class="LineNr">14385 </span> 0/imm32/no-outputs -<span id="L14386" class="LineNr">14386 </span> 0x11/imm32/alloc-id:fake -<span id="L14387" class="LineNr">14387 </span> <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32/subx-name -<span id="L14388" class="LineNr">14388 </span> 0/imm32/no-rm32 -<span id="L14389" class="LineNr">14389 </span> 0/imm32/no-r32 -<span id="L14390" class="LineNr">14390 </span> 0/imm32/no-imm32 -<span id="L14391" class="LineNr">14391 </span> 1/imm32/disp32-is-first-inout -<span id="L14392" class="LineNr">14392 </span> 0/imm32/no-output +<span id="L14383" class="LineNr">14383 </span> <a href='mu.subx.html#L14981'>_string_0f_85_jump_label</a>/imm32/subx-name +<span id="L14384" class="LineNr">14384 </span> 0/imm32/no-rm32 +<span id="L14385" class="LineNr">14385 </span> 0/imm32/no-r32 +<span id="L14386" class="LineNr">14386 </span> 0/imm32/no-imm32 +<span id="L14387" class="LineNr">14387 </span> 1/imm32/disp32-is-first-inout +<span id="L14388" class="LineNr">14388 </span> 0/imm32/no-output +<span id="L14389" class="LineNr">14389 </span> 0x11/imm32/alloc-id:fake +<span id="L14390" class="LineNr">14390 </span> <a href='mu.subx.html#L14391'>_Primitive-break-if-addr<=-named</a>/imm32/next +<span id="L14391" class="LineNr">14391 </span><span class="subxMinorFunction">_Primitive-break-if-addr<=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14392" class="LineNr">14392 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14393" class="LineNr">14393 </span> 0x11/imm32/alloc-id:fake -<span id="L14394" class="LineNr">14394 </span> <a href='mu.subx.html#L14395'>_Primitive-break-if-<-named</a>/imm32/next -<span id="L14395" class="LineNr">14395 </span><span class="subxMinorFunction">_Primitive-break-if-<-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14396" class="LineNr">14396 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14397" class="LineNr">14397 </span> 0x11/imm32/alloc-id:fake -<span id="L14398" class="LineNr">14398 </span> <a href='mu.subx.html#L14699'>_string-break-if-<</a>/imm32/name +<span id="L14394" class="LineNr">14394 </span> <a href='mu.subx.html#L14764'>_string-break-if-addr<=</a>/imm32/name +<span id="L14395" class="LineNr">14395 </span> 0x11/imm32/alloc-id:fake +<span id="L14396" class="LineNr">14396 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14397" class="LineNr">14397 </span> 0/imm32/no-outputs +<span id="L14398" class="LineNr">14398 </span> 0/imm32/no-outputs <span id="L14399" class="LineNr">14399 </span> 0x11/imm32/alloc-id:fake -<span id="L14400" class="LineNr">14400 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14401" class="LineNr">14401 </span> 0/imm32/no-outputs -<span id="L14402" class="LineNr">14402 </span> 0/imm32/no-outputs -<span id="L14403" class="LineNr">14403 </span> 0x11/imm32/alloc-id:fake -<span id="L14404" class="LineNr">14404 </span> <a href='mu.subx.html#L14996'>_string_0f_8c_jump_label</a>/imm32/subx-name -<span id="L14405" class="LineNr">14405 </span> 0/imm32/no-rm32 -<span id="L14406" class="LineNr">14406 </span> 0/imm32/no-r32 -<span id="L14407" class="LineNr">14407 </span> 0/imm32/no-imm32 -<span id="L14408" class="LineNr">14408 </span> 1/imm32/disp32-is-first-inout -<span id="L14409" class="LineNr">14409 </span> 0/imm32/no-output +<span id="L14400" class="LineNr">14400 </span> <a href='mu.subx.html#L14996'>_string_0f_86_jump_label</a>/imm32/subx-name +<span id="L14401" class="LineNr">14401 </span> 0/imm32/no-rm32 +<span id="L14402" class="LineNr">14402 </span> 0/imm32/no-r32 +<span id="L14403" class="LineNr">14403 </span> 0/imm32/no-imm32 +<span id="L14404" class="LineNr">14404 </span> 1/imm32/disp32-is-first-inout +<span id="L14405" class="LineNr">14405 </span> 0/imm32/no-output +<span id="L14406" class="LineNr">14406 </span> 0x11/imm32/alloc-id:fake +<span id="L14407" class="LineNr">14407 </span> <a href='mu.subx.html#L14408'>_Primitive-break-if-addr>-named</a>/imm32/next +<span id="L14408" class="LineNr">14408 </span><span class="subxMinorFunction">_Primitive-break-if-addr>-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14409" class="LineNr">14409 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14410" class="LineNr">14410 </span> 0x11/imm32/alloc-id:fake -<span id="L14411" class="LineNr">14411 </span> <a href='mu.subx.html#L14412'>_Primitive-break-if->=-named</a>/imm32/next -<span id="L14412" class="LineNr">14412 </span><span class="subxMinorFunction">_Primitive-break-if->=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14413" class="LineNr">14413 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14414" class="LineNr">14414 </span> 0x11/imm32/alloc-id:fake -<span id="L14415" class="LineNr">14415 </span> <a href='mu.subx.html#L14719'>_string-break-if->=</a>/imm32/name +<span id="L14411" class="LineNr">14411 </span> <a href='mu.subx.html#L14769'>_string-break-if-addr></a>/imm32/name +<span id="L14412" class="LineNr">14412 </span> 0x11/imm32/alloc-id:fake +<span id="L14413" class="LineNr">14413 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14414" class="LineNr">14414 </span> 0/imm32/no-outputs +<span id="L14415" class="LineNr">14415 </span> 0/imm32/no-outputs <span id="L14416" class="LineNr">14416 </span> 0x11/imm32/alloc-id:fake -<span id="L14417" class="LineNr">14417 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14418" class="LineNr">14418 </span> 0/imm32/no-outputs -<span id="L14419" class="LineNr">14419 </span> 0/imm32/no-outputs -<span id="L14420" class="LineNr">14420 </span> 0x11/imm32/alloc-id:fake -<span id="L14421" class="LineNr">14421 </span> <a href='mu.subx.html#L15011'>_string_0f_8d_jump_label</a>/imm32/subx-name -<span id="L14422" class="LineNr">14422 </span> 0/imm32/no-rm32 -<span id="L14423" class="LineNr">14423 </span> 0/imm32/no-r32 -<span id="L14424" class="LineNr">14424 </span> 0/imm32/no-imm32 -<span id="L14425" class="LineNr">14425 </span> 1/imm32/disp32-is-first-inout -<span id="L14426" class="LineNr">14426 </span> 0/imm32/no-output +<span id="L14417" class="LineNr">14417 </span> <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32/subx-name +<span id="L14418" class="LineNr">14418 </span> 0/imm32/no-rm32 +<span id="L14419" class="LineNr">14419 </span> 0/imm32/no-r32 +<span id="L14420" class="LineNr">14420 </span> 0/imm32/no-imm32 +<span id="L14421" class="LineNr">14421 </span> 1/imm32/disp32-is-first-inout +<span id="L14422" class="LineNr">14422 </span> 0/imm32/no-output +<span id="L14423" class="LineNr">14423 </span> 0x11/imm32/alloc-id:fake +<span id="L14424" class="LineNr">14424 </span> <a href='mu.subx.html#L14425'>_Primitive-break-if-<-named</a>/imm32/next +<span id="L14425" class="LineNr">14425 </span><span class="subxMinorFunction">_Primitive-break-if-<-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14426" class="LineNr">14426 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14427" class="LineNr">14427 </span> 0x11/imm32/alloc-id:fake -<span id="L14428" class="LineNr">14428 </span> <a href='mu.subx.html#L14429'>_Primitive-break-if-<=-named</a>/imm32/next -<span id="L14429" class="LineNr">14429 </span><span class="subxMinorFunction">_Primitive-break-if-<=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14430" class="LineNr">14430 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14431" class="LineNr">14431 </span> 0x11/imm32/alloc-id:fake -<span id="L14432" class="LineNr">14432 </span> <a href='mu.subx.html#L14704'>_string-break-if-<=</a>/imm32/name +<span id="L14428" class="LineNr">14428 </span> <a href='mu.subx.html#L14729'>_string-break-if-<</a>/imm32/name +<span id="L14429" class="LineNr">14429 </span> 0x11/imm32/alloc-id:fake +<span id="L14430" class="LineNr">14430 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14431" class="LineNr">14431 </span> 0/imm32/no-outputs +<span id="L14432" class="LineNr">14432 </span> 0/imm32/no-outputs <span id="L14433" class="LineNr">14433 </span> 0x11/imm32/alloc-id:fake -<span id="L14434" class="LineNr">14434 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14435" class="LineNr">14435 </span> 0/imm32/no-outputs -<span id="L14436" class="LineNr">14436 </span> 0/imm32/no-outputs -<span id="L14437" class="LineNr">14437 </span> 0x11/imm32/alloc-id:fake -<span id="L14438" class="LineNr">14438 </span> <a href='mu.subx.html#L15026'>_string_0f_8e_jump_label</a>/imm32/subx-name -<span id="L14439" class="LineNr">14439 </span> 0/imm32/no-rm32 -<span id="L14440" class="LineNr">14440 </span> 0/imm32/no-r32 -<span id="L14441" class="LineNr">14441 </span> 0/imm32/no-imm32 -<span id="L14442" class="LineNr">14442 </span> 1/imm32/disp32-is-first-inout -<span id="L14443" class="LineNr">14443 </span> 0/imm32/no-output +<span id="L14434" class="LineNr">14434 </span> <a href='mu.subx.html#L15026'>_string_0f_8c_jump_label</a>/imm32/subx-name +<span id="L14435" class="LineNr">14435 </span> 0/imm32/no-rm32 +<span id="L14436" class="LineNr">14436 </span> 0/imm32/no-r32 +<span id="L14437" class="LineNr">14437 </span> 0/imm32/no-imm32 +<span id="L14438" class="LineNr">14438 </span> 1/imm32/disp32-is-first-inout +<span id="L14439" class="LineNr">14439 </span> 0/imm32/no-output +<span id="L14440" class="LineNr">14440 </span> 0x11/imm32/alloc-id:fake +<span id="L14441" class="LineNr">14441 </span> <a href='mu.subx.html#L14442'>_Primitive-break-if->=-named</a>/imm32/next +<span id="L14442" class="LineNr">14442 </span><span class="subxMinorFunction">_Primitive-break-if->=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14443" class="LineNr">14443 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14444" class="LineNr">14444 </span> 0x11/imm32/alloc-id:fake -<span id="L14445" class="LineNr">14445 </span> <a href='mu.subx.html#L14446'>_Primitive-break-if->-named</a>/imm32/next -<span id="L14446" class="LineNr">14446 </span><span class="subxMinorFunction">_Primitive-break-if->-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14447" class="LineNr">14447 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14448" class="LineNr">14448 </span> 0x11/imm32/alloc-id:fake -<span id="L14449" class="LineNr">14449 </span> <a href='mu.subx.html#L14714'>_string-break-if-></a>/imm32/name +<span id="L14445" class="LineNr">14445 </span> <a href='mu.subx.html#L14749'>_string-break-if->=</a>/imm32/name +<span id="L14446" class="LineNr">14446 </span> 0x11/imm32/alloc-id:fake +<span id="L14447" class="LineNr">14447 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14448" class="LineNr">14448 </span> 0/imm32/no-outputs +<span id="L14449" class="LineNr">14449 </span> 0/imm32/no-outputs <span id="L14450" class="LineNr">14450 </span> 0x11/imm32/alloc-id:fake -<span id="L14451" class="LineNr">14451 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14452" class="LineNr">14452 </span> 0/imm32/no-outputs -<span id="L14453" class="LineNr">14453 </span> 0/imm32/no-outputs -<span id="L14454" class="LineNr">14454 </span> 0x11/imm32/alloc-id:fake -<span id="L14455" class="LineNr">14455 </span> <a href='mu.subx.html#L15041'>_string_0f_8f_jump_label</a>/imm32/subx-name -<span id="L14456" class="LineNr">14456 </span> 0/imm32/no-rm32 -<span id="L14457" class="LineNr">14457 </span> 0/imm32/no-r32 -<span id="L14458" class="LineNr">14458 </span> 0/imm32/no-imm32 -<span id="L14459" class="LineNr">14459 </span> 1/imm32/disp32-is-first-inout -<span id="L14460" class="LineNr">14460 </span> 0/imm32/no-output +<span id="L14451" class="LineNr">14451 </span> <a href='mu.subx.html#L15041'>_string_0f_8d_jump_label</a>/imm32/subx-name +<span id="L14452" class="LineNr">14452 </span> 0/imm32/no-rm32 +<span id="L14453" class="LineNr">14453 </span> 0/imm32/no-r32 +<span id="L14454" class="LineNr">14454 </span> 0/imm32/no-imm32 +<span id="L14455" class="LineNr">14455 </span> 1/imm32/disp32-is-first-inout +<span id="L14456" class="LineNr">14456 </span> 0/imm32/no-output +<span id="L14457" class="LineNr">14457 </span> 0x11/imm32/alloc-id:fake +<span id="L14458" class="LineNr">14458 </span> <a href='mu.subx.html#L14459'>_Primitive-break-if-<=-named</a>/imm32/next +<span id="L14459" class="LineNr">14459 </span><span class="subxMinorFunction">_Primitive-break-if-<=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14460" class="LineNr">14460 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14461" class="LineNr">14461 </span> 0x11/imm32/alloc-id:fake -<span id="L14462" class="LineNr">14462 </span> <a href='mu.subx.html#L14463'>_Primitive-break-named</a>/imm32/next -<span id="L14463" class="LineNr">14463 </span><span class="subxMinorFunction">_Primitive-break-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14464" class="LineNr">14464 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14465" class="LineNr">14465 </span> 0x11/imm32/alloc-id:fake -<span id="L14466" class="LineNr">14466 </span> <a href='mu.subx.html#L14694'>_string-break</a>/imm32/name +<span id="L14462" class="LineNr">14462 </span> <a href='mu.subx.html#L14734'>_string-break-if-<=</a>/imm32/name +<span id="L14463" class="LineNr">14463 </span> 0x11/imm32/alloc-id:fake +<span id="L14464" class="LineNr">14464 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14465" class="LineNr">14465 </span> 0/imm32/no-outputs +<span id="L14466" class="LineNr">14466 </span> 0/imm32/no-outputs <span id="L14467" class="LineNr">14467 </span> 0x11/imm32/alloc-id:fake -<span id="L14468" class="LineNr">14468 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14469" class="LineNr">14469 </span> 0/imm32/no-outputs -<span id="L14470" class="LineNr">14470 </span> 0/imm32/no-outputs -<span id="L14471" class="LineNr">14471 </span> 0x11/imm32/alloc-id:fake -<span id="L14472" class="LineNr">14472 </span> <a href='mu.subx.html#L15271'>_string_e9_jump_label</a>/imm32/subx-name -<span id="L14473" class="LineNr">14473 </span> 0/imm32/no-rm32 -<span id="L14474" class="LineNr">14474 </span> 0/imm32/no-r32 -<span id="L14475" class="LineNr">14475 </span> 0/imm32/no-imm32 -<span id="L14476" class="LineNr">14476 </span> 1/imm32/disp32-is-first-inout -<span id="L14477" class="LineNr">14477 </span> 0/imm32/no-output +<span id="L14468" class="LineNr">14468 </span> <a href='mu.subx.html#L15056'>_string_0f_8e_jump_label</a>/imm32/subx-name +<span id="L14469" class="LineNr">14469 </span> 0/imm32/no-rm32 +<span id="L14470" class="LineNr">14470 </span> 0/imm32/no-r32 +<span id="L14471" class="LineNr">14471 </span> 0/imm32/no-imm32 +<span id="L14472" class="LineNr">14472 </span> 1/imm32/disp32-is-first-inout +<span id="L14473" class="LineNr">14473 </span> 0/imm32/no-output +<span id="L14474" class="LineNr">14474 </span> 0x11/imm32/alloc-id:fake +<span id="L14475" class="LineNr">14475 </span> <a href='mu.subx.html#L14476'>_Primitive-break-if->-named</a>/imm32/next +<span id="L14476" class="LineNr">14476 </span><span class="subxMinorFunction">_Primitive-break-if->-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14477" class="LineNr">14477 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14478" class="LineNr">14478 </span> 0x11/imm32/alloc-id:fake -<span id="L14479" class="LineNr">14479 </span> <a href='mu.subx.html#L14480'>_Primitive-loop-if-addr<-named</a>/imm32/next -<span id="L14480" class="LineNr">14480 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14481" class="LineNr">14481 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14482" class="LineNr">14482 </span> 0x11/imm32/alloc-id:fake -<span id="L14483" class="LineNr">14483 </span> <a href='mu.subx.html#L14819'>_string-loop-if-addr<</a>/imm32/name +<span id="L14479" class="LineNr">14479 </span> <a href='mu.subx.html#L14744'>_string-break-if-></a>/imm32/name +<span id="L14480" class="LineNr">14480 </span> 0x11/imm32/alloc-id:fake +<span id="L14481" class="LineNr">14481 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14482" class="LineNr">14482 </span> 0/imm32/no-outputs +<span id="L14483" class="LineNr">14483 </span> 0/imm32/no-outputs <span id="L14484" class="LineNr">14484 </span> 0x11/imm32/alloc-id:fake -<span id="L14485" class="LineNr">14485 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14486" class="LineNr">14486 </span> 0/imm32/no-outputs -<span id="L14487" class="LineNr">14487 </span> 0/imm32/no-outputs -<span id="L14488" class="LineNr">14488 </span> 0x11/imm32/alloc-id:fake -<span id="L14489" class="LineNr">14489 </span> <a href='mu.subx.html#L14906'>_string_0f_82_jump_label</a>/imm32/subx-name -<span id="L14490" class="LineNr">14490 </span> 0/imm32/no-rm32 -<span id="L14491" class="LineNr">14491 </span> 0/imm32/no-r32 -<span id="L14492" class="LineNr">14492 </span> 0/imm32/no-imm32 -<span id="L14493" class="LineNr">14493 </span> 1/imm32/disp32-is-first-inout -<span id="L14494" class="LineNr">14494 </span> 0/imm32/no-output +<span id="L14485" class="LineNr">14485 </span> <a href='mu.subx.html#L15071'>_string_0f_8f_jump_label</a>/imm32/subx-name +<span id="L14486" class="LineNr">14486 </span> 0/imm32/no-rm32 +<span id="L14487" class="LineNr">14487 </span> 0/imm32/no-r32 +<span id="L14488" class="LineNr">14488 </span> 0/imm32/no-imm32 +<span id="L14489" class="LineNr">14489 </span> 1/imm32/disp32-is-first-inout +<span id="L14490" class="LineNr">14490 </span> 0/imm32/no-output +<span id="L14491" class="LineNr">14491 </span> 0x11/imm32/alloc-id:fake +<span id="L14492" class="LineNr">14492 </span> <a href='mu.subx.html#L14493'>_Primitive-break-named</a>/imm32/next +<span id="L14493" class="LineNr">14493 </span><span class="subxMinorFunction">_Primitive-break-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14494" class="LineNr">14494 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14495" class="LineNr">14495 </span> 0x11/imm32/alloc-id:fake -<span id="L14496" class="LineNr">14496 </span> <a href='mu.subx.html#L14497'>_Primitive-loop-if-addr>=-named</a>/imm32/next -<span id="L14497" class="LineNr">14497 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14498" class="LineNr">14498 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14499" class="LineNr">14499 </span> 0x11/imm32/alloc-id:fake -<span id="L14500" class="LineNr">14500 </span> <a href='mu.subx.html#L14834'>_string-loop-if-addr>=</a>/imm32/name +<span id="L14496" class="LineNr">14496 </span> <a href='mu.subx.html#L14724'>_string-break</a>/imm32/name +<span id="L14497" class="LineNr">14497 </span> 0x11/imm32/alloc-id:fake +<span id="L14498" class="LineNr">14498 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14499" class="LineNr">14499 </span> 0/imm32/no-outputs +<span id="L14500" class="LineNr">14500 </span> 0/imm32/no-outputs <span id="L14501" class="LineNr">14501 </span> 0x11/imm32/alloc-id:fake -<span id="L14502" class="LineNr">14502 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14503" class="LineNr">14503 </span> 0/imm32/no-outputs -<span id="L14504" class="LineNr">14504 </span> 0/imm32/no-outputs -<span id="L14505" class="LineNr">14505 </span> 0x11/imm32/alloc-id:fake -<span id="L14506" class="LineNr">14506 </span> <a href='mu.subx.html#L14921'>_string_0f_83_jump_label</a>/imm32/subx-name -<span id="L14507" class="LineNr">14507 </span> 0/imm32/no-rm32 -<span id="L14508" class="LineNr">14508 </span> 0/imm32/no-r32 -<span id="L14509" class="LineNr">14509 </span> 0/imm32/no-imm32 -<span id="L14510" class="LineNr">14510 </span> 1/imm32/disp32-is-first-inout -<span id="L14511" class="LineNr">14511 </span> 0/imm32/no-output +<span id="L14502" class="LineNr">14502 </span> <a href='mu.subx.html#L15301'>_string_e9_jump_label</a>/imm32/subx-name +<span id="L14503" class="LineNr">14503 </span> 0/imm32/no-rm32 +<span id="L14504" class="LineNr">14504 </span> 0/imm32/no-r32 +<span id="L14505" class="LineNr">14505 </span> 0/imm32/no-imm32 +<span id="L14506" class="LineNr">14506 </span> 1/imm32/disp32-is-first-inout +<span id="L14507" class="LineNr">14507 </span> 0/imm32/no-output +<span id="L14508" class="LineNr">14508 </span> 0x11/imm32/alloc-id:fake +<span id="L14509" class="LineNr">14509 </span> <a href='mu.subx.html#L14510'>_Primitive-loop-if-addr<-named</a>/imm32/next +<span id="L14510" class="LineNr">14510 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14511" class="LineNr">14511 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14512" class="LineNr">14512 </span> 0x11/imm32/alloc-id:fake -<span id="L14513" class="LineNr">14513 </span> <a href='mu.subx.html#L14514'>_Primitive-loop-if-=-named</a>/imm32/next -<span id="L14514" class="LineNr">14514 </span><span class="subxMinorFunction">_Primitive-loop-if-=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14515" class="LineNr">14515 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14516" class="LineNr">14516 </span> 0x11/imm32/alloc-id:fake -<span id="L14517" class="LineNr">14517 </span> <a href='mu.subx.html#L14799'>_string-loop-if-=</a>/imm32/name +<span id="L14513" class="LineNr">14513 </span> <a href='mu.subx.html#L14849'>_string-loop-if-addr<</a>/imm32/name +<span id="L14514" class="LineNr">14514 </span> 0x11/imm32/alloc-id:fake +<span id="L14515" class="LineNr">14515 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14516" class="LineNr">14516 </span> 0/imm32/no-outputs +<span id="L14517" class="LineNr">14517 </span> 0/imm32/no-outputs <span id="L14518" class="LineNr">14518 </span> 0x11/imm32/alloc-id:fake -<span id="L14519" class="LineNr">14519 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14520" class="LineNr">14520 </span> 0/imm32/no-outputs -<span id="L14521" class="LineNr">14521 </span> 0/imm32/no-outputs -<span id="L14522" class="LineNr">14522 </span> 0x11/imm32/alloc-id:fake -<span id="L14523" class="LineNr">14523 </span> <a href='mu.subx.html#L14936'>_string_0f_84_jump_label</a>/imm32/subx-name -<span id="L14524" class="LineNr">14524 </span> 0/imm32/no-rm32 -<span id="L14525" class="LineNr">14525 </span> 0/imm32/no-r32 -<span id="L14526" class="LineNr">14526 </span> 0/imm32/no-imm32 -<span id="L14527" class="LineNr">14527 </span> 1/imm32/disp32-is-first-inout -<span id="L14528" class="LineNr">14528 </span> 0/imm32/no-output +<span id="L14519" class="LineNr">14519 </span> <a href='mu.subx.html#L14936'>_string_0f_82_jump_label</a>/imm32/subx-name +<span id="L14520" class="LineNr">14520 </span> 0/imm32/no-rm32 +<span id="L14521" class="LineNr">14521 </span> 0/imm32/no-r32 +<span id="L14522" class="LineNr">14522 </span> 0/imm32/no-imm32 +<span id="L14523" class="LineNr">14523 </span> 1/imm32/disp32-is-first-inout +<span id="L14524" class="LineNr">14524 </span> 0/imm32/no-output +<span id="L14525" class="LineNr">14525 </span> 0x11/imm32/alloc-id:fake +<span id="L14526" class="LineNr">14526 </span> <a href='mu.subx.html#L14527'>_Primitive-loop-if-addr>=-named</a>/imm32/next +<span id="L14527" class="LineNr">14527 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14528" class="LineNr">14528 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14529" class="LineNr">14529 </span> 0x11/imm32/alloc-id:fake -<span id="L14530" class="LineNr">14530 </span> <a href='mu.subx.html#L14531'>_Primitive-loop-if-!=-named</a>/imm32/next -<span id="L14531" class="LineNr">14531 </span><span class="subxMinorFunction">_Primitive-loop-if-!=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14532" class="LineNr">14532 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14533" class="LineNr">14533 </span> 0x11/imm32/alloc-id:fake -<span id="L14534" class="LineNr">14534 </span> <a href='mu.subx.html#L14814'>_string-loop-if-!=</a>/imm32/name +<span id="L14530" class="LineNr">14530 </span> <a href='mu.subx.html#L14864'>_string-loop-if-addr>=</a>/imm32/name +<span id="L14531" class="LineNr">14531 </span> 0x11/imm32/alloc-id:fake +<span id="L14532" class="LineNr">14532 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14533" class="LineNr">14533 </span> 0/imm32/no-outputs +<span id="L14534" class="LineNr">14534 </span> 0/imm32/no-outputs <span id="L14535" class="LineNr">14535 </span> 0x11/imm32/alloc-id:fake -<span id="L14536" class="LineNr">14536 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14537" class="LineNr">14537 </span> 0/imm32/no-outputs -<span id="L14538" class="LineNr">14538 </span> 0/imm32/no-outputs -<span id="L14539" class="LineNr">14539 </span> 0x11/imm32/alloc-id:fake -<span id="L14540" class="LineNr">14540 </span> <a href='mu.subx.html#L14951'>_string_0f_85_jump_label</a>/imm32/subx-name -<span id="L14541" class="LineNr">14541 </span> 0/imm32/no-rm32 -<span id="L14542" class="LineNr">14542 </span> 0/imm32/no-r32 -<span id="L14543" class="LineNr">14543 </span> 0/imm32/no-imm32 -<span id="L14544" class="LineNr">14544 </span> 1/imm32/disp32-is-first-inout -<span id="L14545" class="LineNr">14545 </span> 0/imm32/no-output +<span id="L14536" class="LineNr">14536 </span> <a href='mu.subx.html#L14951'>_string_0f_83_jump_label</a>/imm32/subx-name +<span id="L14537" class="LineNr">14537 </span> 0/imm32/no-rm32 +<span id="L14538" class="LineNr">14538 </span> 0/imm32/no-r32 +<span id="L14539" class="LineNr">14539 </span> 0/imm32/no-imm32 +<span id="L14540" class="LineNr">14540 </span> 1/imm32/disp32-is-first-inout +<span id="L14541" class="LineNr">14541 </span> 0/imm32/no-output +<span id="L14542" class="LineNr">14542 </span> 0x11/imm32/alloc-id:fake +<span id="L14543" class="LineNr">14543 </span> <a href='mu.subx.html#L14544'>_Primitive-loop-if-=-named</a>/imm32/next +<span id="L14544" class="LineNr">14544 </span><span class="subxMinorFunction">_Primitive-loop-if-=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14545" class="LineNr">14545 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14546" class="LineNr">14546 </span> 0x11/imm32/alloc-id:fake -<span id="L14547" class="LineNr">14547 </span> <a href='mu.subx.html#L14548'>_Primitive-loop-if-addr<=-named</a>/imm32/next -<span id="L14548" class="LineNr">14548 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14549" class="LineNr">14549 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14550" class="LineNr">14550 </span> 0x11/imm32/alloc-id:fake -<span id="L14551" class="LineNr">14551 </span> <a href='mu.subx.html#L14824'>_string-loop-if-addr<=</a>/imm32/name +<span id="L14547" class="LineNr">14547 </span> <a href='mu.subx.html#L14829'>_string-loop-if-=</a>/imm32/name +<span id="L14548" class="LineNr">14548 </span> 0x11/imm32/alloc-id:fake +<span id="L14549" class="LineNr">14549 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14550" class="LineNr">14550 </span> 0/imm32/no-outputs +<span id="L14551" class="LineNr">14551 </span> 0/imm32/no-outputs <span id="L14552" class="LineNr">14552 </span> 0x11/imm32/alloc-id:fake -<span id="L14553" class="LineNr">14553 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14554" class="LineNr">14554 </span> 0/imm32/no-outputs -<span id="L14555" class="LineNr">14555 </span> 0/imm32/no-outputs -<span id="L14556" class="LineNr">14556 </span> 0x11/imm32/alloc-id:fake -<span id="L14557" class="LineNr">14557 </span> <a href='mu.subx.html#L14966'>_string_0f_86_jump_label</a>/imm32/subx-name -<span id="L14558" class="LineNr">14558 </span> 0/imm32/no-rm32 -<span id="L14559" class="LineNr">14559 </span> 0/imm32/no-r32 -<span id="L14560" class="LineNr">14560 </span> 0/imm32/no-imm32 -<span id="L14561" class="LineNr">14561 </span> 1/imm32/disp32-is-first-inout -<span id="L14562" class="LineNr">14562 </span> 0/imm32/no-output +<span id="L14553" class="LineNr">14553 </span> <a href='mu.subx.html#L14966'>_string_0f_84_jump_label</a>/imm32/subx-name +<span id="L14554" class="LineNr">14554 </span> 0/imm32/no-rm32 +<span id="L14555" class="LineNr">14555 </span> 0/imm32/no-r32 +<span id="L14556" class="LineNr">14556 </span> 0/imm32/no-imm32 +<span id="L14557" class="LineNr">14557 </span> 1/imm32/disp32-is-first-inout +<span id="L14558" class="LineNr">14558 </span> 0/imm32/no-output +<span id="L14559" class="LineNr">14559 </span> 0x11/imm32/alloc-id:fake +<span id="L14560" class="LineNr">14560 </span> <a href='mu.subx.html#L14561'>_Primitive-loop-if-!=-named</a>/imm32/next +<span id="L14561" class="LineNr">14561 </span><span class="subxMinorFunction">_Primitive-loop-if-!=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14562" class="LineNr">14562 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14563" class="LineNr">14563 </span> 0x11/imm32/alloc-id:fake -<span id="L14564" class="LineNr">14564 </span> <a href='mu.subx.html#L14565'>_Primitive-loop-if-addr>-named</a>/imm32/next -<span id="L14565" class="LineNr">14565 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14566" class="LineNr">14566 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14567" class="LineNr">14567 </span> 0x11/imm32/alloc-id:fake -<span id="L14568" class="LineNr">14568 </span> <a href='mu.subx.html#L14829'>_string-loop-if-addr></a>/imm32/name +<span id="L14564" class="LineNr">14564 </span> <a href='mu.subx.html#L14844'>_string-loop-if-!=</a>/imm32/name +<span id="L14565" class="LineNr">14565 </span> 0x11/imm32/alloc-id:fake +<span id="L14566" class="LineNr">14566 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14567" class="LineNr">14567 </span> 0/imm32/no-outputs +<span id="L14568" class="LineNr">14568 </span> 0/imm32/no-outputs <span id="L14569" class="LineNr">14569 </span> 0x11/imm32/alloc-id:fake -<span id="L14570" class="LineNr">14570 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14571" class="LineNr">14571 </span> 0/imm32/no-outputs -<span id="L14572" class="LineNr">14572 </span> 0/imm32/no-outputs -<span id="L14573" class="LineNr">14573 </span> 0x11/imm32/alloc-id:fake -<span id="L14574" class="LineNr">14574 </span> <a href='mu.subx.html#L14981'>_string_0f_87_jump_label</a>/imm32/subx-name -<span id="L14575" class="LineNr">14575 </span> 0/imm32/no-rm32 -<span id="L14576" class="LineNr">14576 </span> 0/imm32/no-r32 -<span id="L14577" class="LineNr">14577 </span> 0/imm32/no-imm32 -<span id="L14578" class="LineNr">14578 </span> 1/imm32/disp32-is-first-inout -<span id="L14579" class="LineNr">14579 </span> 0/imm32/no-output +<span id="L14570" class="LineNr">14570 </span> <a href='mu.subx.html#L14981'>_string_0f_85_jump_label</a>/imm32/subx-name +<span id="L14571" class="LineNr">14571 </span> 0/imm32/no-rm32 +<span id="L14572" class="LineNr">14572 </span> 0/imm32/no-r32 +<span id="L14573" class="LineNr">14573 </span> 0/imm32/no-imm32 +<span id="L14574" class="LineNr">14574 </span> 1/imm32/disp32-is-first-inout +<span id="L14575" class="LineNr">14575 </span> 0/imm32/no-output +<span id="L14576" class="LineNr">14576 </span> 0x11/imm32/alloc-id:fake +<span id="L14577" class="LineNr">14577 </span> <a href='mu.subx.html#L14578'>_Primitive-loop-if-addr<=-named</a>/imm32/next +<span id="L14578" class="LineNr">14578 </span><span class="subxMinorFunction">_Primitive-loop-if-addr<=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14579" class="LineNr">14579 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14580" class="LineNr">14580 </span> 0x11/imm32/alloc-id:fake -<span id="L14581" class="LineNr">14581 </span> <a href='mu.subx.html#L14582'>_Primitive-loop-if-<-named</a>/imm32/next -<span id="L14582" class="LineNr">14582 </span><span class="subxMinorFunction">_Primitive-loop-if-<-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14583" class="LineNr">14583 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14584" class="LineNr">14584 </span> 0x11/imm32/alloc-id:fake -<span id="L14585" class="LineNr">14585 </span> <a href='mu.subx.html#L14789'>_string-loop-if-<</a>/imm32/name +<span id="L14581" class="LineNr">14581 </span> <a href='mu.subx.html#L14854'>_string-loop-if-addr<=</a>/imm32/name +<span id="L14582" class="LineNr">14582 </span> 0x11/imm32/alloc-id:fake +<span id="L14583" class="LineNr">14583 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14584" class="LineNr">14584 </span> 0/imm32/no-outputs +<span id="L14585" class="LineNr">14585 </span> 0/imm32/no-outputs <span id="L14586" class="LineNr">14586 </span> 0x11/imm32/alloc-id:fake -<span id="L14587" class="LineNr">14587 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14588" class="LineNr">14588 </span> 0/imm32/no-outputs -<span id="L14589" class="LineNr">14589 </span> 0/imm32/no-outputs -<span id="L14590" class="LineNr">14590 </span> 0x11/imm32/alloc-id:fake -<span id="L14591" class="LineNr">14591 </span> <a href='mu.subx.html#L14996'>_string_0f_8c_jump_label</a>/imm32/subx-name -<span id="L14592" class="LineNr">14592 </span> 0/imm32/no-rm32 -<span id="L14593" class="LineNr">14593 </span> 0/imm32/no-r32 -<span id="L14594" class="LineNr">14594 </span> 0/imm32/no-imm32 -<span id="L14595" class="LineNr">14595 </span> 1/imm32/disp32-is-first-inout -<span id="L14596" class="LineNr">14596 </span> 0/imm32/no-output +<span id="L14587" class="LineNr">14587 </span> <a href='mu.subx.html#L14996'>_string_0f_86_jump_label</a>/imm32/subx-name +<span id="L14588" class="LineNr">14588 </span> 0/imm32/no-rm32 +<span id="L14589" class="LineNr">14589 </span> 0/imm32/no-r32 +<span id="L14590" class="LineNr">14590 </span> 0/imm32/no-imm32 +<span id="L14591" class="LineNr">14591 </span> 1/imm32/disp32-is-first-inout +<span id="L14592" class="LineNr">14592 </span> 0/imm32/no-output +<span id="L14593" class="LineNr">14593 </span> 0x11/imm32/alloc-id:fake +<span id="L14594" class="LineNr">14594 </span> <a href='mu.subx.html#L14595'>_Primitive-loop-if-addr>-named</a>/imm32/next +<span id="L14595" class="LineNr">14595 </span><span class="subxMinorFunction">_Primitive-loop-if-addr>-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14596" class="LineNr">14596 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14597" class="LineNr">14597 </span> 0x11/imm32/alloc-id:fake -<span id="L14598" class="LineNr">14598 </span> <a href='mu.subx.html#L14599'>_Primitive-loop-if->=-named</a>/imm32/next -<span id="L14599" class="LineNr">14599 </span><span class="subxMinorFunction">_Primitive-loop-if->=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14600" class="LineNr">14600 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14601" class="LineNr">14601 </span> 0x11/imm32/alloc-id:fake -<span id="L14602" class="LineNr">14602 </span> <a href='mu.subx.html#L14809'>_string-loop-if->=</a>/imm32/name +<span id="L14598" class="LineNr">14598 </span> <a href='mu.subx.html#L14859'>_string-loop-if-addr></a>/imm32/name +<span id="L14599" class="LineNr">14599 </span> 0x11/imm32/alloc-id:fake +<span id="L14600" class="LineNr">14600 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14601" class="LineNr">14601 </span> 0/imm32/no-outputs +<span id="L14602" class="LineNr">14602 </span> 0/imm32/no-outputs <span id="L14603" class="LineNr">14603 </span> 0x11/imm32/alloc-id:fake -<span id="L14604" class="LineNr">14604 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14605" class="LineNr">14605 </span> 0/imm32/no-outputs -<span id="L14606" class="LineNr">14606 </span> 0/imm32/no-outputs -<span id="L14607" class="LineNr">14607 </span> 0x11/imm32/alloc-id:fake -<span id="L14608" class="LineNr">14608 </span> <a href='mu.subx.html#L15011'>_string_0f_8d_jump_label</a>/imm32/subx-name -<span id="L14609" class="LineNr">14609 </span> 0/imm32/no-rm32 -<span id="L14610" class="LineNr">14610 </span> 0/imm32/no-r32 -<span id="L14611" class="LineNr">14611 </span> 0/imm32/no-imm32 -<span id="L14612" class="LineNr">14612 </span> 1/imm32/disp32-is-first-inout -<span id="L14613" class="LineNr">14613 </span> 0/imm32/no-output +<span id="L14604" class="LineNr">14604 </span> <a href='mu.subx.html#L15011'>_string_0f_87_jump_label</a>/imm32/subx-name +<span id="L14605" class="LineNr">14605 </span> 0/imm32/no-rm32 +<span id="L14606" class="LineNr">14606 </span> 0/imm32/no-r32 +<span id="L14607" class="LineNr">14607 </span> 0/imm32/no-imm32 +<span id="L14608" class="LineNr">14608 </span> 1/imm32/disp32-is-first-inout +<span id="L14609" class="LineNr">14609 </span> 0/imm32/no-output +<span id="L14610" class="LineNr">14610 </span> 0x11/imm32/alloc-id:fake +<span id="L14611" class="LineNr">14611 </span> <a href='mu.subx.html#L14612'>_Primitive-loop-if-<-named</a>/imm32/next +<span id="L14612" class="LineNr">14612 </span><span class="subxMinorFunction">_Primitive-loop-if-<-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14613" class="LineNr">14613 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14614" class="LineNr">14614 </span> 0x11/imm32/alloc-id:fake -<span id="L14615" class="LineNr">14615 </span> <a href='mu.subx.html#L14616'>_Primitive-loop-if-<=-named</a>/imm32/next -<span id="L14616" class="LineNr">14616 </span><span class="subxMinorFunction">_Primitive-loop-if-<=-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14617" class="LineNr">14617 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14618" class="LineNr">14618 </span> 0x11/imm32/alloc-id:fake -<span id="L14619" class="LineNr">14619 </span> <a href='mu.subx.html#L14794'>_string-loop-if-<=</a>/imm32/name +<span id="L14615" class="LineNr">14615 </span> <a href='mu.subx.html#L14819'>_string-loop-if-<</a>/imm32/name +<span id="L14616" class="LineNr">14616 </span> 0x11/imm32/alloc-id:fake +<span id="L14617" class="LineNr">14617 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14618" class="LineNr">14618 </span> 0/imm32/no-outputs +<span id="L14619" class="LineNr">14619 </span> 0/imm32/no-outputs <span id="L14620" class="LineNr">14620 </span> 0x11/imm32/alloc-id:fake -<span id="L14621" class="LineNr">14621 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14622" class="LineNr">14622 </span> 0/imm32/no-outputs -<span id="L14623" class="LineNr">14623 </span> 0/imm32/no-outputs -<span id="L14624" class="LineNr">14624 </span> 0x11/imm32/alloc-id:fake -<span id="L14625" class="LineNr">14625 </span> <a href='mu.subx.html#L15026'>_string_0f_8e_jump_label</a>/imm32/subx-name -<span id="L14626" class="LineNr">14626 </span> 0/imm32/no-rm32 -<span id="L14627" class="LineNr">14627 </span> 0/imm32/no-r32 -<span id="L14628" class="LineNr">14628 </span> 0/imm32/no-imm32 -<span id="L14629" class="LineNr">14629 </span> 1/imm32/disp32-is-first-inout -<span id="L14630" class="LineNr">14630 </span> 0/imm32/no-output +<span id="L14621" class="LineNr">14621 </span> <a href='mu.subx.html#L15026'>_string_0f_8c_jump_label</a>/imm32/subx-name +<span id="L14622" class="LineNr">14622 </span> 0/imm32/no-rm32 +<span id="L14623" class="LineNr">14623 </span> 0/imm32/no-r32 +<span id="L14624" class="LineNr">14624 </span> 0/imm32/no-imm32 +<span id="L14625" class="LineNr">14625 </span> 1/imm32/disp32-is-first-inout +<span id="L14626" class="LineNr">14626 </span> 0/imm32/no-output +<span id="L14627" class="LineNr">14627 </span> 0x11/imm32/alloc-id:fake +<span id="L14628" class="LineNr">14628 </span> <a href='mu.subx.html#L14629'>_Primitive-loop-if->=-named</a>/imm32/next +<span id="L14629" class="LineNr">14629 </span><span class="subxMinorFunction">_Primitive-loop-if->=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14630" class="LineNr">14630 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14631" class="LineNr">14631 </span> 0x11/imm32/alloc-id:fake -<span id="L14632" class="LineNr">14632 </span> <a href='mu.subx.html#L14633'>_Primitive-loop-if->-named</a>/imm32/next -<span id="L14633" class="LineNr">14633 </span><span class="subxMinorFunction">_Primitive-loop-if->-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14634" class="LineNr">14634 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14635" class="LineNr">14635 </span> 0x11/imm32/alloc-id:fake -<span id="L14636" class="LineNr">14636 </span> <a href='mu.subx.html#L14804'>_string-loop-if-></a>/imm32/name +<span id="L14632" class="LineNr">14632 </span> <a href='mu.subx.html#L14839'>_string-loop-if->=</a>/imm32/name +<span id="L14633" class="LineNr">14633 </span> 0x11/imm32/alloc-id:fake +<span id="L14634" class="LineNr">14634 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14635" class="LineNr">14635 </span> 0/imm32/no-outputs +<span id="L14636" class="LineNr">14636 </span> 0/imm32/no-outputs <span id="L14637" class="LineNr">14637 </span> 0x11/imm32/alloc-id:fake -<span id="L14638" class="LineNr">14638 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14639" class="LineNr">14639 </span> 0/imm32/no-outputs -<span id="L14640" class="LineNr">14640 </span> 0/imm32/no-outputs -<span id="L14641" class="LineNr">14641 </span> 0x11/imm32/alloc-id:fake -<span id="L14642" class="LineNr">14642 </span> <a href='mu.subx.html#L15041'>_string_0f_8f_jump_label</a>/imm32/subx-name -<span id="L14643" class="LineNr">14643 </span> 0/imm32/no-rm32 -<span id="L14644" class="LineNr">14644 </span> 0/imm32/no-r32 -<span id="L14645" class="LineNr">14645 </span> 0/imm32/no-imm32 -<span id="L14646" class="LineNr">14646 </span> 1/imm32/disp32-is-first-inout -<span id="L14647" class="LineNr">14647 </span> 0/imm32/no-output +<span id="L14638" class="LineNr">14638 </span> <a href='mu.subx.html#L15041'>_string_0f_8d_jump_label</a>/imm32/subx-name +<span id="L14639" class="LineNr">14639 </span> 0/imm32/no-rm32 +<span id="L14640" class="LineNr">14640 </span> 0/imm32/no-r32 +<span id="L14641" class="LineNr">14641 </span> 0/imm32/no-imm32 +<span id="L14642" class="LineNr">14642 </span> 1/imm32/disp32-is-first-inout +<span id="L14643" class="LineNr">14643 </span> 0/imm32/no-output +<span id="L14644" class="LineNr">14644 </span> 0x11/imm32/alloc-id:fake +<span id="L14645" class="LineNr">14645 </span> <a href='mu.subx.html#L14646'>_Primitive-loop-if-<=-named</a>/imm32/next +<span id="L14646" class="LineNr">14646 </span><span class="subxMinorFunction">_Primitive-loop-if-<=-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14647" class="LineNr">14647 </span> 0x11/imm32/alloc-id:fake:payload <span id="L14648" class="LineNr">14648 </span> 0x11/imm32/alloc-id:fake -<span id="L14649" class="LineNr">14649 </span> <a href='mu.subx.html#L14650'>_Primitive-loop-named</a>/imm32/next <span class="subxComment"># we probably don't need an unconditional break</span> -<span id="L14650" class="LineNr">14650 </span><span class="subxMinorFunction">_Primitive-loop-named</span>: <span class="subxComment"># (payload primitive)</span> -<span id="L14651" class="LineNr">14651 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14652" class="LineNr">14652 </span> 0x11/imm32/alloc-id:fake -<span id="L14653" class="LineNr">14653 </span> <a href='mu.subx.html#L14784'>_string-loop</a>/imm32/name +<span id="L14649" class="LineNr">14649 </span> <a href='mu.subx.html#L14824'>_string-loop-if-<=</a>/imm32/name +<span id="L14650" class="LineNr">14650 </span> 0x11/imm32/alloc-id:fake +<span id="L14651" class="LineNr">14651 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14652" class="LineNr">14652 </span> 0/imm32/no-outputs +<span id="L14653" class="LineNr">14653 </span> 0/imm32/no-outputs <span id="L14654" class="LineNr">14654 </span> 0x11/imm32/alloc-id:fake -<span id="L14655" class="LineNr">14655 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/inouts -<span id="L14656" class="LineNr">14656 </span> 0/imm32/no-outputs -<span id="L14657" class="LineNr">14657 </span> 0/imm32/no-outputs -<span id="L14658" class="LineNr">14658 </span> 0x11/imm32/alloc-id:fake -<span id="L14659" class="LineNr">14659 </span> <a href='mu.subx.html#L15271'>_string_e9_jump_label</a>/imm32/subx-name -<span id="L14660" class="LineNr">14660 </span> 0/imm32/no-rm32 -<span id="L14661" class="LineNr">14661 </span> 0/imm32/no-r32 -<span id="L14662" class="LineNr">14662 </span> 0/imm32/no-imm32 -<span id="L14663" class="LineNr">14663 </span> 1/imm32/disp32-is-first-inout -<span id="L14664" class="LineNr">14664 </span> 0/imm32/no-output -<span id="L14665" class="LineNr">14665 </span> 0/imm32/next -<span id="L14666" class="LineNr">14666 </span> 0/imm32/next -<span id="L14667" class="LineNr">14667 </span> -<span id="L14668" class="LineNr">14668 </span><span class="subxComment"># string literals for Mu instructions</span> -<span id="L14669" class="LineNr">14669 </span><span class="subxMinorFunction">_string-add</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14670" class="LineNr">14670 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14671" class="LineNr">14671 </span> <span class="subxComment"># "add"</span> -<span id="L14672" class="LineNr">14672 </span> 0x3/imm32/size -<span id="L14673" class="LineNr">14673 </span> 0x61/a 0x64/d 0x64/d -<span id="L14674" class="LineNr">14674 </span><span class="subxMinorFunction">_string-address</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14675" class="LineNr">14675 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14676" class="LineNr">14676 </span> <span class="subxComment"># "address"</span> -<span id="L14677" class="LineNr">14677 </span> 0x7/imm32/size -<span id="L14678" class="LineNr">14678 </span> 0x61/a 0x64/d 0x64/d 0x72/r 0x65/e 0x73/s 0x73/s -<span id="L14679" class="LineNr">14679 </span><span class="subxMinorFunction">_string-add-to</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14680" class="LineNr">14680 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14681" class="LineNr">14681 </span> <span class="subxComment"># "add-to"</span> -<span id="L14682" class="LineNr">14682 </span> 0x6/imm32/size -<span id="L14683" class="LineNr">14683 </span> 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o -<span id="L14684" class="LineNr">14684 </span><span class="subxMinorFunction">_string-and</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14685" class="LineNr">14685 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14686" class="LineNr">14686 </span> <span class="subxComment"># "and"</span> -<span id="L14687" class="LineNr">14687 </span> 0x3/imm32/size -<span id="L14688" class="LineNr">14688 </span> 0x61/a 0x6e/n 0x64/d -<span id="L14689" class="LineNr">14689 </span><span class="subxMinorFunction">_string-and-with</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14690" class="LineNr">14690 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14691" class="LineNr">14691 </span> <span class="subxComment"># "and-with"</span> -<span id="L14692" class="LineNr">14692 </span> 0x8/imm32/size -<span id="L14693" class="LineNr">14693 </span> 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L14694" class="LineNr">14694 </span><span class="subxMinorFunction">_string-break</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14695" class="LineNr">14695 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14696" class="LineNr">14696 </span> <span class="subxComment"># "break"</span> -<span id="L14697" class="LineNr">14697 </span> 0x5/imm32/size -<span id="L14698" class="LineNr">14698 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k -<span id="L14699" class="LineNr">14699 </span><span class="subxMinorFunction">_string-break-if-<</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14655" class="LineNr">14655 </span> <a href='mu.subx.html#L15056'>_string_0f_8e_jump_label</a>/imm32/subx-name +<span id="L14656" class="LineNr">14656 </span> 0/imm32/no-rm32 +<span id="L14657" class="LineNr">14657 </span> 0/imm32/no-r32 +<span id="L14658" class="LineNr">14658 </span> 0/imm32/no-imm32 +<span id="L14659" class="LineNr">14659 </span> 1/imm32/disp32-is-first-inout +<span id="L14660" class="LineNr">14660 </span> 0/imm32/no-output +<span id="L14661" class="LineNr">14661 </span> 0x11/imm32/alloc-id:fake +<span id="L14662" class="LineNr">14662 </span> <a href='mu.subx.html#L14663'>_Primitive-loop-if->-named</a>/imm32/next +<span id="L14663" class="LineNr">14663 </span><span class="subxMinorFunction">_Primitive-loop-if->-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14664" class="LineNr">14664 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14665" class="LineNr">14665 </span> 0x11/imm32/alloc-id:fake +<span id="L14666" class="LineNr">14666 </span> <a href='mu.subx.html#L14834'>_string-loop-if-></a>/imm32/name +<span id="L14667" class="LineNr">14667 </span> 0x11/imm32/alloc-id:fake +<span id="L14668" class="LineNr">14668 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14669" class="LineNr">14669 </span> 0/imm32/no-outputs +<span id="L14670" class="LineNr">14670 </span> 0/imm32/no-outputs +<span id="L14671" class="LineNr">14671 </span> 0x11/imm32/alloc-id:fake +<span id="L14672" class="LineNr">14672 </span> <a href='mu.subx.html#L15071'>_string_0f_8f_jump_label</a>/imm32/subx-name +<span id="L14673" class="LineNr">14673 </span> 0/imm32/no-rm32 +<span id="L14674" class="LineNr">14674 </span> 0/imm32/no-r32 +<span id="L14675" class="LineNr">14675 </span> 0/imm32/no-imm32 +<span id="L14676" class="LineNr">14676 </span> 1/imm32/disp32-is-first-inout +<span id="L14677" class="LineNr">14677 </span> 0/imm32/no-output +<span id="L14678" class="LineNr">14678 </span> 0x11/imm32/alloc-id:fake +<span id="L14679" class="LineNr">14679 </span> <a href='mu.subx.html#L14680'>_Primitive-loop-named</a>/imm32/next <span class="subxComment"># we probably don't need an unconditional break</span> +<span id="L14680" class="LineNr">14680 </span><span class="subxMinorFunction">_Primitive-loop-named</span>: <span class="subxComment"># (payload primitive)</span> +<span id="L14681" class="LineNr">14681 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14682" class="LineNr">14682 </span> 0x11/imm32/alloc-id:fake +<span id="L14683" class="LineNr">14683 </span> <a href='mu.subx.html#L14814'>_string-loop</a>/imm32/name +<span id="L14684" class="LineNr">14684 </span> 0x11/imm32/alloc-id:fake +<span id="L14685" class="LineNr">14685 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/inouts +<span id="L14686" class="LineNr">14686 </span> 0/imm32/no-outputs +<span id="L14687" class="LineNr">14687 </span> 0/imm32/no-outputs +<span id="L14688" class="LineNr">14688 </span> 0x11/imm32/alloc-id:fake +<span id="L14689" class="LineNr">14689 </span> <a href='mu.subx.html#L15301'>_string_e9_jump_label</a>/imm32/subx-name +<span id="L14690" class="LineNr">14690 </span> 0/imm32/no-rm32 +<span id="L14691" class="LineNr">14691 </span> 0/imm32/no-r32 +<span id="L14692" class="LineNr">14692 </span> 0/imm32/no-imm32 +<span id="L14693" class="LineNr">14693 </span> 1/imm32/disp32-is-first-inout +<span id="L14694" class="LineNr">14694 </span> 0/imm32/no-output +<span id="L14695" class="LineNr">14695 </span> 0/imm32/next +<span id="L14696" class="LineNr">14696 </span> 0/imm32/next +<span id="L14697" class="LineNr">14697 </span> +<span id="L14698" class="LineNr">14698 </span><span class="subxComment"># string literals for Mu instructions</span> +<span id="L14699" class="LineNr">14699 </span><span class="subxMinorFunction">_string-add</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14700" class="LineNr">14700 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14701" class="LineNr">14701 </span> <span class="subxComment"># "break-if-<"</span> -<span id="L14702" class="LineNr">14702 </span> 0xa/imm32/size -<span id="L14703" class="LineNr">14703 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< -<span id="L14704" class="LineNr">14704 </span><span class="subxMinorFunction">_string-break-if-<=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14701" class="LineNr">14701 </span> <span class="subxComment"># "add"</span> +<span id="L14702" class="LineNr">14702 </span> 0x3/imm32/size +<span id="L14703" class="LineNr">14703 </span> 0x61/a 0x64/d 0x64/d +<span id="L14704" class="LineNr">14704 </span><span class="subxMinorFunction">_string-address</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14705" class="LineNr">14705 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14706" class="LineNr">14706 </span> <span class="subxComment"># "break-if-<="</span> -<span id="L14707" class="LineNr">14707 </span> 0xb/imm32/size -<span id="L14708" class="LineNr">14708 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= -<span id="L14709" class="LineNr">14709 </span><span class="subxMinorFunction">_string-break-if-=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14706" class="LineNr">14706 </span> <span class="subxComment"># "address"</span> +<span id="L14707" class="LineNr">14707 </span> 0x7/imm32/size +<span id="L14708" class="LineNr">14708 </span> 0x61/a 0x64/d 0x64/d 0x72/r 0x65/e 0x73/s 0x73/s +<span id="L14709" class="LineNr">14709 </span><span class="subxMinorFunction">_string-add-to</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14710" class="LineNr">14710 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14711" class="LineNr">14711 </span> <span class="subxComment"># "break-if-="</span> -<span id="L14712" class="LineNr">14712 </span> 0xa/imm32/size -<span id="L14713" class="LineNr">14713 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= -<span id="L14714" class="LineNr">14714 </span><span class="subxMinorFunction">_string-break-if-></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14711" class="LineNr">14711 </span> <span class="subxComment"># "add-to"</span> +<span id="L14712" class="LineNr">14712 </span> 0x6/imm32/size +<span id="L14713" class="LineNr">14713 </span> 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o +<span id="L14714" class="LineNr">14714 </span><span class="subxMinorFunction">_string-and</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14715" class="LineNr">14715 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14716" class="LineNr">14716 </span> <span class="subxComment"># "break-if->"</span> -<span id="L14717" class="LineNr">14717 </span> 0xa/imm32/size -<span id="L14718" class="LineNr">14718 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> -<span id="L14719" class="LineNr">14719 </span><span class="subxMinorFunction">_string-break-if->=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14716" class="LineNr">14716 </span> <span class="subxComment"># "and"</span> +<span id="L14717" class="LineNr">14717 </span> 0x3/imm32/size +<span id="L14718" class="LineNr">14718 </span> 0x61/a 0x6e/n 0x64/d +<span id="L14719" class="LineNr">14719 </span><span class="subxMinorFunction">_string-and-with</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14720" class="LineNr">14720 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14721" class="LineNr">14721 </span> <span class="subxComment"># "break-if->="</span> -<span id="L14722" class="LineNr">14722 </span> 0xb/imm32/size -<span id="L14723" class="LineNr">14723 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= -<span id="L14724" class="LineNr">14724 </span><span class="subxMinorFunction">_string-break-if-!=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14721" class="LineNr">14721 </span> <span class="subxComment"># "and-with"</span> +<span id="L14722" class="LineNr">14722 </span> 0x8/imm32/size +<span id="L14723" class="LineNr">14723 </span> 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L14724" class="LineNr">14724 </span><span class="subxMinorFunction">_string-break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14725" class="LineNr">14725 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14726" class="LineNr">14726 </span> <span class="subxComment"># "break-if-!="</span> -<span id="L14727" class="LineNr">14727 </span> 0xb/imm32/size -<span id="L14728" class="LineNr">14728 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= -<span id="L14729" class="LineNr">14729 </span><span class="subxMinorFunction">_string-break-if-addr<</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14726" class="LineNr">14726 </span> <span class="subxComment"># "break"</span> +<span id="L14727" class="LineNr">14727 </span> 0x5/imm32/size +<span id="L14728" class="LineNr">14728 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k +<span id="L14729" class="LineNr">14729 </span><span class="subxMinorFunction">_string-break-if-<</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14730" class="LineNr">14730 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14731" class="LineNr">14731 </span> <span class="subxComment"># "break-if-addr<"</span> -<span id="L14732" class="LineNr">14732 </span> 0xe/imm32/size -<span id="L14733" class="LineNr">14733 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< -<span id="L14734" class="LineNr">14734 </span><span class="subxMinorFunction">_string-break-if-addr<=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14731" class="LineNr">14731 </span> <span class="subxComment"># "break-if-<"</span> +<span id="L14732" class="LineNr">14732 </span> 0xa/imm32/size +<span id="L14733" class="LineNr">14733 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< +<span id="L14734" class="LineNr">14734 </span><span class="subxMinorFunction">_string-break-if-<=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14735" class="LineNr">14735 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14736" class="LineNr">14736 </span> <span class="subxComment"># "break-if-addr<="</span> -<span id="L14737" class="LineNr">14737 </span> 0xf/imm32/size -<span id="L14738" class="LineNr">14738 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= -<span id="L14739" class="LineNr">14739 </span><span class="subxMinorFunction">_string-break-if-addr></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14736" class="LineNr">14736 </span> <span class="subxComment"># "break-if-<="</span> +<span id="L14737" class="LineNr">14737 </span> 0xb/imm32/size +<span id="L14738" class="LineNr">14738 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= +<span id="L14739" class="LineNr">14739 </span><span class="subxMinorFunction">_string-break-if-=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14740" class="LineNr">14740 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14741" class="LineNr">14741 </span> <span class="subxComment"># "break-if-addr>"</span> -<span id="L14742" class="LineNr">14742 </span> 0xe/imm32/size -<span id="L14743" class="LineNr">14743 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> -<span id="L14744" class="LineNr">14744 </span><span class="subxMinorFunction">_string-break-if-addr>=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14741" class="LineNr">14741 </span> <span class="subxComment"># "break-if-="</span> +<span id="L14742" class="LineNr">14742 </span> 0xa/imm32/size +<span id="L14743" class="LineNr">14743 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= +<span id="L14744" class="LineNr">14744 </span><span class="subxMinorFunction">_string-break-if-></span>: <span class="subxComment"># (payload array byte)</span> <span id="L14745" class="LineNr">14745 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14746" class="LineNr">14746 </span> <span class="subxComment"># "break-if-addr>="</span> -<span id="L14747" class="LineNr">14747 </span> 0xf/imm32/size -<span id="L14748" class="LineNr">14748 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= -<span id="L14749" class="LineNr">14749 </span><span class="subxMinorFunction">_string-compare</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14746" class="LineNr">14746 </span> <span class="subxComment"># "break-if->"</span> +<span id="L14747" class="LineNr">14747 </span> 0xa/imm32/size +<span id="L14748" class="LineNr">14748 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> +<span id="L14749" class="LineNr">14749 </span><span class="subxMinorFunction">_string-break-if->=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14750" class="LineNr">14750 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14751" class="LineNr">14751 </span> <span class="subxComment"># "compare"</span> -<span id="L14752" class="LineNr">14752 </span> 0x7/imm32/size -<span id="L14753" class="LineNr">14753 </span> 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e -<span id="L14754" class="LineNr">14754 </span><span class="subxMinorFunction">_string-copy</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14751" class="LineNr">14751 </span> <span class="subxComment"># "break-if->="</span> +<span id="L14752" class="LineNr">14752 </span> 0xb/imm32/size +<span id="L14753" class="LineNr">14753 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= +<span id="L14754" class="LineNr">14754 </span><span class="subxMinorFunction">_string-break-if-!=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14755" class="LineNr">14755 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14756" class="LineNr">14756 </span> <span class="subxComment"># "copy"</span> -<span id="L14757" class="LineNr">14757 </span> 0x4/imm32/size -<span id="L14758" class="LineNr">14758 </span> 0x63/c 0x6f/o 0x70/p 0x79/y -<span id="L14759" class="LineNr">14759 </span><span class="subxMinorFunction">_string-copy-to</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14756" class="LineNr">14756 </span> <span class="subxComment"># "break-if-!="</span> +<span id="L14757" class="LineNr">14757 </span> 0xb/imm32/size +<span id="L14758" class="LineNr">14758 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= +<span id="L14759" class="LineNr">14759 </span><span class="subxMinorFunction">_string-break-if-addr<</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14760" class="LineNr">14760 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14761" class="LineNr">14761 </span> <span class="subxComment"># "copy-to"</span> -<span id="L14762" class="LineNr">14762 </span> 0x7/imm32/size -<span id="L14763" class="LineNr">14763 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o -<span id="L14764" class="LineNr">14764 </span><span class="subxMinorFunction">_string-copy-byte</span>: +<span id="L14761" class="LineNr">14761 </span> <span class="subxComment"># "break-if-addr<"</span> +<span id="L14762" class="LineNr">14762 </span> 0xe/imm32/size +<span id="L14763" class="LineNr">14763 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< +<span id="L14764" class="LineNr">14764 </span><span class="subxMinorFunction">_string-break-if-addr<=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14765" class="LineNr">14765 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14766" class="LineNr">14766 </span> <span class="subxComment"># "copy-byte"</span> -<span id="L14767" class="LineNr">14767 </span> 0x9/imm32/size -<span id="L14768" class="LineNr">14768 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/- 0x62/b 0x79/y 0x74/t 0x65/e -<span id="L14769" class="LineNr">14769 </span><span class="subxMinorFunction">_string-copy-byte-to</span>: +<span id="L14766" class="LineNr">14766 </span> <span class="subxComment"># "break-if-addr<="</span> +<span id="L14767" class="LineNr">14767 </span> 0xf/imm32/size +<span id="L14768" class="LineNr">14768 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= +<span id="L14769" class="LineNr">14769 </span><span class="subxMinorFunction">_string-break-if-addr></span>: <span class="subxComment"># (payload array byte)</span> <span id="L14770" class="LineNr">14770 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14771" class="LineNr">14771 </span> <span class="subxComment"># "copy-byte-to"</span> -<span id="L14772" class="LineNr">14772 </span> 0xc/imm32/size -<span id="L14773" class="LineNr">14773 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/- 0x62/b 0x79/y 0x74/t 0x65/e 0x2d/- 0x74/t 0x6f/o -<span id="L14774" class="LineNr">14774 </span><span class="subxMinorFunction">_string-decrement</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14771" class="LineNr">14771 </span> <span class="subxComment"># "break-if-addr>"</span> +<span id="L14772" class="LineNr">14772 </span> 0xe/imm32/size +<span id="L14773" class="LineNr">14773 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> +<span id="L14774" class="LineNr">14774 </span><span class="subxMinorFunction">_string-break-if-addr>=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14775" class="LineNr">14775 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14776" class="LineNr">14776 </span> <span class="subxComment"># "decrement"</span> -<span id="L14777" class="LineNr">14777 </span> 0x9/imm32/size -<span id="L14778" class="LineNr">14778 </span> 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t -<span id="L14779" class="LineNr">14779 </span><span class="subxMinorFunction">_string-increment</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14776" class="LineNr">14776 </span> <span class="subxComment"># "break-if-addr>="</span> +<span id="L14777" class="LineNr">14777 </span> 0xf/imm32/size +<span id="L14778" class="LineNr">14778 </span> 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= +<span id="L14779" class="LineNr">14779 </span><span class="subxMinorFunction">_string-compare</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14780" class="LineNr">14780 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14781" class="LineNr">14781 </span> <span class="subxComment"># "increment"</span> -<span id="L14782" class="LineNr">14782 </span> 0x9/imm32/size -<span id="L14783" class="LineNr">14783 </span> 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t -<span id="L14784" class="LineNr">14784 </span><span class="subxMinorFunction">_string-loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14781" class="LineNr">14781 </span> <span class="subxComment"># "compare"</span> +<span id="L14782" class="LineNr">14782 </span> 0x7/imm32/size +<span id="L14783" class="LineNr">14783 </span> 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e +<span id="L14784" class="LineNr">14784 </span><span class="subxMinorFunction">_string-copy</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14785" class="LineNr">14785 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14786" class="LineNr">14786 </span> <span class="subxComment"># "loop"</span> +<span id="L14786" class="LineNr">14786 </span> <span class="subxComment"># "copy"</span> <span id="L14787" class="LineNr">14787 </span> 0x4/imm32/size -<span id="L14788" class="LineNr">14788 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p -<span id="L14789" class="LineNr">14789 </span><span class="subxMinorFunction">_string-loop-if-<</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14788" class="LineNr">14788 </span> 0x63/c 0x6f/o 0x70/p 0x79/y +<span id="L14789" class="LineNr">14789 </span><span class="subxMinorFunction">_string-copy-to</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14790" class="LineNr">14790 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14791" class="LineNr">14791 </span> <span class="subxComment"># "loop-if-<"</span> -<span id="L14792" class="LineNr">14792 </span> 0x9/imm32/size -<span id="L14793" class="LineNr">14793 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< -<span id="L14794" class="LineNr">14794 </span><span class="subxMinorFunction">_string-loop-if-<=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14791" class="LineNr">14791 </span> <span class="subxComment"># "copy-to"</span> +<span id="L14792" class="LineNr">14792 </span> 0x7/imm32/size +<span id="L14793" class="LineNr">14793 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o +<span id="L14794" class="LineNr">14794 </span><span class="subxMinorFunction">_string-copy-byte</span>: <span id="L14795" class="LineNr">14795 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14796" class="LineNr">14796 </span> <span class="subxComment"># "loop-if-<="</span> -<span id="L14797" class="LineNr">14797 </span> 0xa/imm32/size -<span id="L14798" class="LineNr">14798 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= -<span id="L14799" class="LineNr">14799 </span><span class="subxMinorFunction">_string-loop-if-=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14796" class="LineNr">14796 </span> <span class="subxComment"># "copy-byte"</span> +<span id="L14797" class="LineNr">14797 </span> 0x9/imm32/size +<span id="L14798" class="LineNr">14798 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/- 0x62/b 0x79/y 0x74/t 0x65/e +<span id="L14799" class="LineNr">14799 </span><span class="subxMinorFunction">_string-copy-byte-to</span>: <span id="L14800" class="LineNr">14800 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14801" class="LineNr">14801 </span> <span class="subxComment"># "loop-if-="</span> -<span id="L14802" class="LineNr">14802 </span> 0x9/imm32/size -<span id="L14803" class="LineNr">14803 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= -<span id="L14804" class="LineNr">14804 </span><span class="subxMinorFunction">_string-loop-if-></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14801" class="LineNr">14801 </span> <span class="subxComment"># "copy-byte-to"</span> +<span id="L14802" class="LineNr">14802 </span> 0xc/imm32/size +<span id="L14803" class="LineNr">14803 </span> 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/- 0x62/b 0x79/y 0x74/t 0x65/e 0x2d/- 0x74/t 0x6f/o +<span id="L14804" class="LineNr">14804 </span><span class="subxMinorFunction">_string-decrement</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14805" class="LineNr">14805 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14806" class="LineNr">14806 </span> <span class="subxComment"># "loop-if->"</span> +<span id="L14806" class="LineNr">14806 </span> <span class="subxComment"># "decrement"</span> <span id="L14807" class="LineNr">14807 </span> 0x9/imm32/size -<span id="L14808" class="LineNr">14808 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> -<span id="L14809" class="LineNr">14809 </span><span class="subxMinorFunction">_string-loop-if->=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14808" class="LineNr">14808 </span> 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t +<span id="L14809" class="LineNr">14809 </span><span class="subxMinorFunction">_string-increment</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14810" class="LineNr">14810 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14811" class="LineNr">14811 </span> <span class="subxComment"># "loop-if->="</span> -<span id="L14812" class="LineNr">14812 </span> 0xa/imm32/size -<span id="L14813" class="LineNr">14813 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= -<span id="L14814" class="LineNr">14814 </span><span class="subxMinorFunction">_string-loop-if-!=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14811" class="LineNr">14811 </span> <span class="subxComment"># "increment"</span> +<span id="L14812" class="LineNr">14812 </span> 0x9/imm32/size +<span id="L14813" class="LineNr">14813 </span> 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t +<span id="L14814" class="LineNr">14814 </span><span class="subxMinorFunction">_string-loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14815" class="LineNr">14815 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14816" class="LineNr">14816 </span> <span class="subxComment"># "loop-if-!="</span> -<span id="L14817" class="LineNr">14817 </span> 0xa/imm32/size -<span id="L14818" class="LineNr">14818 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= -<span id="L14819" class="LineNr">14819 </span><span class="subxMinorFunction">_string-loop-if-addr<</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14816" class="LineNr">14816 </span> <span class="subxComment"># "loop"</span> +<span id="L14817" class="LineNr">14817 </span> 0x4/imm32/size +<span id="L14818" class="LineNr">14818 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p +<span id="L14819" class="LineNr">14819 </span><span class="subxMinorFunction">_string-loop-if-<</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14820" class="LineNr">14820 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14821" class="LineNr">14821 </span> <span class="subxComment"># "loop-if-addr<"</span> -<span id="L14822" class="LineNr">14822 </span> 0xd/imm32/size -<span id="L14823" class="LineNr">14823 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< -<span id="L14824" class="LineNr">14824 </span><span class="subxMinorFunction">_string-loop-if-addr<=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14821" class="LineNr">14821 </span> <span class="subxComment"># "loop-if-<"</span> +<span id="L14822" class="LineNr">14822 </span> 0x9/imm32/size +<span id="L14823" class="LineNr">14823 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< +<span id="L14824" class="LineNr">14824 </span><span class="subxMinorFunction">_string-loop-if-<=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14825" class="LineNr">14825 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14826" class="LineNr">14826 </span> <span class="subxComment"># "loop-if-addr<="</span> -<span id="L14827" class="LineNr">14827 </span> 0xe/imm32/size -<span id="L14828" class="LineNr">14828 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= -<span id="L14829" class="LineNr">14829 </span><span class="subxMinorFunction">_string-loop-if-addr></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14826" class="LineNr">14826 </span> <span class="subxComment"># "loop-if-<="</span> +<span id="L14827" class="LineNr">14827 </span> 0xa/imm32/size +<span id="L14828" class="LineNr">14828 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= +<span id="L14829" class="LineNr">14829 </span><span class="subxMinorFunction">_string-loop-if-=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14830" class="LineNr">14830 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14831" class="LineNr">14831 </span> <span class="subxComment"># "loop-if-addr>"</span> -<span id="L14832" class="LineNr">14832 </span> 0xd/imm32/size -<span id="L14833" class="LineNr">14833 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> -<span id="L14834" class="LineNr">14834 </span><span class="subxMinorFunction">_string-loop-if-addr>=</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14831" class="LineNr">14831 </span> <span class="subxComment"># "loop-if-="</span> +<span id="L14832" class="LineNr">14832 </span> 0x9/imm32/size +<span id="L14833" class="LineNr">14833 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= +<span id="L14834" class="LineNr">14834 </span><span class="subxMinorFunction">_string-loop-if-></span>: <span class="subxComment"># (payload array byte)</span> <span id="L14835" class="LineNr">14835 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14836" class="LineNr">14836 </span> <span class="subxComment"># "loop-if-addr>="</span> -<span id="L14837" class="LineNr">14837 </span> 0xe/imm32/size -<span id="L14838" class="LineNr">14838 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= -<span id="L14839" class="LineNr">14839 </span><span class="subxMinorFunction">_string-multiply</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14836" class="LineNr">14836 </span> <span class="subxComment"># "loop-if->"</span> +<span id="L14837" class="LineNr">14837 </span> 0x9/imm32/size +<span id="L14838" class="LineNr">14838 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> +<span id="L14839" class="LineNr">14839 </span><span class="subxMinorFunction">_string-loop-if->=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14840" class="LineNr">14840 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14841" class="LineNr">14841 </span> <span class="subxComment"># "multiply"</span> -<span id="L14842" class="LineNr">14842 </span> 0x8/imm32/size -<span id="L14843" class="LineNr">14843 </span> 0x6d/m 0x75/u 0x6c/l 0x74/t 0x69/i 0x70/p 0x6c/l 0x79/y -<span id="L14844" class="LineNr">14844 </span><span class="subxMinorFunction">_string-or</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14841" class="LineNr">14841 </span> <span class="subxComment"># "loop-if->="</span> +<span id="L14842" class="LineNr">14842 </span> 0xa/imm32/size +<span id="L14843" class="LineNr">14843 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= +<span id="L14844" class="LineNr">14844 </span><span class="subxMinorFunction">_string-loop-if-!=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14845" class="LineNr">14845 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14846" class="LineNr">14846 </span> <span class="subxComment"># "or"</span> -<span id="L14847" class="LineNr">14847 </span> 0x2/imm32/size -<span id="L14848" class="LineNr">14848 </span> 0x6f/o 0x72/r -<span id="L14849" class="LineNr">14849 </span><span class="subxMinorFunction">_string-or-with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14846" class="LineNr">14846 </span> <span class="subxComment"># "loop-if-!="</span> +<span id="L14847" class="LineNr">14847 </span> 0xa/imm32/size +<span id="L14848" class="LineNr">14848 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= +<span id="L14849" class="LineNr">14849 </span><span class="subxMinorFunction">_string-loop-if-addr<</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14850" class="LineNr">14850 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14851" class="LineNr">14851 </span> <span class="subxComment"># "or-with"</span> -<span id="L14852" class="LineNr">14852 </span> 0x7/imm32/size -<span id="L14853" class="LineNr">14853 </span> 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L14854" class="LineNr">14854 </span><span class="subxMinorFunction">_string-subtract</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14851" class="LineNr">14851 </span> <span class="subxComment"># "loop-if-addr<"</span> +<span id="L14852" class="LineNr">14852 </span> 0xd/imm32/size +<span id="L14853" class="LineNr">14853 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< +<span id="L14854" class="LineNr">14854 </span><span class="subxMinorFunction">_string-loop-if-addr<=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14855" class="LineNr">14855 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14856" class="LineNr">14856 </span> <span class="subxComment"># "subtract"</span> -<span id="L14857" class="LineNr">14857 </span> 0x8/imm32/size -<span id="L14858" class="LineNr">14858 </span> 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t -<span id="L14859" class="LineNr">14859 </span><span class="subxMinorFunction">_string-subtract-from</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14856" class="LineNr">14856 </span> <span class="subxComment"># "loop-if-addr<="</span> +<span id="L14857" class="LineNr">14857 </span> 0xe/imm32/size +<span id="L14858" class="LineNr">14858 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= +<span id="L14859" class="LineNr">14859 </span><span class="subxMinorFunction">_string-loop-if-addr></span>: <span class="subxComment"># (payload array byte)</span> <span id="L14860" class="LineNr">14860 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14861" class="LineNr">14861 </span> <span class="subxComment"># "subtract-from"</span> +<span id="L14861" class="LineNr">14861 </span> <span class="subxComment"># "loop-if-addr>"</span> <span id="L14862" class="LineNr">14862 </span> 0xd/imm32/size -<span id="L14863" class="LineNr">14863 </span> 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m -<span id="L14864" class="LineNr">14864 </span><span class="subxMinorFunction">_string-xor</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14863" class="LineNr">14863 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> +<span id="L14864" class="LineNr">14864 </span><span class="subxMinorFunction">_string-loop-if-addr>=</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14865" class="LineNr">14865 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14866" class="LineNr">14866 </span> <span class="subxComment"># "xor"</span> -<span id="L14867" class="LineNr">14867 </span> 0x3/imm32/size -<span id="L14868" class="LineNr">14868 </span> 0x78/x 0x6f/o 0x72/r -<span id="L14869" class="LineNr">14869 </span><span class="subxMinorFunction">_string-xor-with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14866" class="LineNr">14866 </span> <span class="subxComment"># "loop-if-addr>="</span> +<span id="L14867" class="LineNr">14867 </span> 0xe/imm32/size +<span id="L14868" class="LineNr">14868 </span> 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= +<span id="L14869" class="LineNr">14869 </span><span class="subxMinorFunction">_string-multiply</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14870" class="LineNr">14870 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14871" class="LineNr">14871 </span> <span class="subxComment"># "xor-with"</span> +<span id="L14871" class="LineNr">14871 </span> <span class="subxComment"># "multiply"</span> <span id="L14872" class="LineNr">14872 </span> 0x8/imm32/size -<span id="L14873" class="LineNr">14873 </span> 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L14874" class="LineNr">14874 </span> -<span id="L14875" class="LineNr">14875 </span><span class="subxComment"># string literals for SubX instructions</span> -<span id="L14876" class="LineNr">14876 </span><span class="subxMinorFunction">_string_01_add_to</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14877" class="LineNr">14877 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14878" class="LineNr">14878 </span> <span class="subxComment"># "01/add-to"</span> -<span id="L14879" class="LineNr">14879 </span> 0x9/imm32/size -<span id="L14880" class="LineNr">14880 </span> 0x30/0 0x31/1 0x2f/slash 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o -<span id="L14881" class="LineNr">14881 </span><span class="subxMinorFunction">_string_03_add</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14882" class="LineNr">14882 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14883" class="LineNr">14883 </span> <span class="subxComment"># "03/add"</span> -<span id="L14884" class="LineNr">14884 </span> 0x6/imm32/size -<span id="L14885" class="LineNr">14885 </span> 0x30/0 0x33/3 0x2f/slash 0x61/a 0x64/d 0x64/d -<span id="L14886" class="LineNr">14886 </span><span class="subxMinorFunction">_string_05_add_to_eax</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14887" class="LineNr">14887 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14888" class="LineNr">14888 </span> <span class="subxComment"># "05/add-to-eax"</span> -<span id="L14889" class="LineNr">14889 </span> 0xd/imm32/size -<span id="L14890" class="LineNr">14890 </span> 0x30/0 0x35/5 0x2f/slash 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L14891" class="LineNr">14891 </span><span class="subxMinorFunction">_string_09_or_with</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14892" class="LineNr">14892 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14893" class="LineNr">14893 </span> <span class="subxComment"># "09/or-with"</span> -<span id="L14894" class="LineNr">14894 </span> 0xa/imm32/size -<span id="L14895" class="LineNr">14895 </span> 0x30/0 0x39/9 0x2f/slash 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L14896" class="LineNr">14896 </span><span class="subxMinorFunction">_string_0b_or</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14897" class="LineNr">14897 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14898" class="LineNr">14898 </span> <span class="subxComment"># "0b/or"</span> -<span id="L14899" class="LineNr">14899 </span> 0x5/imm32/size -<span id="L14900" class="LineNr">14900 </span> 0x30/0 0x62/b 0x2f/slash 0x6f/o 0x72/r -<span id="L14901" class="LineNr">14901 </span><span class="subxMinorFunction">_string_0d_or_with_eax</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L14902" class="LineNr">14902 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14903" class="LineNr">14903 </span> <span class="subxComment"># "0d/or-with-eax"</span> -<span id="L14904" class="LineNr">14904 </span> 0xe/imm32/size -<span id="L14905" class="LineNr">14905 </span> 0x30/0 0x64/d 0x2f/slash 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L14906" class="LineNr">14906 </span><span class="subxMinorFunction">_string_0f_82_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14873" class="LineNr">14873 </span> 0x6d/m 0x75/u 0x6c/l 0x74/t 0x69/i 0x70/p 0x6c/l 0x79/y +<span id="L14874" class="LineNr">14874 </span><span class="subxMinorFunction">_string-or</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14875" class="LineNr">14875 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14876" class="LineNr">14876 </span> <span class="subxComment"># "or"</span> +<span id="L14877" class="LineNr">14877 </span> 0x2/imm32/size +<span id="L14878" class="LineNr">14878 </span> 0x6f/o 0x72/r +<span id="L14879" class="LineNr">14879 </span><span class="subxMinorFunction">_string-or-with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14880" class="LineNr">14880 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14881" class="LineNr">14881 </span> <span class="subxComment"># "or-with"</span> +<span id="L14882" class="LineNr">14882 </span> 0x7/imm32/size +<span id="L14883" class="LineNr">14883 </span> 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L14884" class="LineNr">14884 </span><span class="subxMinorFunction">_string-subtract</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14885" class="LineNr">14885 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14886" class="LineNr">14886 </span> <span class="subxComment"># "subtract"</span> +<span id="L14887" class="LineNr">14887 </span> 0x8/imm32/size +<span id="L14888" class="LineNr">14888 </span> 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t +<span id="L14889" class="LineNr">14889 </span><span class="subxMinorFunction">_string-subtract-from</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14890" class="LineNr">14890 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14891" class="LineNr">14891 </span> <span class="subxComment"># "subtract-from"</span> +<span id="L14892" class="LineNr">14892 </span> 0xd/imm32/size +<span id="L14893" class="LineNr">14893 </span> 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m +<span id="L14894" class="LineNr">14894 </span><span class="subxMinorFunction">_string-xor</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14895" class="LineNr">14895 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14896" class="LineNr">14896 </span> <span class="subxComment"># "xor"</span> +<span id="L14897" class="LineNr">14897 </span> 0x3/imm32/size +<span id="L14898" class="LineNr">14898 </span> 0x78/x 0x6f/o 0x72/r +<span id="L14899" class="LineNr">14899 </span><span class="subxMinorFunction">_string-xor-with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14900" class="LineNr">14900 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L14901" class="LineNr">14901 </span> <span class="subxComment"># "xor-with"</span> +<span id="L14902" class="LineNr">14902 </span> 0x8/imm32/size +<span id="L14903" class="LineNr">14903 </span> 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L14904" class="LineNr">14904 </span> +<span id="L14905" class="LineNr">14905 </span><span class="subxComment"># string literals for SubX instructions</span> +<span id="L14906" class="LineNr">14906 </span><span class="subxMinorFunction">_string_01_add_to</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14907" class="LineNr">14907 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14908" class="LineNr">14908 </span> <span class="subxComment"># "0f 82/jump-if-addr<"</span> -<span id="L14909" class="LineNr">14909 </span> 0x13/imm32/size -<span id="L14910" class="LineNr">14910 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< -<span id="L14911" class="LineNr">14911 </span><span class="subxMinorFunction">_string_0f_82_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14908" class="LineNr">14908 </span> <span class="subxComment"># "01/add-to"</span> +<span id="L14909" class="LineNr">14909 </span> 0x9/imm32/size +<span id="L14910" class="LineNr">14910 </span> 0x30/0 0x31/1 0x2f/slash 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o +<span id="L14911" class="LineNr">14911 </span><span class="subxMinorFunction">_string_03_add</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14912" class="LineNr">14912 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14913" class="LineNr">14913 </span> <span class="subxComment"># "0f 82/jump-if-addr< break/disp32"</span> -<span id="L14914" class="LineNr">14914 </span> 0x20/imm32/size -<span id="L14915" class="LineNr">14915 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14916" class="LineNr">14916 </span><span class="subxMinorFunction">_string_0f_82_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14913" class="LineNr">14913 </span> <span class="subxComment"># "03/add"</span> +<span id="L14914" class="LineNr">14914 </span> 0x6/imm32/size +<span id="L14915" class="LineNr">14915 </span> 0x30/0 0x33/3 0x2f/slash 0x61/a 0x64/d 0x64/d +<span id="L14916" class="LineNr">14916 </span><span class="subxMinorFunction">_string_05_add_to_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14917" class="LineNr">14917 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14918" class="LineNr">14918 </span> <span class="subxComment"># "0f 82/jump-if-addr< loop/disp32"</span> -<span id="L14919" class="LineNr">14919 </span> 0x1f/imm32/size -<span id="L14920" class="LineNr">14920 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14921" class="LineNr">14921 </span><span class="subxMinorFunction">_string_0f_83_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14918" class="LineNr">14918 </span> <span class="subxComment"># "05/add-to-eax"</span> +<span id="L14919" class="LineNr">14919 </span> 0xd/imm32/size +<span id="L14920" class="LineNr">14920 </span> 0x30/0 0x35/5 0x2f/slash 0x61/a 0x64/d 0x64/d 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L14921" class="LineNr">14921 </span><span class="subxMinorFunction">_string_09_or_with</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14922" class="LineNr">14922 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14923" class="LineNr">14923 </span> <span class="subxComment"># "0f 83/jump-if-addr>="</span> -<span id="L14924" class="LineNr">14924 </span> 0x14/imm32/size -<span id="L14925" class="LineNr">14925 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= -<span id="L14926" class="LineNr">14926 </span><span class="subxMinorFunction">_string_0f_83_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14923" class="LineNr">14923 </span> <span class="subxComment"># "09/or-with"</span> +<span id="L14924" class="LineNr">14924 </span> 0xa/imm32/size +<span id="L14925" class="LineNr">14925 </span> 0x30/0 0x39/9 0x2f/slash 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L14926" class="LineNr">14926 </span><span class="subxMinorFunction">_string_0b_or</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14927" class="LineNr">14927 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14928" class="LineNr">14928 </span> <span class="subxComment"># "0f 83/jump-if-addr>= break/disp32"</span> -<span id="L14929" class="LineNr">14929 </span> 0x21/imm32/size -<span id="L14930" class="LineNr">14930 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14931" class="LineNr">14931 </span><span class="subxMinorFunction">_string_0f_83_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14928" class="LineNr">14928 </span> <span class="subxComment"># "0b/or"</span> +<span id="L14929" class="LineNr">14929 </span> 0x5/imm32/size +<span id="L14930" class="LineNr">14930 </span> 0x30/0 0x62/b 0x2f/slash 0x6f/o 0x72/r +<span id="L14931" class="LineNr">14931 </span><span class="subxMinorFunction">_string_0d_or_with_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14932" class="LineNr">14932 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14933" class="LineNr">14933 </span> <span class="subxComment"># "0f 83/jump-if-addr>= loop/disp32"</span> -<span id="L14934" class="LineNr">14934 </span> 0x20/imm32/size -<span id="L14935" class="LineNr">14935 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14936" class="LineNr">14936 </span><span class="subxMinorFunction">_string_0f_84_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14933" class="LineNr">14933 </span> <span class="subxComment"># "0d/or-with-eax"</span> +<span id="L14934" class="LineNr">14934 </span> 0xe/imm32/size +<span id="L14935" class="LineNr">14935 </span> 0x30/0 0x64/d 0x2f/slash 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L14936" class="LineNr">14936 </span><span class="subxMinorFunction">_string_0f_82_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14937" class="LineNr">14937 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14938" class="LineNr">14938 </span> <span class="subxComment"># "0f 84/jump-if-="</span> -<span id="L14939" class="LineNr">14939 </span> 0xf/imm32/size -<span id="L14940" class="LineNr">14940 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= -<span id="L14941" class="LineNr">14941 </span><span class="subxMinorFunction">_string_0f_84_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14938" class="LineNr">14938 </span> <span class="subxComment"># "0f 82/jump-if-addr<"</span> +<span id="L14939" class="LineNr">14939 </span> 0x13/imm32/size +<span id="L14940" class="LineNr">14940 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< +<span id="L14941" class="LineNr">14941 </span><span class="subxMinorFunction">_string_0f_82_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14942" class="LineNr">14942 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14943" class="LineNr">14943 </span> <span class="subxComment"># "0f 84/jump-if-= break/disp32"</span> -<span id="L14944" class="LineNr">14944 </span> 0x1c/imm32/size -<span id="L14945" class="LineNr">14945 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14946" class="LineNr">14946 </span><span class="subxMinorFunction">_string_0f_84_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14943" class="LineNr">14943 </span> <span class="subxComment"># "0f 82/jump-if-addr< break/disp32"</span> +<span id="L14944" class="LineNr">14944 </span> 0x20/imm32/size +<span id="L14945" class="LineNr">14945 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14946" class="LineNr">14946 </span><span class="subxMinorFunction">_string_0f_82_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14947" class="LineNr">14947 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14948" class="LineNr">14948 </span> <span class="subxComment"># "0f 84/jump-if-= loop/disp32"</span> -<span id="L14949" class="LineNr">14949 </span> 0x1b/imm32/size -<span id="L14950" class="LineNr">14950 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14951" class="LineNr">14951 </span><span class="subxMinorFunction">_string_0f_85_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14948" class="LineNr">14948 </span> <span class="subxComment"># "0f 82/jump-if-addr< loop/disp32"</span> +<span id="L14949" class="LineNr">14949 </span> 0x1f/imm32/size +<span id="L14950" class="LineNr">14950 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x32/2 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14951" class="LineNr">14951 </span><span class="subxMinorFunction">_string_0f_83_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14952" class="LineNr">14952 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14953" class="LineNr">14953 </span> <span class="subxComment"># "0f 85/jump-if-!="</span> -<span id="L14954" class="LineNr">14954 </span> 0x10/imm32/size -<span id="L14955" class="LineNr">14955 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= -<span id="L14956" class="LineNr">14956 </span><span class="subxMinorFunction">_string_0f_85_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14953" class="LineNr">14953 </span> <span class="subxComment"># "0f 83/jump-if-addr>="</span> +<span id="L14954" class="LineNr">14954 </span> 0x14/imm32/size +<span id="L14955" class="LineNr">14955 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= +<span id="L14956" class="LineNr">14956 </span><span class="subxMinorFunction">_string_0f_83_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14957" class="LineNr">14957 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14958" class="LineNr">14958 </span> <span class="subxComment"># "0f 85/jump-if-!= break/disp32"</span> -<span id="L14959" class="LineNr">14959 </span> 0x1d/imm32/size -<span id="L14960" class="LineNr">14960 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14961" class="LineNr">14961 </span><span class="subxMinorFunction">_string_0f_85_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14958" class="LineNr">14958 </span> <span class="subxComment"># "0f 83/jump-if-addr>= break/disp32"</span> +<span id="L14959" class="LineNr">14959 </span> 0x21/imm32/size +<span id="L14960" class="LineNr">14960 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14961" class="LineNr">14961 </span><span class="subxMinorFunction">_string_0f_83_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14962" class="LineNr">14962 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14963" class="LineNr">14963 </span> <span class="subxComment"># "0f 85/jump-if-!= loop/disp32"</span> -<span id="L14964" class="LineNr">14964 </span> 0x1c/imm32/size -<span id="L14965" class="LineNr">14965 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14966" class="LineNr">14966 </span><span class="subxMinorFunction">_string_0f_86_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14963" class="LineNr">14963 </span> <span class="subxComment"># "0f 83/jump-if-addr>= loop/disp32"</span> +<span id="L14964" class="LineNr">14964 </span> 0x20/imm32/size +<span id="L14965" class="LineNr">14965 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x33/3 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14966" class="LineNr">14966 </span><span class="subxMinorFunction">_string_0f_84_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14967" class="LineNr">14967 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14968" class="LineNr">14968 </span> <span class="subxComment"># "0f 86/jump-if-addr<="</span> -<span id="L14969" class="LineNr">14969 </span> 0x14/imm32/size -<span id="L14970" class="LineNr">14970 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= -<span id="L14971" class="LineNr">14971 </span><span class="subxMinorFunction">_string_0f_86_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14968" class="LineNr">14968 </span> <span class="subxComment"># "0f 84/jump-if-="</span> +<span id="L14969" class="LineNr">14969 </span> 0xf/imm32/size +<span id="L14970" class="LineNr">14970 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= +<span id="L14971" class="LineNr">14971 </span><span class="subxMinorFunction">_string_0f_84_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14972" class="LineNr">14972 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14973" class="LineNr">14973 </span> <span class="subxComment"># "0f 86/jump-if-addr<= break/disp32"</span> -<span id="L14974" class="LineNr">14974 </span> 0x21/imm32/size -<span id="L14975" class="LineNr">14975 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14976" class="LineNr">14976 </span><span class="subxMinorFunction">_string_0f_86_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14973" class="LineNr">14973 </span> <span class="subxComment"># "0f 84/jump-if-= break/disp32"</span> +<span id="L14974" class="LineNr">14974 </span> 0x1c/imm32/size +<span id="L14975" class="LineNr">14975 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14976" class="LineNr">14976 </span><span class="subxMinorFunction">_string_0f_84_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14977" class="LineNr">14977 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14978" class="LineNr">14978 </span> <span class="subxComment"># "0f 86/jump-if-addr<= loop/disp32"</span> -<span id="L14979" class="LineNr">14979 </span> 0x20/imm32/size -<span id="L14980" class="LineNr">14980 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14981" class="LineNr">14981 </span><span class="subxMinorFunction">_string_0f_87_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14978" class="LineNr">14978 </span> <span class="subxComment"># "0f 84/jump-if-= loop/disp32"</span> +<span id="L14979" class="LineNr">14979 </span> 0x1b/imm32/size +<span id="L14980" class="LineNr">14980 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x34/4 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3d/= 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14981" class="LineNr">14981 </span><span class="subxMinorFunction">_string_0f_85_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14982" class="LineNr">14982 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14983" class="LineNr">14983 </span> <span class="subxComment"># "0f 87/jump-if-addr>"</span> -<span id="L14984" class="LineNr">14984 </span> 0x13/imm32/size -<span id="L14985" class="LineNr">14985 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> -<span id="L14986" class="LineNr">14986 </span><span class="subxMinorFunction">_string_0f_87_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14983" class="LineNr">14983 </span> <span class="subxComment"># "0f 85/jump-if-!="</span> +<span id="L14984" class="LineNr">14984 </span> 0x10/imm32/size +<span id="L14985" class="LineNr">14985 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= +<span id="L14986" class="LineNr">14986 </span><span class="subxMinorFunction">_string_0f_85_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14987" class="LineNr">14987 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14988" class="LineNr">14988 </span> <span class="subxComment"># "0f 87/jump-if-addr> break/disp32"</span> -<span id="L14989" class="LineNr">14989 </span> 0x20/imm32/size -<span id="L14990" class="LineNr">14990 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14991" class="LineNr">14991 </span><span class="subxMinorFunction">_string_0f_87_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14988" class="LineNr">14988 </span> <span class="subxComment"># "0f 85/jump-if-!= break/disp32"</span> +<span id="L14989" class="LineNr">14989 </span> 0x1d/imm32/size +<span id="L14990" class="LineNr">14990 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14991" class="LineNr">14991 </span><span class="subxMinorFunction">_string_0f_85_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14992" class="LineNr">14992 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14993" class="LineNr">14993 </span> <span class="subxComment"># "0f 87/jump-if-addr> loop/disp32"</span> -<span id="L14994" class="LineNr">14994 </span> 0x1f/imm32/size -<span id="L14995" class="LineNr">14995 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L14996" class="LineNr">14996 </span><span class="subxMinorFunction">_string_0f_8c_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14993" class="LineNr">14993 </span> <span class="subxComment"># "0f 85/jump-if-!= loop/disp32"</span> +<span id="L14994" class="LineNr">14994 </span> 0x1c/imm32/size +<span id="L14995" class="LineNr">14995 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x35/5 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x21/! 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L14996" class="LineNr">14996 </span><span class="subxMinorFunction">_string_0f_86_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L14997" class="LineNr">14997 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L14998" class="LineNr">14998 </span> <span class="subxComment"># "0f 8c/jump-if-<"</span> -<span id="L14999" class="LineNr">14999 </span> 0xf/imm32/size -<span id="L15000" class="LineNr">15000 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< -<span id="L15001" class="LineNr">15001 </span><span class="subxMinorFunction">_string_0f_8c_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L14998" class="LineNr">14998 </span> <span class="subxComment"># "0f 86/jump-if-addr<="</span> +<span id="L14999" class="LineNr">14999 </span> 0x14/imm32/size +<span id="L15000" class="LineNr">15000 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= +<span id="L15001" class="LineNr">15001 </span><span class="subxMinorFunction">_string_0f_86_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15002" class="LineNr">15002 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15003" class="LineNr">15003 </span> <span class="subxComment"># "0f 8c/jump-if-< break/disp32"</span> -<span id="L15004" class="LineNr">15004 </span> 0x1c/imm32/size -<span id="L15005" class="LineNr">15005 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15006" class="LineNr">15006 </span><span class="subxMinorFunction">_string_0f_8c_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15003" class="LineNr">15003 </span> <span class="subxComment"># "0f 86/jump-if-addr<= break/disp32"</span> +<span id="L15004" class="LineNr">15004 </span> 0x21/imm32/size +<span id="L15005" class="LineNr">15005 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15006" class="LineNr">15006 </span><span class="subxMinorFunction">_string_0f_86_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15007" class="LineNr">15007 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15008" class="LineNr">15008 </span> <span class="subxComment"># "0f 8c/jump-if-< loop/disp32"</span> -<span id="L15009" class="LineNr">15009 </span> 0x1b/imm32/size -<span id="L15010" class="LineNr">15010 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15011" class="LineNr">15011 </span><span class="subxMinorFunction">_string_0f_8d_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15008" class="LineNr">15008 </span> <span class="subxComment"># "0f 86/jump-if-addr<= loop/disp32"</span> +<span id="L15009" class="LineNr">15009 </span> 0x20/imm32/size +<span id="L15010" class="LineNr">15010 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x36/6 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3c/< 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15011" class="LineNr">15011 </span><span class="subxMinorFunction">_string_0f_87_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15012" class="LineNr">15012 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15013" class="LineNr">15013 </span> <span class="subxComment"># "0f 8d/jump-if->="</span> -<span id="L15014" class="LineNr">15014 </span> 0x10/imm32/size -<span id="L15015" class="LineNr">15015 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= -<span id="L15016" class="LineNr">15016 </span><span class="subxMinorFunction">_string_0f_8d_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15013" class="LineNr">15013 </span> <span class="subxComment"># "0f 87/jump-if-addr>"</span> +<span id="L15014" class="LineNr">15014 </span> 0x13/imm32/size +<span id="L15015" class="LineNr">15015 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> +<span id="L15016" class="LineNr">15016 </span><span class="subxMinorFunction">_string_0f_87_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15017" class="LineNr">15017 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15018" class="LineNr">15018 </span> <span class="subxComment"># "0f 8d/jump-if->= break/disp32"</span> -<span id="L15019" class="LineNr">15019 </span> 0x1d/imm32/size -<span id="L15020" class="LineNr">15020 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15021" class="LineNr">15021 </span><span class="subxMinorFunction">_string_0f_8d_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15018" class="LineNr">15018 </span> <span class="subxComment"># "0f 87/jump-if-addr> break/disp32"</span> +<span id="L15019" class="LineNr">15019 </span> 0x20/imm32/size +<span id="L15020" class="LineNr">15020 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15021" class="LineNr">15021 </span><span class="subxMinorFunction">_string_0f_87_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15022" class="LineNr">15022 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15023" class="LineNr">15023 </span> <span class="subxComment"># "0f 8d/jump-if->= loop/disp32"</span> -<span id="L15024" class="LineNr">15024 </span> 0x1c/imm32/size -<span id="L15025" class="LineNr">15025 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15026" class="LineNr">15026 </span><span class="subxMinorFunction">_string_0f_8e_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15023" class="LineNr">15023 </span> <span class="subxComment"># "0f 87/jump-if-addr> loop/disp32"</span> +<span id="L15024" class="LineNr">15024 </span> 0x1f/imm32/size +<span id="L15025" class="LineNr">15025 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x37/7 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x3e/> 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15026" class="LineNr">15026 </span><span class="subxMinorFunction">_string_0f_8c_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15027" class="LineNr">15027 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15028" class="LineNr">15028 </span> <span class="subxComment"># "0f 8e/jump-if-<="</span> -<span id="L15029" class="LineNr">15029 </span> 0x10/imm32/size -<span id="L15030" class="LineNr">15030 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= -<span id="L15031" class="LineNr">15031 </span><span class="subxMinorFunction">_string_0f_8e_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15028" class="LineNr">15028 </span> <span class="subxComment"># "0f 8c/jump-if-<"</span> +<span id="L15029" class="LineNr">15029 </span> 0xf/imm32/size +<span id="L15030" class="LineNr">15030 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< +<span id="L15031" class="LineNr">15031 </span><span class="subxMinorFunction">_string_0f_8c_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15032" class="LineNr">15032 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15033" class="LineNr">15033 </span> <span class="subxComment"># "0f 8e/jump-if-<= break/disp32"</span> -<span id="L15034" class="LineNr">15034 </span> 0x1d/imm32/size -<span id="L15035" class="LineNr">15035 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15036" class="LineNr">15036 </span><span class="subxMinorFunction">_string_0f_8e_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15033" class="LineNr">15033 </span> <span class="subxComment"># "0f 8c/jump-if-< break/disp32"</span> +<span id="L15034" class="LineNr">15034 </span> 0x1c/imm32/size +<span id="L15035" class="LineNr">15035 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15036" class="LineNr">15036 </span><span class="subxMinorFunction">_string_0f_8c_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15037" class="LineNr">15037 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15038" class="LineNr">15038 </span> <span class="subxComment"># "0f 8e/jump-if-<= loop/disp32"</span> -<span id="L15039" class="LineNr">15039 </span> 0x1c/imm32/size -<span id="L15040" class="LineNr">15040 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15041" class="LineNr">15041 </span><span class="subxMinorFunction">_string_0f_8f_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15038" class="LineNr">15038 </span> <span class="subxComment"># "0f 8c/jump-if-< loop/disp32"</span> +<span id="L15039" class="LineNr">15039 </span> 0x1b/imm32/size +<span id="L15040" class="LineNr">15040 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x63/c 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15041" class="LineNr">15041 </span><span class="subxMinorFunction">_string_0f_8d_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15042" class="LineNr">15042 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15043" class="LineNr">15043 </span> <span class="subxComment"># "0f 8f/jump-if->"</span> -<span id="L15044" class="LineNr">15044 </span> 0xf/imm32/size -<span id="L15045" class="LineNr">15045 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> -<span id="L15046" class="LineNr">15046 </span><span class="subxMinorFunction">_string_0f_8f_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15043" class="LineNr">15043 </span> <span class="subxComment"># "0f 8d/jump-if->="</span> +<span id="L15044" class="LineNr">15044 </span> 0x10/imm32/size +<span id="L15045" class="LineNr">15045 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= +<span id="L15046" class="LineNr">15046 </span><span class="subxMinorFunction">_string_0f_8d_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15047" class="LineNr">15047 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15048" class="LineNr">15048 </span> <span class="subxComment"># "0f 8f/jump-if-> break/disp32"</span> -<span id="L15049" class="LineNr">15049 </span> 0x1c/imm32/size -<span id="L15050" class="LineNr">15050 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15051" class="LineNr">15051 </span><span class="subxMinorFunction">_string_0f_8f_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15048" class="LineNr">15048 </span> <span class="subxComment"># "0f 8d/jump-if->= break/disp32"</span> +<span id="L15049" class="LineNr">15049 </span> 0x1d/imm32/size +<span id="L15050" class="LineNr">15050 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15051" class="LineNr">15051 </span><span class="subxMinorFunction">_string_0f_8d_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15052" class="LineNr">15052 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15053" class="LineNr">15053 </span> <span class="subxComment"># "0f 8f/jump-if-> loop/disp32"</span> -<span id="L15054" class="LineNr">15054 </span> 0x1b/imm32/size -<span id="L15055" class="LineNr">15055 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15056" class="LineNr">15056 </span><span class="subxMinorFunction">_string_0f_af_multiply</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15053" class="LineNr">15053 </span> <span class="subxComment"># "0f 8d/jump-if->= loop/disp32"</span> +<span id="L15054" class="LineNr">15054 </span> 0x1c/imm32/size +<span id="L15055" class="LineNr">15055 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x64/d 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15056" class="LineNr">15056 </span><span class="subxMinorFunction">_string_0f_8e_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15057" class="LineNr">15057 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15058" class="LineNr">15058 </span> <span class="subxComment"># "0f af/multiply"</span> -<span id="L15059" class="LineNr">15059 </span> 0xe/imm32/size -<span id="L15060" class="LineNr">15060 </span> 0x30/0 0x66/f 0x20/space 0x61/a 0x66/f 0x2f/slash 0x6d/m 0x75/u 0x6c/l 0x74/t 0x69/i 0x70/p 0x6c/l 0x79/y -<span id="L15061" class="LineNr">15061 </span><span class="subxMinorFunction">_string_21_and_with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15058" class="LineNr">15058 </span> <span class="subxComment"># "0f 8e/jump-if-<="</span> +<span id="L15059" class="LineNr">15059 </span> 0x10/imm32/size +<span id="L15060" class="LineNr">15060 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= +<span id="L15061" class="LineNr">15061 </span><span class="subxMinorFunction">_string_0f_8e_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15062" class="LineNr">15062 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15063" class="LineNr">15063 </span> <span class="subxComment"># "21/and-with"</span> -<span id="L15064" class="LineNr">15064 </span> 0xb/imm32/size -<span id="L15065" class="LineNr">15065 </span> 0x32/2 0x31/1 0x2f/slash 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L15066" class="LineNr">15066 </span><span class="subxMinorFunction">_string_23_and</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15063" class="LineNr">15063 </span> <span class="subxComment"># "0f 8e/jump-if-<= break/disp32"</span> +<span id="L15064" class="LineNr">15064 </span> 0x1d/imm32/size +<span id="L15065" class="LineNr">15065 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15066" class="LineNr">15066 </span><span class="subxMinorFunction">_string_0f_8e_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15067" class="LineNr">15067 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15068" class="LineNr">15068 </span> <span class="subxComment"># "23/and"</span> -<span id="L15069" class="LineNr">15069 </span> 0x6/imm32/size -<span id="L15070" class="LineNr">15070 </span> 0x32/2 0x33/3 0x2f/slash 0x61/a 0x6e/n 0x64/d -<span id="L15071" class="LineNr">15071 </span><span class="subxMinorFunction">_string_25_and_with_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15068" class="LineNr">15068 </span> <span class="subxComment"># "0f 8e/jump-if-<= loop/disp32"</span> +<span id="L15069" class="LineNr">15069 </span> 0x1c/imm32/size +<span id="L15070" class="LineNr">15070 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x65/e 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3c/< 0x3d/= 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15071" class="LineNr">15071 </span><span class="subxMinorFunction">_string_0f_8f_jump_label</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15072" class="LineNr">15072 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15073" class="LineNr">15073 </span> <span class="subxComment"># "25/and-with-eax"</span> +<span id="L15073" class="LineNr">15073 </span> <span class="subxComment"># "0f 8f/jump-if->"</span> <span id="L15074" class="LineNr">15074 </span> 0xf/imm32/size -<span id="L15075" class="LineNr">15075 </span> 0x32/2 0x35/5 0x2f/slash 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15076" class="LineNr">15076 </span><span class="subxMinorFunction">_string_29_subtract_from</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15075" class="LineNr">15075 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> +<span id="L15076" class="LineNr">15076 </span><span class="subxMinorFunction">_string_0f_8f_jump_break</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15077" class="LineNr">15077 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15078" class="LineNr">15078 </span> <span class="subxComment"># "29/subtract-from"</span> -<span id="L15079" class="LineNr">15079 </span> 0x10/imm32/size -<span id="L15080" class="LineNr">15080 </span> 0x32/2 0x39/9 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m -<span id="L15081" class="LineNr">15081 </span><span class="subxMinorFunction">_string_2b_subtract</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15078" class="LineNr">15078 </span> <span class="subxComment"># "0f 8f/jump-if-> break/disp32"</span> +<span id="L15079" class="LineNr">15079 </span> 0x1c/imm32/size +<span id="L15080" class="LineNr">15080 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15081" class="LineNr">15081 </span><span class="subxMinorFunction">_string_0f_8f_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15082" class="LineNr">15082 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15083" class="LineNr">15083 </span> <span class="subxComment"># "2b/subtract"</span> -<span id="L15084" class="LineNr">15084 </span> 0xb/imm32/size -<span id="L15085" class="LineNr">15085 </span> 0x32/2 0x62/b 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t -<span id="L15086" class="LineNr">15086 </span><span class="subxMinorFunction">_string_2d_subtract_from_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15083" class="LineNr">15083 </span> <span class="subxComment"># "0f 8f/jump-if-> loop/disp32"</span> +<span id="L15084" class="LineNr">15084 </span> 0x1b/imm32/size +<span id="L15085" class="LineNr">15085 </span> 0x30/0 0x66/f 0x20/space 0x38/8 0x66/f 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x2d/dash 0x69/i 0x66/f 0x2d/dash 0x3e/> 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15086" class="LineNr">15086 </span><span class="subxMinorFunction">_string_0f_af_multiply</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15087" class="LineNr">15087 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15088" class="LineNr">15088 </span> <span class="subxComment"># "2d/subtract-from-eax"</span> -<span id="L15089" class="LineNr">15089 </span> 0x14/imm32/size -<span id="L15090" class="LineNr">15090 </span> 0x32/2 0x64/d 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15091" class="LineNr">15091 </span><span class="subxMinorFunction">_string_31_xor_with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15088" class="LineNr">15088 </span> <span class="subxComment"># "0f af/multiply"</span> +<span id="L15089" class="LineNr">15089 </span> 0xe/imm32/size +<span id="L15090" class="LineNr">15090 </span> 0x30/0 0x66/f 0x20/space 0x61/a 0x66/f 0x2f/slash 0x6d/m 0x75/u 0x6c/l 0x74/t 0x69/i 0x70/p 0x6c/l 0x79/y +<span id="L15091" class="LineNr">15091 </span><span class="subxMinorFunction">_string_21_and_with</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15092" class="LineNr">15092 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15093" class="LineNr">15093 </span> <span class="subxComment"># "31/xor-with"</span> +<span id="L15093" class="LineNr">15093 </span> <span class="subxComment"># "21/and-with"</span> <span id="L15094" class="LineNr">15094 </span> 0xb/imm32/size -<span id="L15095" class="LineNr">15095 </span> 0x33/3 0x31/1 0x2f/slash 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L15096" class="LineNr">15096 </span><span class="subxMinorFunction">_string_33_xor</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15095" class="LineNr">15095 </span> 0x32/2 0x31/1 0x2f/slash 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L15096" class="LineNr">15096 </span><span class="subxMinorFunction">_string_23_and</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15097" class="LineNr">15097 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15098" class="LineNr">15098 </span> <span class="subxComment"># "33/xor"</span> +<span id="L15098" class="LineNr">15098 </span> <span class="subxComment"># "23/and"</span> <span id="L15099" class="LineNr">15099 </span> 0x6/imm32/size -<span id="L15100" class="LineNr">15100 </span> 0x33/3 0x33/3 0x2f/slash 0x78/x 0x6f/o 0x72/r -<span id="L15101" class="LineNr">15101 </span><span class="subxMinorFunction">_string_35_xor_with_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15100" class="LineNr">15100 </span> 0x32/2 0x33/3 0x2f/slash 0x61/a 0x6e/n 0x64/d +<span id="L15101" class="LineNr">15101 </span><span class="subxMinorFunction">_string_25_and_with_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15102" class="LineNr">15102 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15103" class="LineNr">15103 </span> <span class="subxComment"># "35/xor-with-eax"</span> +<span id="L15103" class="LineNr">15103 </span> <span class="subxComment"># "25/and-with-eax"</span> <span id="L15104" class="LineNr">15104 </span> 0xf/imm32/size -<span id="L15105" class="LineNr">15105 </span> 0x33/3 0x35/5 0x2f/slash 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15106" class="LineNr">15106 </span><span class="subxMinorFunction">_string_39_compare-></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15105" class="LineNr">15105 </span> 0x32/2 0x35/5 0x2f/slash 0x61/a 0x6e/n 0x64/d 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15106" class="LineNr">15106 </span><span class="subxMinorFunction">_string_29_subtract_from</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15107" class="LineNr">15107 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15108" class="LineNr">15108 </span> <span class="subxComment"># "39/compare->"</span> -<span id="L15109" class="LineNr">15109 </span> 0xc/imm32/size -<span id="L15110" class="LineNr">15110 </span> 0x33/3 0x39/9 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x2d/dash 0x3e/> -<span id="L15111" class="LineNr">15111 </span><span class="subxMinorFunction">_string_3b_compare<-</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15108" class="LineNr">15108 </span> <span class="subxComment"># "29/subtract-from"</span> +<span id="L15109" class="LineNr">15109 </span> 0x10/imm32/size +<span id="L15110" class="LineNr">15110 </span> 0x32/2 0x39/9 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m +<span id="L15111" class="LineNr">15111 </span><span class="subxMinorFunction">_string_2b_subtract</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15112" class="LineNr">15112 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15113" class="LineNr">15113 </span> <span class="subxComment"># "3b/compare<-"</span> -<span id="L15114" class="LineNr">15114 </span> 0xc/imm32/size -<span id="L15115" class="LineNr">15115 </span> 0x33/3 0x62/b 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x3c/< 0x2d/dash -<span id="L15116" class="LineNr">15116 </span><span class="subxMinorFunction">_string_3d_compare_eax_with</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15113" class="LineNr">15113 </span> <span class="subxComment"># "2b/subtract"</span> +<span id="L15114" class="LineNr">15114 </span> 0xb/imm32/size +<span id="L15115" class="LineNr">15115 </span> 0x32/2 0x62/b 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t +<span id="L15116" class="LineNr">15116 </span><span class="subxMinorFunction">_string_2d_subtract_from_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15117" class="LineNr">15117 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15118" class="LineNr">15118 </span> <span class="subxComment"># "3d/compare-eax-with"</span> -<span id="L15119" class="LineNr">15119 </span> 0x13/imm32/size -<span id="L15120" class="LineNr">15120 </span> 0x33/3 0x64/d 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x2d/dash 0x65/e 0x61/a 0x78/x 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h -<span id="L15121" class="LineNr">15121 </span><span class="subxMinorFunction">_string_40_increment_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15118" class="LineNr">15118 </span> <span class="subxComment"># "2d/subtract-from-eax"</span> +<span id="L15119" class="LineNr">15119 </span> 0x14/imm32/size +<span id="L15120" class="LineNr">15120 </span> 0x32/2 0x64/d 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t 0x2d/dash 0x66/f 0x72/r 0x6f/o 0x6d/m 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15121" class="LineNr">15121 </span><span class="subxMinorFunction">_string_31_xor_with</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15122" class="LineNr">15122 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15123" class="LineNr">15123 </span> <span class="subxComment"># "40/increment-eax"</span> -<span id="L15124" class="LineNr">15124 </span> 0x10/imm32/size -<span id="L15125" class="LineNr">15125 </span> 0x34/4 0x30/0 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15126" class="LineNr">15126 </span><span class="subxMinorFunction">_string_41_increment_ecx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15123" class="LineNr">15123 </span> <span class="subxComment"># "31/xor-with"</span> +<span id="L15124" class="LineNr">15124 </span> 0xb/imm32/size +<span id="L15125" class="LineNr">15125 </span> 0x33/3 0x31/1 0x2f/slash 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L15126" class="LineNr">15126 </span><span class="subxMinorFunction">_string_33_xor</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15127" class="LineNr">15127 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15128" class="LineNr">15128 </span> <span class="subxComment"># "41/increment-ecx"</span> -<span id="L15129" class="LineNr">15129 </span> 0x10/imm32/size -<span id="L15130" class="LineNr">15130 </span> 0x34/4 0x31/1 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x63/c 0x78/x -<span id="L15131" class="LineNr">15131 </span><span class="subxMinorFunction">_string_42_increment_edx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15128" class="LineNr">15128 </span> <span class="subxComment"># "33/xor"</span> +<span id="L15129" class="LineNr">15129 </span> 0x6/imm32/size +<span id="L15130" class="LineNr">15130 </span> 0x33/3 0x33/3 0x2f/slash 0x78/x 0x6f/o 0x72/r +<span id="L15131" class="LineNr">15131 </span><span class="subxMinorFunction">_string_35_xor_with_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15132" class="LineNr">15132 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15133" class="LineNr">15133 </span> <span class="subxComment"># "42/increment-edx"</span> -<span id="L15134" class="LineNr">15134 </span> 0x10/imm32/size -<span id="L15135" class="LineNr">15135 </span> 0x34/4 0x32/2 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x78/x -<span id="L15136" class="LineNr">15136 </span><span class="subxMinorFunction">_string_43_increment_ebx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15133" class="LineNr">15133 </span> <span class="subxComment"># "35/xor-with-eax"</span> +<span id="L15134" class="LineNr">15134 </span> 0xf/imm32/size +<span id="L15135" class="LineNr">15135 </span> 0x33/3 0x35/5 0x2f/slash 0x78/x 0x6f/o 0x72/r 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15136" class="LineNr">15136 </span><span class="subxMinorFunction">_string_39_compare-></span>: <span class="subxComment"># (payload array byte)</span> <span id="L15137" class="LineNr">15137 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15138" class="LineNr">15138 </span> <span class="subxComment"># "43/increment-ebx"</span> -<span id="L15139" class="LineNr">15139 </span> 0x10/imm32/size -<span id="L15140" class="LineNr">15140 </span> 0x34/4 0x33/3 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x62/b 0x78/x -<span id="L15141" class="LineNr">15141 </span><span class="subxMinorFunction">_string_46_increment_esi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15138" class="LineNr">15138 </span> <span class="subxComment"># "39/compare->"</span> +<span id="L15139" class="LineNr">15139 </span> 0xc/imm32/size +<span id="L15140" class="LineNr">15140 </span> 0x33/3 0x39/9 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x2d/dash 0x3e/> +<span id="L15141" class="LineNr">15141 </span><span class="subxMinorFunction">_string_3b_compare<-</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15142" class="LineNr">15142 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15143" class="LineNr">15143 </span> <span class="subxComment"># "46/increment-esi"</span> -<span id="L15144" class="LineNr">15144 </span> 0x10/imm32/size -<span id="L15145" class="LineNr">15145 </span> 0x34/4 0x36/6 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x73/s 0x69/i -<span id="L15146" class="LineNr">15146 </span><span class="subxMinorFunction">_string_47_increment_edi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15143" class="LineNr">15143 </span> <span class="subxComment"># "3b/compare<-"</span> +<span id="L15144" class="LineNr">15144 </span> 0xc/imm32/size +<span id="L15145" class="LineNr">15145 </span> 0x33/3 0x62/b 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x3c/< 0x2d/dash +<span id="L15146" class="LineNr">15146 </span><span class="subxMinorFunction">_string_3d_compare_eax_with</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15147" class="LineNr">15147 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15148" class="LineNr">15148 </span> <span class="subxComment"># "47/increment-edi"</span> -<span id="L15149" class="LineNr">15149 </span> 0x10/imm32/size -<span id="L15150" class="LineNr">15150 </span> 0x34/4 0x37/7 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x69/i -<span id="L15151" class="LineNr">15151 </span><span class="subxMinorFunction">_string_48_decrement_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15148" class="LineNr">15148 </span> <span class="subxComment"># "3d/compare-eax-with"</span> +<span id="L15149" class="LineNr">15149 </span> 0x13/imm32/size +<span id="L15150" class="LineNr">15150 </span> 0x33/3 0x64/d 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e 0x2d/dash 0x65/e 0x61/a 0x78/x 0x2d/dash 0x77/w 0x69/i 0x74/t 0x68/h +<span id="L15151" class="LineNr">15151 </span><span class="subxMinorFunction">_string_40_increment_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15152" class="LineNr">15152 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15153" class="LineNr">15153 </span> <span class="subxComment"># "48/decrement-eax"</span> +<span id="L15153" class="LineNr">15153 </span> <span class="subxComment"># "40/increment-eax"</span> <span id="L15154" class="LineNr">15154 </span> 0x10/imm32/size -<span id="L15155" class="LineNr">15155 </span> 0x34/4 0x38/8 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15156" class="LineNr">15156 </span><span class="subxMinorFunction">_string_49_decrement_ecx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15155" class="LineNr">15155 </span> 0x34/4 0x30/0 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15156" class="LineNr">15156 </span><span class="subxMinorFunction">_string_41_increment_ecx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15157" class="LineNr">15157 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15158" class="LineNr">15158 </span> <span class="subxComment"># "49/decrement-ecx"</span> +<span id="L15158" class="LineNr">15158 </span> <span class="subxComment"># "41/increment-ecx"</span> <span id="L15159" class="LineNr">15159 </span> 0x10/imm32/size -<span id="L15160" class="LineNr">15160 </span> 0x34/4 0x39/9 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x63/c 0x78/x -<span id="L15161" class="LineNr">15161 </span><span class="subxMinorFunction">_string_4a_decrement_edx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15160" class="LineNr">15160 </span> 0x34/4 0x31/1 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x63/c 0x78/x +<span id="L15161" class="LineNr">15161 </span><span class="subxMinorFunction">_string_42_increment_edx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15162" class="LineNr">15162 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15163" class="LineNr">15163 </span> <span class="subxComment"># "4a/decrement-edx"</span> +<span id="L15163" class="LineNr">15163 </span> <span class="subxComment"># "42/increment-edx"</span> <span id="L15164" class="LineNr">15164 </span> 0x10/imm32/size -<span id="L15165" class="LineNr">15165 </span> 0x34/4 0x61/a 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x78/x -<span id="L15166" class="LineNr">15166 </span><span class="subxMinorFunction">_string_4b_decrement_ebx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15165" class="LineNr">15165 </span> 0x34/4 0x32/2 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x78/x +<span id="L15166" class="LineNr">15166 </span><span class="subxMinorFunction">_string_43_increment_ebx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15167" class="LineNr">15167 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15168" class="LineNr">15168 </span> <span class="subxComment"># "4b/decrement-ebx"</span> +<span id="L15168" class="LineNr">15168 </span> <span class="subxComment"># "43/increment-ebx"</span> <span id="L15169" class="LineNr">15169 </span> 0x10/imm32/size -<span id="L15170" class="LineNr">15170 </span> 0x34/4 0x62/b 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x62/b 0x78/x -<span id="L15171" class="LineNr">15171 </span><span class="subxMinorFunction">_string_4e_decrement_esi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15170" class="LineNr">15170 </span> 0x34/4 0x33/3 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x62/b 0x78/x +<span id="L15171" class="LineNr">15171 </span><span class="subxMinorFunction">_string_46_increment_esi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15172" class="LineNr">15172 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15173" class="LineNr">15173 </span> <span class="subxComment"># "4e/decrement-esi"</span> +<span id="L15173" class="LineNr">15173 </span> <span class="subxComment"># "46/increment-esi"</span> <span id="L15174" class="LineNr">15174 </span> 0x10/imm32/size -<span id="L15175" class="LineNr">15175 </span> 0x34/4 0x65/e 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x73/s 0x69/i -<span id="L15176" class="LineNr">15176 </span><span class="subxMinorFunction">_string_4f_decrement_edi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15175" class="LineNr">15175 </span> 0x34/4 0x36/6 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x73/s 0x69/i +<span id="L15176" class="LineNr">15176 </span><span class="subxMinorFunction">_string_47_increment_edi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15177" class="LineNr">15177 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15178" class="LineNr">15178 </span> <span class="subxComment"># "4f/decrement-edi"</span> +<span id="L15178" class="LineNr">15178 </span> <span class="subxComment"># "47/increment-edi"</span> <span id="L15179" class="LineNr">15179 </span> 0x10/imm32/size -<span id="L15180" class="LineNr">15180 </span> 0x34/4 0x66/f 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x69/i -<span id="L15181" class="LineNr">15181 </span><span class="subxMinorFunction">_string_81_subop_add</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15180" class="LineNr">15180 </span> 0x34/4 0x37/7 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x69/i +<span id="L15181" class="LineNr">15181 </span><span class="subxMinorFunction">_string_48_decrement_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15182" class="LineNr">15182 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15183" class="LineNr">15183 </span> <span class="subxComment"># "81 0/subop/add"</span> -<span id="L15184" class="LineNr">15184 </span> 0xe/imm32/size -<span id="L15185" class="LineNr">15185 </span> 0x38/8 0x31/1 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x61/a 0x64/d 0x64/d -<span id="L15186" class="LineNr">15186 </span><span class="subxMinorFunction">_string_81_subop_or</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15183" class="LineNr">15183 </span> <span class="subxComment"># "48/decrement-eax"</span> +<span id="L15184" class="LineNr">15184 </span> 0x10/imm32/size +<span id="L15185" class="LineNr">15185 </span> 0x34/4 0x38/8 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15186" class="LineNr">15186 </span><span class="subxMinorFunction">_string_49_decrement_ecx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15187" class="LineNr">15187 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15188" class="LineNr">15188 </span> <span class="subxComment"># "81 1/subop/or"</span> -<span id="L15189" class="LineNr">15189 </span> 0xd/imm32/size -<span id="L15190" class="LineNr">15190 </span> 0x38/8 0x31/1 0x20/space 0x31/1 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x6f/o 0x72/r -<span id="L15191" class="LineNr">15191 </span><span class="subxMinorFunction">_string_81_subop_and</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15188" class="LineNr">15188 </span> <span class="subxComment"># "49/decrement-ecx"</span> +<span id="L15189" class="LineNr">15189 </span> 0x10/imm32/size +<span id="L15190" class="LineNr">15190 </span> 0x34/4 0x39/9 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x63/c 0x78/x +<span id="L15191" class="LineNr">15191 </span><span class="subxMinorFunction">_string_4a_decrement_edx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15192" class="LineNr">15192 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15193" class="LineNr">15193 </span> <span class="subxComment"># "81 4/subop/and"</span> -<span id="L15194" class="LineNr">15194 </span> 0xe/imm32/size -<span id="L15195" class="LineNr">15195 </span> 0x38/8 0x31/1 0x20/space 0x34/4 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x61/a 0x6e/n 0x64/d -<span id="L15196" class="LineNr">15196 </span><span class="subxMinorFunction">_string_81_subop_subtract</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15193" class="LineNr">15193 </span> <span class="subxComment"># "4a/decrement-edx"</span> +<span id="L15194" class="LineNr">15194 </span> 0x10/imm32/size +<span id="L15195" class="LineNr">15195 </span> 0x34/4 0x61/a 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x78/x +<span id="L15196" class="LineNr">15196 </span><span class="subxMinorFunction">_string_4b_decrement_ebx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15197" class="LineNr">15197 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15198" class="LineNr">15198 </span> <span class="subxComment"># "81 5/subop/subtract"</span> -<span id="L15199" class="LineNr">15199 </span> 0x13/imm32/size -<span id="L15200" class="LineNr">15200 </span> 0x38/8 0x31/1 0x20/space 0x35/5 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t -<span id="L15201" class="LineNr">15201 </span><span class="subxMinorFunction">_string_81_subop_xor</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15198" class="LineNr">15198 </span> <span class="subxComment"># "4b/decrement-ebx"</span> +<span id="L15199" class="LineNr">15199 </span> 0x10/imm32/size +<span id="L15200" class="LineNr">15200 </span> 0x34/4 0x62/b 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x62/b 0x78/x +<span id="L15201" class="LineNr">15201 </span><span class="subxMinorFunction">_string_4e_decrement_esi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15202" class="LineNr">15202 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15203" class="LineNr">15203 </span> <span class="subxComment"># "81 6/subop/xor"</span> -<span id="L15204" class="LineNr">15204 </span> 0xe/imm32/size -<span id="L15205" class="LineNr">15205 </span> 0x38/8 0x31/1 0x20/space 0x36/6 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x78/x 0x6f/o 0x72/r -<span id="L15206" class="LineNr">15206 </span><span class="subxMinorFunction">_string_81_subop_compare</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15203" class="LineNr">15203 </span> <span class="subxComment"># "4e/decrement-esi"</span> +<span id="L15204" class="LineNr">15204 </span> 0x10/imm32/size +<span id="L15205" class="LineNr">15205 </span> 0x34/4 0x65/e 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x73/s 0x69/i +<span id="L15206" class="LineNr">15206 </span><span class="subxMinorFunction">_string_4f_decrement_edi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15207" class="LineNr">15207 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15208" class="LineNr">15208 </span> <span class="subxComment"># "81 7/subop/compare"</span> -<span id="L15209" class="LineNr">15209 </span> 0x12/imm32/size -<span id="L15210" class="LineNr">15210 </span> 0x38/8 0x31/1 0x20/space 0x37/7 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e -<span id="L15211" class="LineNr">15211 </span><span class="subxMinorFunction">_string_89_<-</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15208" class="LineNr">15208 </span> <span class="subxComment"># "4f/decrement-edi"</span> +<span id="L15209" class="LineNr">15209 </span> 0x10/imm32/size +<span id="L15210" class="LineNr">15210 </span> 0x34/4 0x66/f 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t 0x2d/dash 0x65/e 0x64/d 0x69/i +<span id="L15211" class="LineNr">15211 </span><span class="subxMinorFunction">_string_81_subop_add</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15212" class="LineNr">15212 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15213" class="LineNr">15213 </span> <span class="subxComment"># "89/<-"</span> -<span id="L15214" class="LineNr">15214 </span> 0x5/imm32/size -<span id="L15215" class="LineNr">15215 </span> 0x38/8 0x39/9 0x2f/slash 0x3c/< 0x2d/dash -<span id="L15216" class="LineNr">15216 </span><span class="subxMinorFunction">_string_8b_-></span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15213" class="LineNr">15213 </span> <span class="subxComment"># "81 0/subop/add"</span> +<span id="L15214" class="LineNr">15214 </span> 0xe/imm32/size +<span id="L15215" class="LineNr">15215 </span> 0x38/8 0x31/1 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x61/a 0x64/d 0x64/d +<span id="L15216" class="LineNr">15216 </span><span class="subxMinorFunction">_string_81_subop_or</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15217" class="LineNr">15217 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15218" class="LineNr">15218 </span> <span class="subxComment"># "8b/->"</span> -<span id="L15219" class="LineNr">15219 </span> 0x5/imm32/size -<span id="L15220" class="LineNr">15220 </span> 0x38/8 0x62/b 0x2f/slash 0x2d/dash 0x3e/> -<span id="L15221" class="LineNr">15221 </span><span class="subxMinorFunction">_string_8a_copy_byte</span>: +<span id="L15218" class="LineNr">15218 </span> <span class="subxComment"># "81 1/subop/or"</span> +<span id="L15219" class="LineNr">15219 </span> 0xd/imm32/size +<span id="L15220" class="LineNr">15220 </span> 0x38/8 0x31/1 0x20/space 0x31/1 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x6f/o 0x72/r +<span id="L15221" class="LineNr">15221 </span><span class="subxMinorFunction">_string_81_subop_and</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15222" class="LineNr">15222 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15223" class="LineNr">15223 </span> <span class="subxComment"># "8a/byte->"</span> -<span id="L15224" class="LineNr">15224 </span> 0x9/imm32/size -<span id="L15225" class="LineNr">15225 </span> 0x38/8 0x61/a 0x2f// 0x62/b 0x79/y 0x74/t 0x65/e 0x2d/- 0x3e/> -<span id="L15226" class="LineNr">15226 </span><span class="subxMinorFunction">_string_88_copy_byte</span>: +<span id="L15223" class="LineNr">15223 </span> <span class="subxComment"># "81 4/subop/and"</span> +<span id="L15224" class="LineNr">15224 </span> 0xe/imm32/size +<span id="L15225" class="LineNr">15225 </span> 0x38/8 0x31/1 0x20/space 0x34/4 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x61/a 0x6e/n 0x64/d +<span id="L15226" class="LineNr">15226 </span><span class="subxMinorFunction">_string_81_subop_subtract</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15227" class="LineNr">15227 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15228" class="LineNr">15228 </span> <span class="subxComment"># "88/byte<-"</span> -<span id="L15229" class="LineNr">15229 </span> 0x9/imm32/size -<span id="L15230" class="LineNr">15230 </span> 0x38/8 0x38/8 0x2f// 0x62/b 0x79/y 0x74/t 0x65/e 0x3c/< 0x2d/- -<span id="L15231" class="LineNr">15231 </span><span class="subxMinorFunction">_string_8d_copy_address</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15228" class="LineNr">15228 </span> <span class="subxComment"># "81 5/subop/subtract"</span> +<span id="L15229" class="LineNr">15229 </span> 0x13/imm32/size +<span id="L15230" class="LineNr">15230 </span> 0x38/8 0x31/1 0x20/space 0x35/5 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x73/s 0x75/u 0x62/b 0x74/t 0x72/r 0x61/a 0x63/c 0x74/t +<span id="L15231" class="LineNr">15231 </span><span class="subxMinorFunction">_string_81_subop_xor</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15232" class="LineNr">15232 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15233" class="LineNr">15233 </span> <span class="subxComment"># "8d/copy-address"</span> -<span id="L15234" class="LineNr">15234 </span> 0xf/imm32/size -<span id="L15235" class="LineNr">15235 </span> 0x38/8 0x64/d 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x65/e 0x73/s 0x73/s -<span id="L15236" class="LineNr">15236 </span><span class="subxMinorFunction">_string_b8_copy_to_eax</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15233" class="LineNr">15233 </span> <span class="subxComment"># "81 6/subop/xor"</span> +<span id="L15234" class="LineNr">15234 </span> 0xe/imm32/size +<span id="L15235" class="LineNr">15235 </span> 0x38/8 0x31/1 0x20/space 0x36/6 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x78/x 0x6f/o 0x72/r +<span id="L15236" class="LineNr">15236 </span><span class="subxMinorFunction">_string_81_subop_compare</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15237" class="LineNr">15237 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15238" class="LineNr">15238 </span> <span class="subxComment"># "b8/copy-to-eax"</span> -<span id="L15239" class="LineNr">15239 </span> 0xe/imm32/size -<span id="L15240" class="LineNr">15240 </span> 0x62/b 0x38/8 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x61/a 0x78/x -<span id="L15241" class="LineNr">15241 </span><span class="subxMinorFunction">_string_b9_copy_to_ecx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15238" class="LineNr">15238 </span> <span class="subxComment"># "81 7/subop/compare"</span> +<span id="L15239" class="LineNr">15239 </span> 0x12/imm32/size +<span id="L15240" class="LineNr">15240 </span> 0x38/8 0x31/1 0x20/space 0x37/7 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x63/c 0x6f/o 0x6d/m 0x70/p 0x61/a 0x72/r 0x65/e +<span id="L15241" class="LineNr">15241 </span><span class="subxMinorFunction">_string_89_<-</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15242" class="LineNr">15242 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15243" class="LineNr">15243 </span> <span class="subxComment"># "b9/copy-to-ecx"</span> -<span id="L15244" class="LineNr">15244 </span> 0xe/imm32/size -<span id="L15245" class="LineNr">15245 </span> 0x62/b 0x39/9 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x63/c 0x78/x -<span id="L15246" class="LineNr">15246 </span><span class="subxMinorFunction">_string_ba_copy_to_edx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15243" class="LineNr">15243 </span> <span class="subxComment"># "89/<-"</span> +<span id="L15244" class="LineNr">15244 </span> 0x5/imm32/size +<span id="L15245" class="LineNr">15245 </span> 0x38/8 0x39/9 0x2f/slash 0x3c/< 0x2d/dash +<span id="L15246" class="LineNr">15246 </span><span class="subxMinorFunction">_string_8b_-></span>: <span class="subxComment"># (payload array byte)</span> <span id="L15247" class="LineNr">15247 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15248" class="LineNr">15248 </span> <span class="subxComment"># "ba/copy-to-edx"</span> -<span id="L15249" class="LineNr">15249 </span> 0xe/imm32/size -<span id="L15250" class="LineNr">15250 </span> 0x62/b 0x61/a 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x64/d 0x78/x -<span id="L15251" class="LineNr">15251 </span><span class="subxMinorFunction">_string_bb_copy_to_ebx</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15248" class="LineNr">15248 </span> <span class="subxComment"># "8b/->"</span> +<span id="L15249" class="LineNr">15249 </span> 0x5/imm32/size +<span id="L15250" class="LineNr">15250 </span> 0x38/8 0x62/b 0x2f/slash 0x2d/dash 0x3e/> +<span id="L15251" class="LineNr">15251 </span><span class="subxMinorFunction">_string_8a_copy_byte</span>: <span id="L15252" class="LineNr">15252 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15253" class="LineNr">15253 </span> <span class="subxComment"># "bb/copy-to-ebx"</span> -<span id="L15254" class="LineNr">15254 </span> 0xe/imm32/size -<span id="L15255" class="LineNr">15255 </span> 0x62/b 0x62/b 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x62/b 0x78/x -<span id="L15256" class="LineNr">15256 </span><span class="subxMinorFunction">_string_be_copy_to_esi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15253" class="LineNr">15253 </span> <span class="subxComment"># "8a/byte->"</span> +<span id="L15254" class="LineNr">15254 </span> 0x9/imm32/size +<span id="L15255" class="LineNr">15255 </span> 0x38/8 0x61/a 0x2f// 0x62/b 0x79/y 0x74/t 0x65/e 0x2d/- 0x3e/> +<span id="L15256" class="LineNr">15256 </span><span class="subxMinorFunction">_string_88_copy_byte</span>: <span id="L15257" class="LineNr">15257 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15258" class="LineNr">15258 </span> <span class="subxComment"># "be/copy-to-esi"</span> -<span id="L15259" class="LineNr">15259 </span> 0xe/imm32/size -<span id="L15260" class="LineNr">15260 </span> 0x62/b 0x65/e 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x73/s 0x69/i -<span id="L15261" class="LineNr">15261 </span><span class="subxMinorFunction">_string_bf_copy_to_edi</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15258" class="LineNr">15258 </span> <span class="subxComment"># "88/byte<-"</span> +<span id="L15259" class="LineNr">15259 </span> 0x9/imm32/size +<span id="L15260" class="LineNr">15260 </span> 0x38/8 0x38/8 0x2f// 0x62/b 0x79/y 0x74/t 0x65/e 0x3c/< 0x2d/- +<span id="L15261" class="LineNr">15261 </span><span class="subxMinorFunction">_string_8d_copy_address</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15262" class="LineNr">15262 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15263" class="LineNr">15263 </span> <span class="subxComment"># "bf/copy-to-edi"</span> -<span id="L15264" class="LineNr">15264 </span> 0xe/imm32/size -<span id="L15265" class="LineNr">15265 </span> 0x62/b 0x66/f 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x64/d 0x69/i -<span id="L15266" class="LineNr">15266 </span><span class="subxMinorFunction">_string_c7_subop_copy</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15263" class="LineNr">15263 </span> <span class="subxComment"># "8d/copy-address"</span> +<span id="L15264" class="LineNr">15264 </span> 0xf/imm32/size +<span id="L15265" class="LineNr">15265 </span> 0x38/8 0x64/d 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x61/a 0x64/d 0x64/d 0x72/r 0x65/e 0x73/s 0x73/s +<span id="L15266" class="LineNr">15266 </span><span class="subxMinorFunction">_string_b8_copy_to_eax</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15267" class="LineNr">15267 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15268" class="LineNr">15268 </span> <span class="subxComment"># "c7 0/subop/copy"</span> -<span id="L15269" class="LineNr">15269 </span> 0xf/imm32/size -<span id="L15270" class="LineNr">15270 </span> 0x63/c 0x37/7 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y -<span id="L15271" class="LineNr">15271 </span><span class="subxMinorFunction">_string_e9_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15268" class="LineNr">15268 </span> <span class="subxComment"># "b8/copy-to-eax"</span> +<span id="L15269" class="LineNr">15269 </span> 0xe/imm32/size +<span id="L15270" class="LineNr">15270 </span> 0x62/b 0x38/8 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x61/a 0x78/x +<span id="L15271" class="LineNr">15271 </span><span class="subxMinorFunction">_string_b9_copy_to_ecx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15272" class="LineNr">15272 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15273" class="LineNr">15273 </span> <span class="subxComment"># "e9/jump"</span> -<span id="L15274" class="LineNr">15274 </span> 0x7/imm32/size -<span id="L15275" class="LineNr">15275 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p -<span id="L15276" class="LineNr">15276 </span><span class="subxMinorFunction">_string_e9_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15273" class="LineNr">15273 </span> <span class="subxComment"># "b9/copy-to-ecx"</span> +<span id="L15274" class="LineNr">15274 </span> 0xe/imm32/size +<span id="L15275" class="LineNr">15275 </span> 0x62/b 0x39/9 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x63/c 0x78/x +<span id="L15276" class="LineNr">15276 </span><span class="subxMinorFunction">_string_ba_copy_to_edx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15277" class="LineNr">15277 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15278" class="LineNr">15278 </span> <span class="subxComment"># "e9/jump break/disp32"</span> -<span id="L15279" class="LineNr">15279 </span> 0x14/imm32/size -<span id="L15280" class="LineNr">15280 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15281" class="LineNr">15281 </span><span class="subxMinorFunction">_string_e9_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15278" class="LineNr">15278 </span> <span class="subxComment"># "ba/copy-to-edx"</span> +<span id="L15279" class="LineNr">15279 </span> 0xe/imm32/size +<span id="L15280" class="LineNr">15280 </span> 0x62/b 0x61/a 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x64/d 0x78/x +<span id="L15281" class="LineNr">15281 </span><span class="subxMinorFunction">_string_bb_copy_to_ebx</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15282" class="LineNr">15282 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15283" class="LineNr">15283 </span> <span class="subxComment"># "e9/jump loop/disp32"</span> -<span id="L15284" class="LineNr">15284 </span> 0x13/imm32/size -<span id="L15285" class="LineNr">15285 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 -<span id="L15286" class="LineNr">15286 </span><span class="subxMinorFunction">_string_ff_subop_increment</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15283" class="LineNr">15283 </span> <span class="subxComment"># "bb/copy-to-ebx"</span> +<span id="L15284" class="LineNr">15284 </span> 0xe/imm32/size +<span id="L15285" class="LineNr">15285 </span> 0x62/b 0x62/b 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x62/b 0x78/x +<span id="L15286" class="LineNr">15286 </span><span class="subxMinorFunction">_string_be_copy_to_esi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15287" class="LineNr">15287 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15288" class="LineNr">15288 </span> <span class="subxComment"># "ff 0/subop/increment"</span> -<span id="L15289" class="LineNr">15289 </span> 0x14/imm32/size -<span id="L15290" class="LineNr">15290 </span> 0x66/f 0x66/f 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t -<span id="L15291" class="LineNr">15291 </span><span class="subxMinorFunction">_string_ff_subop_decrement</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15288" class="LineNr">15288 </span> <span class="subxComment"># "be/copy-to-esi"</span> +<span id="L15289" class="LineNr">15289 </span> 0xe/imm32/size +<span id="L15290" class="LineNr">15290 </span> 0x62/b 0x65/e 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x73/s 0x69/i +<span id="L15291" class="LineNr">15291 </span><span class="subxMinorFunction">_string_bf_copy_to_edi</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15292" class="LineNr">15292 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15293" class="LineNr">15293 </span> <span class="subxComment"># "ff 1/subop/decrement"</span> -<span id="L15294" class="LineNr">15294 </span> 0x14/imm32/size -<span id="L15295" class="LineNr">15295 </span> 0x66/f 0x66/f 0x31/1 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t -<span id="L15296" class="LineNr">15296 </span> -<span id="L15297" class="LineNr">15297 </span><span class="SpecialChar">Single-int-var-in-mem</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15298" class="LineNr">15298 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15299" class="LineNr">15299 </span> 0x11/imm32/alloc-id:fake -<span id="L15300" class="LineNr">15300 </span> <span class="SpecialChar"><a href='mu.subx.html#L15304'>Int-var-in-mem</a></span>/imm32 -<span id="L15301" class="LineNr">15301 </span> 0/imm32/next -<span id="L15302" class="LineNr">15302 </span> 0/imm32/next -<span id="L15303" class="LineNr">15303 </span> -<span id="L15304" class="LineNr">15304 </span><span class="SpecialChar">Int-var-in-mem</span>: <span class="subxComment"># (payload var)</span> -<span id="L15305" class="LineNr">15305 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15306" class="LineNr">15306 </span> 0/imm32/name -<span id="L15307" class="LineNr">15307 </span> 0/imm32/name -<span id="L15308" class="LineNr">15308 </span> 0x11/imm32/alloc-id:fake -<span id="L15309" class="LineNr">15309 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15310" class="LineNr">15310 </span> 1/imm32/some-block-depth -<span id="L15311" class="LineNr">15311 </span> 1/imm32/some-stack-offset -<span id="L15312" class="LineNr">15312 </span> 0/imm32/no-register -<span id="L15313" class="LineNr">15313 </span> 0/imm32/no-register -<span id="L15314" class="LineNr">15314 </span> -<span id="L15315" class="LineNr">15315 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> -<span id="L15316" class="LineNr">15316 </span><span class="SpecialChar">Single-byte-var-in-mem</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15293" class="LineNr">15293 </span> <span class="subxComment"># "bf/copy-to-edi"</span> +<span id="L15294" class="LineNr">15294 </span> 0xe/imm32/size +<span id="L15295" class="LineNr">15295 </span> 0x62/b 0x66/f 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y 0x2d/dash 0x74/t 0x6f/o 0x2d/dash 0x65/e 0x64/d 0x69/i +<span id="L15296" class="LineNr">15296 </span><span class="subxMinorFunction">_string_c7_subop_copy</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15297" class="LineNr">15297 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15298" class="LineNr">15298 </span> <span class="subxComment"># "c7 0/subop/copy"</span> +<span id="L15299" class="LineNr">15299 </span> 0xf/imm32/size +<span id="L15300" class="LineNr">15300 </span> 0x63/c 0x37/7 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x63/c 0x6f/o 0x70/p 0x79/y +<span id="L15301" class="LineNr">15301 </span><span class="subxMinorFunction">_string_e9_jump_label</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15302" class="LineNr">15302 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15303" class="LineNr">15303 </span> <span class="subxComment"># "e9/jump"</span> +<span id="L15304" class="LineNr">15304 </span> 0x7/imm32/size +<span id="L15305" class="LineNr">15305 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p +<span id="L15306" class="LineNr">15306 </span><span class="subxMinorFunction">_string_e9_jump_break</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15307" class="LineNr">15307 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15308" class="LineNr">15308 </span> <span class="subxComment"># "e9/jump break/disp32"</span> +<span id="L15309" class="LineNr">15309 </span> 0x14/imm32/size +<span id="L15310" class="LineNr">15310 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x20/space 0x62/b 0x72/r 0x65/e 0x61/a 0x6b/k 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15311" class="LineNr">15311 </span><span class="subxMinorFunction">_string_e9_jump_loop</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15312" class="LineNr">15312 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15313" class="LineNr">15313 </span> <span class="subxComment"># "e9/jump loop/disp32"</span> +<span id="L15314" class="LineNr">15314 </span> 0x13/imm32/size +<span id="L15315" class="LineNr">15315 </span> 0x65/e 0x39/9 0x2f/slash 0x6a/j 0x75/u 0x6d/m 0x70/p 0x20/space 0x6c/l 0x6f/o 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x69/i 0x73/s 0x70/p 0x33/3 0x32/2 +<span id="L15316" class="LineNr">15316 </span><span class="subxMinorFunction">_string_ff_subop_increment</span>: <span class="subxComment"># (payload array byte)</span> <span id="L15317" class="LineNr">15317 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15318" class="LineNr">15318 </span> 0x11/imm32/alloc-id:fake -<span id="L15319" class="LineNr">15319 </span> <span class="SpecialChar"><a href='mu.subx.html#L15324'>Byte-var-in-mem</a></span>/imm32 -<span id="L15320" class="LineNr">15320 </span> 0/imm32/next -<span id="L15321" class="LineNr">15321 </span> 0/imm32/next -<span id="L15322" class="LineNr">15322 </span> -<span id="L15323" class="LineNr">15323 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> -<span id="L15324" class="LineNr">15324 </span><span class="SpecialChar">Byte-var-in-mem</span>: <span class="subxComment"># (payload var)</span> -<span id="L15325" class="LineNr">15325 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15326" class="LineNr">15326 </span> 0/imm32/name -<span id="L15327" class="LineNr">15327 </span> 0/imm32/name -<span id="L15328" class="LineNr">15328 </span> 0x11/imm32/alloc-id:fake -<span id="L15329" class="LineNr">15329 </span> <span class="SpecialChar"><a href='mu.subx.html#L15595'>Type-byte</a></span>/imm32 -<span id="L15330" class="LineNr">15330 </span> 1/imm32/some-block-depth -<span id="L15331" class="LineNr">15331 </span> 1/imm32/some-stack-offset -<span id="L15332" class="LineNr">15332 </span> 0/imm32/no-register -<span id="L15333" class="LineNr">15333 </span> 0/imm32/no-register -<span id="L15334" class="LineNr">15334 </span> -<span id="L15335" class="LineNr">15335 </span><span class="SpecialChar">Two-args-int-stack-int-reg</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15336" class="LineNr">15336 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15337" class="LineNr">15337 </span> 0x11/imm32/alloc-id:fake -<span id="L15338" class="LineNr">15338 </span> <span class="SpecialChar"><a href='mu.subx.html#L15304'>Int-var-in-mem</a></span>/imm32 -<span id="L15339" class="LineNr">15339 </span> 0x11/imm32/alloc-id:fake -<span id="L15340" class="LineNr">15340 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/next -<span id="L15341" class="LineNr">15341 </span> -<span id="L15342" class="LineNr">15342 </span><span class="SpecialChar">Two-int-args-in-regs</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15343" class="LineNr">15343 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15344" class="LineNr">15344 </span> 0x11/imm32/alloc-id:fake -<span id="L15345" class="LineNr">15345 </span> <span class="SpecialChar"><a href='mu.subx.html#L15406'>Int-var-in-some-register</a></span>/imm32 -<span id="L15346" class="LineNr">15346 </span> 0x11/imm32/alloc-id:fake -<span id="L15347" class="LineNr">15347 </span> <span class="SpecialChar"><a href='mu.subx.html#L15385'>Single-int-var-in-some-register</a></span>/imm32/next -<span id="L15348" class="LineNr">15348 </span> -<span id="L15349" class="LineNr">15349 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> -<span id="L15350" class="LineNr">15350 </span><span class="SpecialChar">Two-args-byte-stack-byte-reg</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15351" class="LineNr">15351 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15352" class="LineNr">15352 </span> 0x11/imm32/alloc-id:fake -<span id="L15353" class="LineNr">15353 </span> <span class="SpecialChar"><a href='mu.subx.html#L15324'>Byte-var-in-mem</a></span>/imm32 -<span id="L15354" class="LineNr">15354 </span> 0x11/imm32/alloc-id:fake -<span id="L15355" class="LineNr">15355 </span> <span class="SpecialChar"><a href='mu.subx.html#L15399'>Single-byte-var-in-some-register</a></span>/imm32/next -<span id="L15356" class="LineNr">15356 </span> -<span id="L15357" class="LineNr">15357 </span><span class="SpecialChar">Two-args-int-reg-int-stack</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15358" class="LineNr">15358 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15359" class="LineNr">15359 </span> 0x11/imm32/alloc-id:fake -<span id="L15360" class="LineNr">15360 </span> <span class="SpecialChar"><a href='mu.subx.html#L15406'>Int-var-in-some-register</a></span>/imm32 -<span id="L15361" class="LineNr">15361 </span> 0x11/imm32/alloc-id:fake -<span id="L15362" class="LineNr">15362 </span> <span class="SpecialChar"><a href='mu.subx.html#L15297'>Single-int-var-in-mem</a></span>/imm32/next -<span id="L15363" class="LineNr">15363 </span> -<span id="L15364" class="LineNr">15364 </span><span class="SpecialChar">Two-args-int-eax-int-literal</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15365" class="LineNr">15365 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15366" class="LineNr">15366 </span> 0x11/imm32/alloc-id:fake -<span id="L15367" class="LineNr">15367 </span> <span class="SpecialChar"><a href='mu.subx.html#L15452'>Int-var-in-eax</a></span>/imm32 -<span id="L15368" class="LineNr">15368 </span> 0x11/imm32/alloc-id:fake -<span id="L15369" class="LineNr">15369 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/next -<span id="L15370" class="LineNr">15370 </span> -<span id="L15371" class="LineNr">15371 </span><span class="SpecialChar">Int-var-and-literal</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15372" class="LineNr">15372 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15373" class="LineNr">15373 </span> 0x11/imm32/alloc-id:fake -<span id="L15374" class="LineNr">15374 </span> <span class="SpecialChar"><a href='mu.subx.html#L15304'>Int-var-in-mem</a></span>/imm32 -<span id="L15375" class="LineNr">15375 </span> 0x11/imm32/alloc-id:fake -<span id="L15376" class="LineNr">15376 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/next -<span id="L15377" class="LineNr">15377 </span> -<span id="L15378" class="LineNr">15378 </span><span class="SpecialChar">Int-var-in-register-and-literal</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15379" class="LineNr">15379 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15380" class="LineNr">15380 </span> 0x11/imm32/alloc-id:fake -<span id="L15381" class="LineNr">15381 </span> <span class="SpecialChar"><a href='mu.subx.html#L15406'>Int-var-in-some-register</a></span>/imm32 +<span id="L15318" class="LineNr">15318 </span> <span class="subxComment"># "ff 0/subop/increment"</span> +<span id="L15319" class="LineNr">15319 </span> 0x14/imm32/size +<span id="L15320" class="LineNr">15320 </span> 0x66/f 0x66/f 0x20/space 0x30/0 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x69/i 0x6e/n 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t +<span id="L15321" class="LineNr">15321 </span><span class="subxMinorFunction">_string_ff_subop_decrement</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15322" class="LineNr">15322 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15323" class="LineNr">15323 </span> <span class="subxComment"># "ff 1/subop/decrement"</span> +<span id="L15324" class="LineNr">15324 </span> 0x14/imm32/size +<span id="L15325" class="LineNr">15325 </span> 0x66/f 0x66/f 0x31/1 0x2f/slash 0x73/s 0x75/u 0x62/b 0x6f/o 0x70/p 0x2f/slash 0x64/d 0x65/e 0x63/c 0x72/r 0x65/e 0x6d/m 0x65/e 0x6e/n 0x74/t +<span id="L15326" class="LineNr">15326 </span> +<span id="L15327" class="LineNr">15327 </span><span class="SpecialChar">Single-int-var-in-mem</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15328" class="LineNr">15328 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15329" class="LineNr">15329 </span> 0x11/imm32/alloc-id:fake +<span id="L15330" class="LineNr">15330 </span> <span class="SpecialChar"><a href='mu.subx.html#L15334'>Int-var-in-mem</a></span>/imm32 +<span id="L15331" class="LineNr">15331 </span> 0/imm32/next +<span id="L15332" class="LineNr">15332 </span> 0/imm32/next +<span id="L15333" class="LineNr">15333 </span> +<span id="L15334" class="LineNr">15334 </span><span class="SpecialChar">Int-var-in-mem</span>: <span class="subxComment"># (payload var)</span> +<span id="L15335" class="LineNr">15335 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15336" class="LineNr">15336 </span> 0/imm32/name +<span id="L15337" class="LineNr">15337 </span> 0/imm32/name +<span id="L15338" class="LineNr">15338 </span> 0x11/imm32/alloc-id:fake +<span id="L15339" class="LineNr">15339 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15340" class="LineNr">15340 </span> 1/imm32/some-block-depth +<span id="L15341" class="LineNr">15341 </span> 1/imm32/some-stack-offset +<span id="L15342" class="LineNr">15342 </span> 0/imm32/no-register +<span id="L15343" class="LineNr">15343 </span> 0/imm32/no-register +<span id="L15344" class="LineNr">15344 </span> +<span id="L15345" class="LineNr">15345 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> +<span id="L15346" class="LineNr">15346 </span><span class="SpecialChar">Single-byte-var-in-mem</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15347" class="LineNr">15347 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15348" class="LineNr">15348 </span> 0x11/imm32/alloc-id:fake +<span id="L15349" class="LineNr">15349 </span> <span class="SpecialChar"><a href='mu.subx.html#L15354'>Byte-var-in-mem</a></span>/imm32 +<span id="L15350" class="LineNr">15350 </span> 0/imm32/next +<span id="L15351" class="LineNr">15351 </span> 0/imm32/next +<span id="L15352" class="LineNr">15352 </span> +<span id="L15353" class="LineNr">15353 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> +<span id="L15354" class="LineNr">15354 </span><span class="SpecialChar">Byte-var-in-mem</span>: <span class="subxComment"># (payload var)</span> +<span id="L15355" class="LineNr">15355 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15356" class="LineNr">15356 </span> 0/imm32/name +<span id="L15357" class="LineNr">15357 </span> 0/imm32/name +<span id="L15358" class="LineNr">15358 </span> 0x11/imm32/alloc-id:fake +<span id="L15359" class="LineNr">15359 </span> <span class="SpecialChar"><a href='mu.subx.html#L15625'>Type-byte</a></span>/imm32 +<span id="L15360" class="LineNr">15360 </span> 1/imm32/some-block-depth +<span id="L15361" class="LineNr">15361 </span> 1/imm32/some-stack-offset +<span id="L15362" class="LineNr">15362 </span> 0/imm32/no-register +<span id="L15363" class="LineNr">15363 </span> 0/imm32/no-register +<span id="L15364" class="LineNr">15364 </span> +<span id="L15365" class="LineNr">15365 </span><span class="SpecialChar">Two-args-int-stack-int-reg</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15366" class="LineNr">15366 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15367" class="LineNr">15367 </span> 0x11/imm32/alloc-id:fake +<span id="L15368" class="LineNr">15368 </span> <span class="SpecialChar"><a href='mu.subx.html#L15334'>Int-var-in-mem</a></span>/imm32 +<span id="L15369" class="LineNr">15369 </span> 0x11/imm32/alloc-id:fake +<span id="L15370" class="LineNr">15370 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/next +<span id="L15371" class="LineNr">15371 </span> +<span id="L15372" class="LineNr">15372 </span><span class="SpecialChar">Two-int-args-in-regs</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15373" class="LineNr">15373 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15374" class="LineNr">15374 </span> 0x11/imm32/alloc-id:fake +<span id="L15375" class="LineNr">15375 </span> <span class="SpecialChar"><a href='mu.subx.html#L15436'>Int-var-in-some-register</a></span>/imm32 +<span id="L15376" class="LineNr">15376 </span> 0x11/imm32/alloc-id:fake +<span id="L15377" class="LineNr">15377 </span> <span class="SpecialChar"><a href='mu.subx.html#L15415'>Single-int-var-in-some-register</a></span>/imm32/next +<span id="L15378" class="LineNr">15378 </span> +<span id="L15379" class="LineNr">15379 </span><span class="subxComment"># Not really legal, but closest we can currently represent a dereference of an (addr byte)</span> +<span id="L15380" class="LineNr">15380 </span><span class="SpecialChar">Two-args-byte-stack-byte-reg</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15381" class="LineNr">15381 </span> 0x11/imm32/alloc-id:fake:payload <span id="L15382" class="LineNr">15382 </span> 0x11/imm32/alloc-id:fake -<span id="L15383" class="LineNr">15383 </span> <span class="SpecialChar"><a href='mu.subx.html#L15553'>Single-lit-var</a></span>/imm32/next -<span id="L15384" class="LineNr">15384 </span> -<span id="L15385" class="LineNr">15385 </span><span class="SpecialChar">Single-int-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15386" class="LineNr">15386 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15387" class="LineNr">15387 </span> 0x11/imm32/alloc-id:fake -<span id="L15388" class="LineNr">15388 </span> <span class="SpecialChar"><a href='mu.subx.html#L15406'>Int-var-in-some-register</a></span>/imm32 -<span id="L15389" class="LineNr">15389 </span> 0/imm32/next -<span id="L15390" class="LineNr">15390 </span> 0/imm32/next -<span id="L15391" class="LineNr">15391 </span> -<span id="L15392" class="LineNr">15392 </span><span class="SpecialChar">Single-addr-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15393" class="LineNr">15393 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15394" class="LineNr">15394 </span> 0x11/imm32/alloc-id:fake -<span id="L15395" class="LineNr">15395 </span> <span class="SpecialChar"><a href='mu.subx.html#L15423'>Addr-var-in-some-register</a></span>/imm32 -<span id="L15396" class="LineNr">15396 </span> 0/imm32/next -<span id="L15397" class="LineNr">15397 </span> 0/imm32/next -<span id="L15398" class="LineNr">15398 </span> -<span id="L15399" class="LineNr">15399 </span><span class="SpecialChar">Single-byte-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15400" class="LineNr">15400 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15401" class="LineNr">15401 </span> 0x11/imm32/alloc-id:fake -<span id="L15402" class="LineNr">15402 </span> <span class="SpecialChar"><a href='mu.subx.html#L15434'>Byte-var-in-some-register</a></span>/imm32 -<span id="L15403" class="LineNr">15403 </span> 0/imm32/next -<span id="L15404" class="LineNr">15404 </span> 0/imm32/next -<span id="L15405" class="LineNr">15405 </span> -<span id="L15406" class="LineNr">15406 </span><span class="SpecialChar">Int-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> -<span id="L15407" class="LineNr">15407 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15408" class="LineNr">15408 </span> 0/imm32/name -<span id="L15409" class="LineNr">15409 </span> 0/imm32/name +<span id="L15383" class="LineNr">15383 </span> <span class="SpecialChar"><a href='mu.subx.html#L15354'>Byte-var-in-mem</a></span>/imm32 +<span id="L15384" class="LineNr">15384 </span> 0x11/imm32/alloc-id:fake +<span id="L15385" class="LineNr">15385 </span> <span class="SpecialChar"><a href='mu.subx.html#L15429'>Single-byte-var-in-some-register</a></span>/imm32/next +<span id="L15386" class="LineNr">15386 </span> +<span id="L15387" class="LineNr">15387 </span><span class="SpecialChar">Two-args-int-reg-int-stack</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15388" class="LineNr">15388 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15389" class="LineNr">15389 </span> 0x11/imm32/alloc-id:fake +<span id="L15390" class="LineNr">15390 </span> <span class="SpecialChar"><a href='mu.subx.html#L15436'>Int-var-in-some-register</a></span>/imm32 +<span id="L15391" class="LineNr">15391 </span> 0x11/imm32/alloc-id:fake +<span id="L15392" class="LineNr">15392 </span> <span class="SpecialChar"><a href='mu.subx.html#L15327'>Single-int-var-in-mem</a></span>/imm32/next +<span id="L15393" class="LineNr">15393 </span> +<span id="L15394" class="LineNr">15394 </span><span class="SpecialChar">Two-args-int-eax-int-literal</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15395" class="LineNr">15395 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15396" class="LineNr">15396 </span> 0x11/imm32/alloc-id:fake +<span id="L15397" class="LineNr">15397 </span> <span class="SpecialChar"><a href='mu.subx.html#L15482'>Int-var-in-eax</a></span>/imm32 +<span id="L15398" class="LineNr">15398 </span> 0x11/imm32/alloc-id:fake +<span id="L15399" class="LineNr">15399 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/next +<span id="L15400" class="LineNr">15400 </span> +<span id="L15401" class="LineNr">15401 </span><span class="SpecialChar">Int-var-and-literal</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15402" class="LineNr">15402 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15403" class="LineNr">15403 </span> 0x11/imm32/alloc-id:fake +<span id="L15404" class="LineNr">15404 </span> <span class="SpecialChar"><a href='mu.subx.html#L15334'>Int-var-in-mem</a></span>/imm32 +<span id="L15405" class="LineNr">15405 </span> 0x11/imm32/alloc-id:fake +<span id="L15406" class="LineNr">15406 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/next +<span id="L15407" class="LineNr">15407 </span> +<span id="L15408" class="LineNr">15408 </span><span class="SpecialChar">Int-var-in-register-and-literal</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15409" class="LineNr">15409 </span> 0x11/imm32/alloc-id:fake:payload <span id="L15410" class="LineNr">15410 </span> 0x11/imm32/alloc-id:fake -<span id="L15411" class="LineNr">15411 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15412" class="LineNr">15412 </span> 1/imm32/some-block-depth -<span id="L15413" class="LineNr">15413 </span> 0/imm32/no-stack-offset -<span id="L15414" class="LineNr">15414 </span> 0x11/imm32/alloc-id:fake -<span id="L15415" class="LineNr">15415 </span> <span class="SpecialChar"><a href='mu.subx.html#L15417'>Any-register</a></span>/imm32 -<span id="L15416" class="LineNr">15416 </span> -<span id="L15417" class="LineNr">15417 </span><span class="SpecialChar">Any-register</span>: <span class="subxComment"># (payload array byte)</span> -<span id="L15418" class="LineNr">15418 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15419" class="LineNr">15419 </span> 1/imm32/size -<span id="L15420" class="LineNr">15420 </span> <span class="subxComment"># data</span> -<span id="L15421" class="LineNr">15421 </span> 2a/asterisk -<span id="L15422" class="LineNr">15422 </span> -<span id="L15423" class="LineNr">15423 </span><span class="SpecialChar">Addr-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> -<span id="L15424" class="LineNr">15424 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15425" class="LineNr">15425 </span> 0/imm32/name -<span id="L15426" class="LineNr">15426 </span> 0/imm32/name -<span id="L15427" class="LineNr">15427 </span> 0x11/imm32/alloc-id:fake -<span id="L15428" class="LineNr">15428 </span> <span class="SpecialChar"><a href='mu.subx.html#L15587'>Type-addr</a></span>/imm32 -<span id="L15429" class="LineNr">15429 </span> 1/imm32/some-block-depth -<span id="L15430" class="LineNr">15430 </span> 0/imm32/no-stack-offset +<span id="L15411" class="LineNr">15411 </span> <span class="SpecialChar"><a href='mu.subx.html#L15436'>Int-var-in-some-register</a></span>/imm32 +<span id="L15412" class="LineNr">15412 </span> 0x11/imm32/alloc-id:fake +<span id="L15413" class="LineNr">15413 </span> <span class="SpecialChar"><a href='mu.subx.html#L15583'>Single-lit-var</a></span>/imm32/next +<span id="L15414" class="LineNr">15414 </span> +<span id="L15415" class="LineNr">15415 </span><span class="SpecialChar">Single-int-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15416" class="LineNr">15416 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15417" class="LineNr">15417 </span> 0x11/imm32/alloc-id:fake +<span id="L15418" class="LineNr">15418 </span> <span class="SpecialChar"><a href='mu.subx.html#L15436'>Int-var-in-some-register</a></span>/imm32 +<span id="L15419" class="LineNr">15419 </span> 0/imm32/next +<span id="L15420" class="LineNr">15420 </span> 0/imm32/next +<span id="L15421" class="LineNr">15421 </span> +<span id="L15422" class="LineNr">15422 </span><span class="SpecialChar">Single-addr-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15423" class="LineNr">15423 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15424" class="LineNr">15424 </span> 0x11/imm32/alloc-id:fake +<span id="L15425" class="LineNr">15425 </span> <span class="SpecialChar"><a href='mu.subx.html#L15453'>Addr-var-in-some-register</a></span>/imm32 +<span id="L15426" class="LineNr">15426 </span> 0/imm32/next +<span id="L15427" class="LineNr">15427 </span> 0/imm32/next +<span id="L15428" class="LineNr">15428 </span> +<span id="L15429" class="LineNr">15429 </span><span class="SpecialChar">Single-byte-var-in-some-register</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15430" class="LineNr">15430 </span> 0x11/imm32/alloc-id:fake:payload <span id="L15431" class="LineNr">15431 </span> 0x11/imm32/alloc-id:fake -<span id="L15432" class="LineNr">15432 </span> <span class="SpecialChar"><a href='mu.subx.html#L15417'>Any-register</a></span>/imm32 -<span id="L15433" class="LineNr">15433 </span> -<span id="L15434" class="LineNr">15434 </span><span class="SpecialChar">Byte-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> -<span id="L15435" class="LineNr">15435 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15436" class="LineNr">15436 </span> 0/imm32/name -<span id="L15437" class="LineNr">15437 </span> 0/imm32/name -<span id="L15438" class="LineNr">15438 </span> 0x11/imm32/alloc-id:fake -<span id="L15439" class="LineNr">15439 </span> <span class="SpecialChar"><a href='mu.subx.html#L15595'>Type-byte</a></span>/imm32 -<span id="L15440" class="LineNr">15440 </span> 1/imm32/some-block-depth -<span id="L15441" class="LineNr">15441 </span> 0/imm32/no-stack-offset -<span id="L15442" class="LineNr">15442 </span> 0x11/imm32/alloc-id:fake -<span id="L15443" class="LineNr">15443 </span> <span class="SpecialChar"><a href='mu.subx.html#L15417'>Any-register</a></span>/imm32 -<span id="L15444" class="LineNr">15444 </span> -<span id="L15445" class="LineNr">15445 </span><span class="SpecialChar">Single-int-var-in-eax</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15446" class="LineNr">15446 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15447" class="LineNr">15447 </span> 0x11/imm32/alloc-id:fake -<span id="L15448" class="LineNr">15448 </span> <span class="SpecialChar"><a href='mu.subx.html#L15452'>Int-var-in-eax</a></span>/imm32 -<span id="L15449" class="LineNr">15449 </span> 0/imm32/next -<span id="L15450" class="LineNr">15450 </span> 0/imm32/next -<span id="L15451" class="LineNr">15451 </span> -<span id="L15452" class="LineNr">15452 </span><span class="SpecialChar">Int-var-in-eax</span>: -<span id="L15453" class="LineNr">15453 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15454" class="LineNr">15454 </span> 0/imm32/name +<span id="L15432" class="LineNr">15432 </span> <span class="SpecialChar"><a href='mu.subx.html#L15464'>Byte-var-in-some-register</a></span>/imm32 +<span id="L15433" class="LineNr">15433 </span> 0/imm32/next +<span id="L15434" class="LineNr">15434 </span> 0/imm32/next +<span id="L15435" class="LineNr">15435 </span> +<span id="L15436" class="LineNr">15436 </span><span class="SpecialChar">Int-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> +<span id="L15437" class="LineNr">15437 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15438" class="LineNr">15438 </span> 0/imm32/name +<span id="L15439" class="LineNr">15439 </span> 0/imm32/name +<span id="L15440" class="LineNr">15440 </span> 0x11/imm32/alloc-id:fake +<span id="L15441" class="LineNr">15441 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15442" class="LineNr">15442 </span> 1/imm32/some-block-depth +<span id="L15443" class="LineNr">15443 </span> 0/imm32/no-stack-offset +<span id="L15444" class="LineNr">15444 </span> 0x11/imm32/alloc-id:fake +<span id="L15445" class="LineNr">15445 </span> <span class="SpecialChar"><a href='mu.subx.html#L15447'>Any-register</a></span>/imm32 +<span id="L15446" class="LineNr">15446 </span> +<span id="L15447" class="LineNr">15447 </span><span class="SpecialChar">Any-register</span>: <span class="subxComment"># (payload array byte)</span> +<span id="L15448" class="LineNr">15448 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15449" class="LineNr">15449 </span> 1/imm32/size +<span id="L15450" class="LineNr">15450 </span> <span class="subxComment"># data</span> +<span id="L15451" class="LineNr">15451 </span> 2a/asterisk +<span id="L15452" class="LineNr">15452 </span> +<span id="L15453" class="LineNr">15453 </span><span class="SpecialChar">Addr-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> +<span id="L15454" class="LineNr">15454 </span> 0x11/imm32/alloc-id:fake:payload <span id="L15455" class="LineNr">15455 </span> 0/imm32/name -<span id="L15456" class="LineNr">15456 </span> 0x11/imm32/alloc-id:fake -<span id="L15457" class="LineNr">15457 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15458" class="LineNr">15458 </span> 1/imm32/some-block-depth -<span id="L15459" class="LineNr">15459 </span> 0/imm32/no-stack-offset -<span id="L15460" class="LineNr">15460 </span> 0x11/imm32/alloc-id:fake -<span id="L15461" class="LineNr">15461 </span> $Register-eax/imm32 -<span id="L15462" class="LineNr">15462 </span> -<span id="L15463" class="LineNr">15463 </span><span class="SpecialChar">Single-int-var-in-ecx</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15464" class="LineNr">15464 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15465" class="LineNr">15465 </span> 0x11/imm32/alloc-id:fake -<span id="L15466" class="LineNr">15466 </span> <span class="SpecialChar"><a href='mu.subx.html#L15470'>Int-var-in-ecx</a></span>/imm32 -<span id="L15467" class="LineNr">15467 </span> 0/imm32/next -<span id="L15468" class="LineNr">15468 </span> 0/imm32/next -<span id="L15469" class="LineNr">15469 </span> -<span id="L15470" class="LineNr">15470 </span><span class="SpecialChar">Int-var-in-ecx</span>: -<span id="L15471" class="LineNr">15471 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15472" class="LineNr">15472 </span> 0/imm32/name -<span id="L15473" class="LineNr">15473 </span> 0/imm32/name -<span id="L15474" class="LineNr">15474 </span> 0x11/imm32/alloc-id:fake -<span id="L15475" class="LineNr">15475 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15476" class="LineNr">15476 </span> 1/imm32/some-block-depth -<span id="L15477" class="LineNr">15477 </span> 0/imm32/no-stack-offset -<span id="L15478" class="LineNr">15478 </span> 0x11/imm32/alloc-id:fake -<span id="L15479" class="LineNr">15479 </span> $Register-ecx/imm32/register -<span id="L15480" class="LineNr">15480 </span> -<span id="L15481" class="LineNr">15481 </span><span class="SpecialChar">Single-int-var-in-edx</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15482" class="LineNr">15482 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15483" class="LineNr">15483 </span> 0x11/imm32/alloc-id:fake -<span id="L15484" class="LineNr">15484 </span> <span class="SpecialChar"><a href='mu.subx.html#L15488'>Int-var-in-edx</a></span>/imm32 -<span id="L15485" class="LineNr">15485 </span> 0/imm32/next -<span id="L15486" class="LineNr">15486 </span> 0/imm32/next -<span id="L15487" class="LineNr">15487 </span> -<span id="L15488" class="LineNr">15488 </span><span class="SpecialChar">Int-var-in-edx</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15489" class="LineNr">15489 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15490" class="LineNr">15490 </span> 0/imm32/name -<span id="L15491" class="LineNr">15491 </span> 0/imm32/name -<span id="L15492" class="LineNr">15492 </span> 0x11/imm32/alloc-id:fake -<span id="L15493" class="LineNr">15493 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15494" class="LineNr">15494 </span> 1/imm32/some-block-depth -<span id="L15495" class="LineNr">15495 </span> 0/imm32/no-stack-offset -<span id="L15496" class="LineNr">15496 </span> 0x11/imm32/alloc-id:fake -<span id="L15497" class="LineNr">15497 </span> $Register-edx/imm32/register -<span id="L15498" class="LineNr">15498 </span> -<span id="L15499" class="LineNr">15499 </span><span class="SpecialChar">Single-int-var-in-ebx</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15500" class="LineNr">15500 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15501" class="LineNr">15501 </span> 0x11/imm32/alloc-id:fake -<span id="L15502" class="LineNr">15502 </span> <span class="SpecialChar"><a href='mu.subx.html#L15506'>Int-var-in-ebx</a></span>/imm32 -<span id="L15503" class="LineNr">15503 </span> 0/imm32/next -<span id="L15504" class="LineNr">15504 </span> 0/imm32/next -<span id="L15505" class="LineNr">15505 </span> -<span id="L15506" class="LineNr">15506 </span><span class="SpecialChar">Int-var-in-ebx</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15507" class="LineNr">15507 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15508" class="LineNr">15508 </span> 0/imm32/name -<span id="L15509" class="LineNr">15509 </span> 0/imm32/name -<span id="L15510" class="LineNr">15510 </span> 0x11/imm32/alloc-id:fake -<span id="L15511" class="LineNr">15511 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15512" class="LineNr">15512 </span> 1/imm32/some-block-depth -<span id="L15513" class="LineNr">15513 </span> 0/imm32/no-stack-offset -<span id="L15514" class="LineNr">15514 </span> 0x11/imm32/alloc-id:fake -<span id="L15515" class="LineNr">15515 </span> $Register-ebx/imm32/register -<span id="L15516" class="LineNr">15516 </span> -<span id="L15517" class="LineNr">15517 </span><span class="SpecialChar">Single-int-var-in-esi</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15518" class="LineNr">15518 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15519" class="LineNr">15519 </span> 0x11/imm32/alloc-id:fake -<span id="L15520" class="LineNr">15520 </span> <span class="SpecialChar"><a href='mu.subx.html#L15524'>Int-var-in-esi</a></span>/imm32 -<span id="L15521" class="LineNr">15521 </span> 0/imm32/next -<span id="L15522" class="LineNr">15522 </span> 0/imm32/next -<span id="L15523" class="LineNr">15523 </span> -<span id="L15524" class="LineNr">15524 </span><span class="SpecialChar">Int-var-in-esi</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15525" class="LineNr">15525 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15526" class="LineNr">15526 </span> 0/imm32/name -<span id="L15527" class="LineNr">15527 </span> 0/imm32/name -<span id="L15528" class="LineNr">15528 </span> 0x11/imm32/alloc-id:fake -<span id="L15529" class="LineNr">15529 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15530" class="LineNr">15530 </span> 1/imm32/some-block-depth -<span id="L15531" class="LineNr">15531 </span> 0/imm32/no-stack-offset -<span id="L15532" class="LineNr">15532 </span> 0x11/imm32/alloc-id:fake -<span id="L15533" class="LineNr">15533 </span> $Register-esi/imm32/register -<span id="L15534" class="LineNr">15534 </span> -<span id="L15535" class="LineNr">15535 </span><span class="SpecialChar">Single-int-var-in-edi</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15536" class="LineNr">15536 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15537" class="LineNr">15537 </span> 0x11/imm32/alloc-id:fake -<span id="L15538" class="LineNr">15538 </span> <span class="SpecialChar"><a href='mu.subx.html#L15542'>Int-var-in-edi</a></span>/imm32 -<span id="L15539" class="LineNr">15539 </span> 0/imm32/next -<span id="L15540" class="LineNr">15540 </span> 0/imm32/next -<span id="L15541" class="LineNr">15541 </span> -<span id="L15542" class="LineNr">15542 </span><span class="SpecialChar">Int-var-in-edi</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15543" class="LineNr">15543 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15544" class="LineNr">15544 </span> 0/imm32/name -<span id="L15545" class="LineNr">15545 </span> 0/imm32/name -<span id="L15546" class="LineNr">15546 </span> 0x11/imm32/alloc-id:fake -<span id="L15547" class="LineNr">15547 </span> <span class="SpecialChar"><a href='mu.subx.html#L15571'>Type-int</a></span>/imm32 -<span id="L15548" class="LineNr">15548 </span> 1/imm32/some-block-depth -<span id="L15549" class="LineNr">15549 </span> 0/imm32/no-stack-offset -<span id="L15550" class="LineNr">15550 </span> 0x11/imm32/alloc-id:fake -<span id="L15551" class="LineNr">15551 </span> $Register-edi/imm32/register -<span id="L15552" class="LineNr">15552 </span> -<span id="L15553" class="LineNr">15553 </span><span class="SpecialChar">Single-lit-var</span>: <span class="subxComment"># (payload list var)</span> -<span id="L15554" class="LineNr">15554 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15555" class="LineNr">15555 </span> 0x11/imm32/alloc-id:fake -<span id="L15556" class="LineNr">15556 </span> <span class="SpecialChar"><a href='mu.subx.html#L15560'>Lit-var</a></span>/imm32 -<span id="L15557" class="LineNr">15557 </span> 0/imm32/next -<span id="L15558" class="LineNr">15558 </span> 0/imm32/next -<span id="L15559" class="LineNr">15559 </span> -<span id="L15560" class="LineNr">15560 </span><span class="SpecialChar">Lit-var</span>: <span class="subxComment"># (payload var)</span> -<span id="L15561" class="LineNr">15561 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15562" class="LineNr">15562 </span> 0/imm32/name -<span id="L15563" class="LineNr">15563 </span> 0/imm32/name -<span id="L15564" class="LineNr">15564 </span> 0x11/imm32/alloc-id:fake -<span id="L15565" class="LineNr">15565 </span> <span class="SpecialChar"><a href='mu.subx.html#L15579'>Type-literal</a></span>/imm32 -<span id="L15566" class="LineNr">15566 </span> 1/imm32/some-block-depth -<span id="L15567" class="LineNr">15567 </span> 0/imm32/no-stack-offset -<span id="L15568" class="LineNr">15568 </span> 0/imm32/no-register -<span id="L15569" class="LineNr">15569 </span> 0/imm32/no-register -<span id="L15570" class="LineNr">15570 </span> -<span id="L15571" class="LineNr">15571 </span><span class="SpecialChar">Type-int</span>: <span class="subxComment"># (payload tree type-id)</span> -<span id="L15572" class="LineNr">15572 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15573" class="LineNr">15573 </span> 1/imm32/left-is-atom -<span id="L15574" class="LineNr">15574 </span> 1/imm32/value:int -<span id="L15575" class="LineNr">15575 </span> 0/imm32/left:unused -<span id="L15576" class="LineNr">15576 </span> 0/imm32/right:null -<span id="L15577" class="LineNr">15577 </span> 0/imm32/right:null -<span id="L15578" class="LineNr">15578 </span> -<span id="L15579" class="LineNr">15579 </span><span class="SpecialChar">Type-literal</span>: <span class="subxComment"># (payload tree type-id)</span> -<span id="L15580" class="LineNr">15580 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15581" class="LineNr">15581 </span> 1/imm32/is-atom -<span id="L15582" class="LineNr">15582 </span> 0/imm32/value:literal -<span id="L15583" class="LineNr">15583 </span> 0/imm32/left:unused -<span id="L15584" class="LineNr">15584 </span> 0/imm32/right:null -<span id="L15585" class="LineNr">15585 </span> 0/imm32/right:null -<span id="L15586" class="LineNr">15586 </span> -<span id="L15587" class="LineNr">15587 </span><span class="SpecialChar">Type-addr</span>: <span class="subxComment"># (payload tree type-id)</span> -<span id="L15588" class="LineNr">15588 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15589" class="LineNr">15589 </span> 1/imm32/is-atom -<span id="L15590" class="LineNr">15590 </span> 2/imm32/value:addr -<span id="L15591" class="LineNr">15591 </span> 0/imm32/left:unused -<span id="L15592" class="LineNr">15592 </span> 0/imm32/right:null -<span id="L15593" class="LineNr">15593 </span> 0/imm32/right:null -<span id="L15594" class="LineNr">15594 </span> -<span id="L15595" class="LineNr">15595 </span><span class="SpecialChar">Type-byte</span>: <span class="subxComment"># (payload tree type-id)</span> -<span id="L15596" class="LineNr">15596 </span> 0x11/imm32/alloc-id:fake:payload -<span id="L15597" class="LineNr">15597 </span> 1/imm32/is-atom -<span id="L15598" class="LineNr">15598 </span> 8/imm32/value:byte -<span id="L15599" class="LineNr">15599 </span> 0/imm32/left:unused -<span id="L15600" class="LineNr">15600 </span> 0/imm32/right:null -<span id="L15601" class="LineNr">15601 </span> 0/imm32/right:null -<span id="L15602" class="LineNr">15602 </span> -<span id="L15603" class="LineNr">15603 </span>== code -<span id="L15604" class="LineNr">15604 </span><span class="subxFunction">emit-subx-primitive</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), primitive: (addr primitive), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L15605" class="LineNr">15605 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15606" class="LineNr">15606 </span> 55/push-ebp -<span id="L15607" class="LineNr">15607 </span> 89/<- %ebp 4/r32/esp -<span id="L15608" class="LineNr">15608 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15609" class="LineNr">15609 </span> 50/push-eax -<span id="L15610" class="LineNr">15610 </span> 51/push-ecx -<span id="L15611" class="LineNr">15611 </span> <span class="subxComment"># ecx = primitive</span> -<span id="L15612" class="LineNr">15612 </span> 8b/-> *(ebp+0x10) 1/r32/ecx -<span id="L15613" class="LineNr">15613 </span> <span class="subxComment"># emit primitive name</span> -<span id="L15614" class="LineNr">15614 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L15615" class="LineNr">15615 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Primitive-subx-name Primitive-subx-name => eax</span> -<span id="L15616" class="LineNr">15616 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15617" class="LineNr">15617 </span> <span class="subxComment"># emit rm32 if necessary</span> -<span id="L15618" class="LineNr">15618 </span> (<a href='mu.subx.html#L15635'>emit-subx-rm32</a> *(ebp+8) *(ecx+0x20) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># Primitive-subx-rm32</span> -<span id="L15619" class="LineNr">15619 </span> <span class="subxComment"># emit r32 if necessary</span> -<span id="L15620" class="LineNr">15620 </span> (<a href='mu.subx.html#L15709'>emit-subx-r32</a> *(ebp+8) *(ecx+0x24) *(ebp+0xc)) <span class="subxComment"># Primitive-subx-r32</span> -<span id="L15621" class="LineNr">15621 </span> <span class="subxComment"># emit imm32 if necessary</span> -<span id="L15622" class="LineNr">15622 </span> (<a href='mu.subx.html#L15736'>emit-subx-imm32</a> *(ebp+8) *(ecx+0x28) *(ebp+0xc)) <span class="subxComment"># Primitive-subx-imm32</span> -<span id="L15623" class="LineNr">15623 </span> <span class="subxComment"># emit disp32 if necessary</span> -<span id="L15624" class="LineNr">15624 </span> (<a href='mu.subx.html#L15762'>emit-subx-disp32</a> *(ebp+8) *(ecx+0x2c) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># Primitive-subx-disp32</span> -<span id="L15625" class="LineNr">15625 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L15626" class="LineNr">15626 </span><span class="Constant">$emit-subx-primitive:end</span>: -<span id="L15627" class="LineNr">15627 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15628" class="LineNr">15628 </span> 59/pop-to-ecx -<span id="L15629" class="LineNr">15629 </span> 58/pop-to-eax -<span id="L15630" class="LineNr">15630 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15631" class="LineNr">15631 </span> 89/<- %esp 5/r32/ebp -<span id="L15632" class="LineNr">15632 </span> 5d/pop-to-ebp -<span id="L15633" class="LineNr">15633 </span> c3/return -<span id="L15634" class="LineNr">15634 </span> -<span id="L15635" class="LineNr">15635 </span><span class="subxFunction">emit-subx-rm32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L15636" class="LineNr">15636 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15637" class="LineNr">15637 </span> 55/push-ebp -<span id="L15638" class="LineNr">15638 </span> 89/<- %ebp 4/r32/esp -<span id="L15639" class="LineNr">15639 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15640" class="LineNr">15640 </span> 50/push-eax -<span id="L15641" class="LineNr">15641 </span> <span class="subxComment"># if (l == 0) return</span> -<span id="L15642" class="LineNr">15642 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 -<span id="L15643" class="LineNr">15643 </span> 74/jump-if-= $emit-subx-rm32:end/disp8 -<span id="L15644" class="LineNr">15644 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> -<span id="L15645" class="LineNr">15645 </span> (<a href='mu.subx.html#L15655'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> -<span id="L15646" class="LineNr">15646 </span> (<a href='mu.subx.html#L15996'>emit-subx-var-as-rm32</a> *(ebp+8) %eax) -<span id="L15647" class="LineNr">15647 </span><span class="Constant">$emit-subx-rm32:end</span>: -<span id="L15648" class="LineNr">15648 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15649" class="LineNr">15649 </span> 58/pop-to-eax -<span id="L15650" class="LineNr">15650 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15651" class="LineNr">15651 </span> 89/<- %esp 5/r32/ebp -<span id="L15652" class="LineNr">15652 </span> 5d/pop-to-ebp -<span id="L15653" class="LineNr">15653 </span> c3/return -<span id="L15654" class="LineNr">15654 </span> -<span id="L15655" class="LineNr">15655 </span><span class="subxFunction">get-stmt-operand-from-arg-location</span>: <span class="subxComment"># stmt: (addr stmt), l: arg-location, err: (addr buffered-file), ed: (addr exit-descriptor) -> var/eax: (addr stmt-var)</span> -<span id="L15656" class="LineNr">15656 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15657" class="LineNr">15657 </span> 55/push-ebp -<span id="L15658" class="LineNr">15658 </span> 89/<- %ebp 4/r32/esp -<span id="L15659" class="LineNr">15659 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15660" class="LineNr">15660 </span> 51/push-ecx -<span id="L15661" class="LineNr">15661 </span> <span class="subxComment"># eax = l</span> -<span id="L15662" class="LineNr">15662 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L15663" class="LineNr">15663 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L15664" class="LineNr">15664 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L15665" class="LineNr">15665 </span> <span class="subxComment"># if (l == 1) return stmt->inouts</span> -<span id="L15666" class="LineNr">15666 </span> { -<span id="L15667" class="LineNr">15667 </span> 3d/compare-eax-and 1/imm32 -<span id="L15668" class="LineNr">15668 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L15669" class="LineNr">15669 </span><span class="Constant">$get-stmt-operand-from-arg-location:1</span>: -<span id="L15670" class="LineNr">15670 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L15671" class="LineNr">15671 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 -<span id="L15672" class="LineNr">15672 </span> } -<span id="L15673" class="LineNr">15673 </span> <span class="subxComment"># if (l == 2) return stmt->inouts->next</span> -<span id="L15674" class="LineNr">15674 </span> { -<span id="L15675" class="LineNr">15675 </span> 3d/compare-eax-and 2/imm32 -<span id="L15676" class="LineNr">15676 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L15677" class="LineNr">15677 </span><span class="Constant">$get-stmt-operand-from-arg-location:2</span>: -<span id="L15678" class="LineNr">15678 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L15679" class="LineNr">15679 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L15680" class="LineNr">15680 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 -<span id="L15681" class="LineNr">15681 </span> } -<span id="L15682" class="LineNr">15682 </span> <span class="subxComment"># if (l == 3) return stmt->outputs</span> -<span id="L15683" class="LineNr">15683 </span> { -<span id="L15684" class="LineNr">15684 </span> 3d/compare-eax-and 3/imm32 -<span id="L15685" class="LineNr">15685 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L15686" class="LineNr">15686 </span><span class="Constant">$get-stmt-operand-from-arg-location:3</span>: -<span id="L15687" class="LineNr">15687 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L15688" class="LineNr">15688 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 -<span id="L15689" class="LineNr">15689 </span> } -<span id="L15690" class="LineNr">15690 </span> <span class="subxComment"># abort</span> -<span id="L15691" class="LineNr">15691 </span> e9/jump $get-stmt-operand-from-arg-location:abort/disp32 -<span id="L15692" class="LineNr">15692 </span><span class="Constant">$get-stmt-operand-from-arg-location:end</span>: -<span id="L15693" class="LineNr">15693 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15694" class="LineNr">15694 </span> 59/pop-to-ecx -<span id="L15695" class="LineNr">15695 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15696" class="LineNr">15696 </span> 89/<- %esp 5/r32/ebp -<span id="L15697" class="LineNr">15697 </span> 5d/pop-to-ebp -<span id="L15698" class="LineNr">15698 </span> c3/return -<span id="L15699" class="LineNr">15699 </span> -<span id="L15700" class="LineNr">15700 </span><span class="Constant">$get-stmt-operand-from-arg-location:abort</span>: -<span id="L15701" class="LineNr">15701 </span> <span class="subxComment"># error("invalid arg-location " eax)</span> -<span id="L15702" class="LineNr">15702 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"invalid arg-location "</span>) -<span id="L15703" class="LineNr">15703 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0x10) %eax) -<span id="L15704" class="LineNr">15704 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) -<span id="L15705" class="LineNr">15705 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) -<span id="L15706" class="LineNr">15706 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) -<span id="L15707" class="LineNr">15707 </span> <span class="subxComment"># never gets here</span> -<span id="L15708" class="LineNr">15708 </span> -<span id="L15709" class="LineNr">15709 </span><span class="subxFunction">emit-subx-r32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt)</span> -<span id="L15710" class="LineNr">15710 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15711" class="LineNr">15711 </span> 55/push-ebp -<span id="L15712" class="LineNr">15712 </span> 89/<- %ebp 4/r32/esp -<span id="L15713" class="LineNr">15713 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15714" class="LineNr">15714 </span> 50/push-eax -<span id="L15715" class="LineNr">15715 </span> 51/push-ecx -<span id="L15716" class="LineNr">15716 </span> <span class="subxComment"># if (l == 0) return</span> -<span id="L15717" class="LineNr">15717 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 -<span id="L15718" class="LineNr">15718 </span> 0f 84/jump-if-= $emit-subx-r32:end/disp32 -<span id="L15719" class="LineNr">15719 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> -<span id="L15720" class="LineNr">15720 </span> (<a href='mu.subx.html#L15655'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L15721" class="LineNr">15721 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L15722" class="LineNr">15722 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L15723" class="LineNr">15723 </span> (<a href='../081table.subx.html#L1800'>maybe-get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc) <span class="subxComment"># => eax: (addr register-index)</span> -<span id="L15724" class="LineNr">15724 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L15725" class="LineNr">15725 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) -<span id="L15726" class="LineNr">15726 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32"</span>) -<span id="L15727" class="LineNr">15727 </span><span class="Constant">$emit-subx-r32:end</span>: -<span id="L15728" class="LineNr">15728 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15729" class="LineNr">15729 </span> 59/pop-to-ecx -<span id="L15730" class="LineNr">15730 </span> 58/pop-to-eax -<span id="L15731" class="LineNr">15731 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15732" class="LineNr">15732 </span> 89/<- %esp 5/r32/ebp -<span id="L15733" class="LineNr">15733 </span> 5d/pop-to-ebp -<span id="L15734" class="LineNr">15734 </span> c3/return -<span id="L15735" class="LineNr">15735 </span> -<span id="L15736" class="LineNr">15736 </span><span class="subxFunction">emit-subx-imm32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt)</span> -<span id="L15737" class="LineNr">15737 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15738" class="LineNr">15738 </span> 55/push-ebp -<span id="L15739" class="LineNr">15739 </span> 89/<- %ebp 4/r32/esp -<span id="L15740" class="LineNr">15740 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15741" class="LineNr">15741 </span> 50/push-eax -<span id="L15742" class="LineNr">15742 </span> 51/push-ecx -<span id="L15743" class="LineNr">15743 </span> <span class="subxComment"># if (l == 0) return</span> -<span id="L15744" class="LineNr">15744 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 -<span id="L15745" class="LineNr">15745 </span> 0f 84/jump-if-= $emit-subx-imm32:end/disp32 -<span id="L15746" class="LineNr">15746 </span> <span class="subxComment"># var v/eax: (handle var)</span> -<span id="L15747" class="LineNr">15747 </span> (<a href='mu.subx.html#L15655'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># => eax</span> -<span id="L15748" class="LineNr">15748 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L15749" class="LineNr">15749 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L15750" class="LineNr">15750 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L15751" class="LineNr">15751 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15752" class="LineNr">15752 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32"</span>) -<span id="L15753" class="LineNr">15753 </span><span class="Constant">$emit-subx-imm32:end</span>: -<span id="L15754" class="LineNr">15754 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15755" class="LineNr">15755 </span> 59/pop-to-ecx -<span id="L15756" class="LineNr">15756 </span> 58/pop-to-eax -<span id="L15757" class="LineNr">15757 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15758" class="LineNr">15758 </span> 89/<- %esp 5/r32/ebp -<span id="L15759" class="LineNr">15759 </span> 5d/pop-to-ebp -<span id="L15760" class="LineNr">15760 </span> c3/return -<span id="L15761" class="LineNr">15761 </span> -<span id="L15762" class="LineNr">15762 </span><span class="subxFunction">emit-subx-disp32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> -<span id="L15763" class="LineNr">15763 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15764" class="LineNr">15764 </span> 55/push-ebp -<span id="L15765" class="LineNr">15765 </span> 89/<- %ebp 4/r32/esp -<span id="L15766" class="LineNr">15766 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15767" class="LineNr">15767 </span> 50/push-eax -<span id="L15768" class="LineNr">15768 </span> 51/push-ecx -<span id="L15769" class="LineNr">15769 </span> <span class="subxComment"># if (location == 0) return</span> -<span id="L15770" class="LineNr">15770 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 -<span id="L15771" class="LineNr">15771 </span> 0f 84/jump-if-= $emit-subx-disp32:end/disp32 -<span id="L15772" class="LineNr">15772 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> -<span id="L15773" class="LineNr">15773 </span> (<a href='mu.subx.html#L15655'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> -<span id="L15774" class="LineNr">15774 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L15775" class="LineNr">15775 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> -<span id="L15776" class="LineNr">15776 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L15777" class="LineNr">15777 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15778" class="LineNr">15778 </span> <span class="subxComment"># hack: if instruction operation starts with "break", emit ":break"</span> -<span id="L15779" class="LineNr">15779 </span> <span class="subxComment"># var name/ecx: (addr array byte) = lookup(stmt->operation)</span> -<span id="L15780" class="LineNr">15780 </span> 8b/-> *(ebp+0x10) 0/r32/eax -<span id="L15781" class="LineNr">15781 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L15782" class="LineNr">15782 </span> 89/<- %ecx 0/r32/eax -<span id="L15783" class="LineNr">15783 </span> { -<span id="L15784" class="LineNr">15784 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"break"</span>) <span class="subxComment"># => eax</span> -<span id="L15785" class="LineNr">15785 </span> 3d/compare-eax-and 0/imm32/false -<span id="L15786" class="LineNr">15786 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15787" class="LineNr">15787 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break"</span>) -<span id="L15788" class="LineNr">15788 </span> } -<span id="L15789" class="LineNr">15789 </span> <span class="subxComment"># hack: if instruction operation starts with "loop", emit ":loop"</span> -<span id="L15790" class="LineNr">15790 </span> { -<span id="L15791" class="LineNr">15791 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"loop"</span>) <span class="subxComment"># => eax</span> -<span id="L15792" class="LineNr">15792 </span> 3d/compare-eax-and 0/imm32/false -<span id="L15793" class="LineNr">15793 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15794" class="LineNr">15794 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop"</span>) -<span id="L15795" class="LineNr">15795 </span> } -<span id="L15796" class="LineNr">15796 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/disp32"</span>) -<span id="L15797" class="LineNr">15797 </span><span class="Constant">$emit-subx-disp32:end</span>: -<span id="L15798" class="LineNr">15798 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15799" class="LineNr">15799 </span> 59/pop-to-ecx -<span id="L15800" class="LineNr">15800 </span> 58/pop-to-eax -<span id="L15801" class="LineNr">15801 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15802" class="LineNr">15802 </span> 89/<- %esp 5/r32/ebp -<span id="L15803" class="LineNr">15803 </span> 5d/pop-to-ebp -<span id="L15804" class="LineNr">15804 </span> c3/return -<span id="L15805" class="LineNr">15805 </span> -<span id="L15806" class="LineNr">15806 </span><span class="subxFunction">emit-call</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> -<span id="L15807" class="LineNr">15807 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15808" class="LineNr">15808 </span> 55/push-ebp -<span id="L15809" class="LineNr">15809 </span> 89/<- %ebp 4/r32/esp -<span id="L15810" class="LineNr">15810 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15811" class="LineNr">15811 </span> 50/push-eax -<span id="L15812" class="LineNr">15812 </span> 51/push-ecx -<span id="L15813" class="LineNr">15813 </span> <span class="subxComment">#</span> -<span id="L15814" class="LineNr">15814 </span> (<a href='mu.subx.html#L18641'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) -<span id="L15815" class="LineNr">15815 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"("</span>) -<span id="L15816" class="LineNr">15816 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L15817" class="LineNr">15817 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L15818" class="LineNr">15818 </span> <span class="subxH1Comment"># - emit function name</span> -<span id="L15819" class="LineNr">15819 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L15820" class="LineNr">15820 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15821" class="LineNr">15821 </span> <span class="subxH1Comment"># - emit arguments</span> -<span id="L15822" class="LineNr">15822 </span> <span class="subxComment"># var curr/eax: (addr stmt-var) = lookup(stmt->inouts)</span> -<span id="L15823" class="LineNr">15823 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L15824" class="LineNr">15824 </span> { -<span id="L15825" class="LineNr">15825 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L15826" class="LineNr">15826 </span> 3d/compare-eax-and 0/imm32 -<span id="L15827" class="LineNr">15827 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15828" class="LineNr">15828 </span> <span class="subxComment">#</span> -<span id="L15829" class="LineNr">15829 </span> (<a href='mu.subx.html#L15845'>emit-subx-call-operand</a> *(ebp+8) %eax) -<span id="L15830" class="LineNr">15830 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L15831" class="LineNr">15831 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L15832" class="LineNr">15832 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L15833" class="LineNr">15833 </span> } -<span id="L15834" class="LineNr">15834 </span> <span class="subxComment">#</span> -<span id="L15835" class="LineNr">15835 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")\n"</span>) -<span id="L15836" class="LineNr">15836 </span><span class="Constant">$emit-call:end</span>: -<span id="L15837" class="LineNr">15837 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15838" class="LineNr">15838 </span> 59/pop-to-ecx -<span id="L15839" class="LineNr">15839 </span> 58/pop-to-eax -<span id="L15840" class="LineNr">15840 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15841" class="LineNr">15841 </span> 89/<- %esp 5/r32/ebp -<span id="L15842" class="LineNr">15842 </span> 5d/pop-to-ebp -<span id="L15843" class="LineNr">15843 </span> c3/return -<span id="L15844" class="LineNr">15844 </span> -<span id="L15845" class="LineNr">15845 </span><span class="subxFunction">emit-subx-call-operand</span>: <span class="subxComment"># out: (addr buffered-file), s: (addr stmt-var)</span> -<span id="L15846" class="LineNr">15846 </span> <span class="subxComment"># shares code with emit-subx-var-as-rm32</span> -<span id="L15847" class="LineNr">15847 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15848" class="LineNr">15848 </span> 55/push-ebp -<span id="L15849" class="LineNr">15849 </span> 89/<- %ebp 4/r32/esp -<span id="L15850" class="LineNr">15850 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15851" class="LineNr">15851 </span> 50/push-eax -<span id="L15852" class="LineNr">15852 </span> 51/push-ecx -<span id="L15853" class="LineNr">15853 </span> 56/push-esi -<span id="L15854" class="LineNr">15854 </span> <span class="subxComment"># ecx = s</span> -<span id="L15855" class="LineNr">15855 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L15856" class="LineNr">15856 </span> <span class="subxComment"># var operand/esi: (addr var) = lookup(s->value)</span> -<span id="L15857" class="LineNr">15857 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L15858" class="LineNr">15858 </span> 89/<- %esi 0/r32/eax -<span id="L15859" class="LineNr">15859 </span> <span class="subxComment"># if (operand->register && !s->is-deref?) emit "%__"</span> -<span id="L15860" class="LineNr">15860 </span> { -<span id="L15861" class="LineNr">15861 </span><span class="Constant">$emit-subx-call-operand:check-for-register-direct</span>: -<span id="L15862" class="LineNr">15862 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L15863" class="LineNr">15863 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15864" class="LineNr">15864 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L15865" class="LineNr">15865 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L15866" class="LineNr">15866 </span><span class="Constant">$emit-subx-call-operand:register-direct</span>: -<span id="L15867" class="LineNr">15867 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" %"</span>) -<span id="L15868" class="LineNr">15868 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L15869" class="LineNr">15869 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15870" class="LineNr">15870 </span> e9/jump $emit-subx-call-operand:end/disp32 -<span id="L15871" class="LineNr">15871 </span> } -<span id="L15872" class="LineNr">15872 </span> <span class="subxComment"># else if (operand->register && s->is-deref?) emit "*__"</span> -<span id="L15873" class="LineNr">15873 </span> { -<span id="L15874" class="LineNr">15874 </span><span class="Constant">$emit-subx-call-operand:check-for-register-indirect</span>: -<span id="L15875" class="LineNr">15875 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L15876" class="LineNr">15876 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15877" class="LineNr">15877 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L15878" class="LineNr">15878 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15879" class="LineNr">15879 </span><span class="Constant">$emit-subx-call-operand:register-indirect</span>: -<span id="L15880" class="LineNr">15880 </span> (<a href='mu.subx.html#L15911'>emit-subx-call-operand-register-indirect</a> *(ebp+8) %esi) -<span id="L15881" class="LineNr">15881 </span> e9/jump $emit-subx-call-operand:end/disp32 -<span id="L15882" class="LineNr">15882 </span> } -<span id="L15883" class="LineNr">15883 </span> <span class="subxComment"># else if (operand->stack-offset) emit "*(ebp+__)"</span> -<span id="L15884" class="LineNr">15884 </span> { -<span id="L15885" class="LineNr">15885 </span> 81 7/subop/compare *(esi+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> -<span id="L15886" class="LineNr">15886 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L15887" class="LineNr">15887 </span><span class="Constant">$emit-subx-call-operand:stack</span>: -<span id="L15888" class="LineNr">15888 </span> (<a href='mu.subx.html#L15956'>emit-subx-call-operand-stack</a> *(ebp+8) %esi) -<span id="L15889" class="LineNr">15889 </span> e9/jump $emit-subx-call-operand:end/disp32 -<span id="L15890" class="LineNr">15890 </span> } -<span id="L15891" class="LineNr">15891 </span> <span class="subxComment"># else if (operand->type == literal) emit "__"</span> -<span id="L15892" class="LineNr">15892 </span> { -<span id="L15893" class="LineNr">15893 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L15894" class="LineNr">15894 </span> 81 7/subop/compare *(eax+4) 0/imm32 <span class="subxComment"># Tree-left</span> +<span id="L15456" class="LineNr">15456 </span> 0/imm32/name +<span id="L15457" class="LineNr">15457 </span> 0x11/imm32/alloc-id:fake +<span id="L15458" class="LineNr">15458 </span> <span class="SpecialChar"><a href='mu.subx.html#L15617'>Type-addr</a></span>/imm32 +<span id="L15459" class="LineNr">15459 </span> 1/imm32/some-block-depth +<span id="L15460" class="LineNr">15460 </span> 0/imm32/no-stack-offset +<span id="L15461" class="LineNr">15461 </span> 0x11/imm32/alloc-id:fake +<span id="L15462" class="LineNr">15462 </span> <span class="SpecialChar"><a href='mu.subx.html#L15447'>Any-register</a></span>/imm32 +<span id="L15463" class="LineNr">15463 </span> +<span id="L15464" class="LineNr">15464 </span><span class="SpecialChar">Byte-var-in-some-register</span>: <span class="subxComment"># (payload var)</span> +<span id="L15465" class="LineNr">15465 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15466" class="LineNr">15466 </span> 0/imm32/name +<span id="L15467" class="LineNr">15467 </span> 0/imm32/name +<span id="L15468" class="LineNr">15468 </span> 0x11/imm32/alloc-id:fake +<span id="L15469" class="LineNr">15469 </span> <span class="SpecialChar"><a href='mu.subx.html#L15625'>Type-byte</a></span>/imm32 +<span id="L15470" class="LineNr">15470 </span> 1/imm32/some-block-depth +<span id="L15471" class="LineNr">15471 </span> 0/imm32/no-stack-offset +<span id="L15472" class="LineNr">15472 </span> 0x11/imm32/alloc-id:fake +<span id="L15473" class="LineNr">15473 </span> <span class="SpecialChar"><a href='mu.subx.html#L15447'>Any-register</a></span>/imm32 +<span id="L15474" class="LineNr">15474 </span> +<span id="L15475" class="LineNr">15475 </span><span class="SpecialChar">Single-int-var-in-eax</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15476" class="LineNr">15476 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15477" class="LineNr">15477 </span> 0x11/imm32/alloc-id:fake +<span id="L15478" class="LineNr">15478 </span> <span class="SpecialChar"><a href='mu.subx.html#L15482'>Int-var-in-eax</a></span>/imm32 +<span id="L15479" class="LineNr">15479 </span> 0/imm32/next +<span id="L15480" class="LineNr">15480 </span> 0/imm32/next +<span id="L15481" class="LineNr">15481 </span> +<span id="L15482" class="LineNr">15482 </span><span class="SpecialChar">Int-var-in-eax</span>: +<span id="L15483" class="LineNr">15483 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15484" class="LineNr">15484 </span> 0/imm32/name +<span id="L15485" class="LineNr">15485 </span> 0/imm32/name +<span id="L15486" class="LineNr">15486 </span> 0x11/imm32/alloc-id:fake +<span id="L15487" class="LineNr">15487 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15488" class="LineNr">15488 </span> 1/imm32/some-block-depth +<span id="L15489" class="LineNr">15489 </span> 0/imm32/no-stack-offset +<span id="L15490" class="LineNr">15490 </span> 0x11/imm32/alloc-id:fake +<span id="L15491" class="LineNr">15491 </span> $Register-eax/imm32 +<span id="L15492" class="LineNr">15492 </span> +<span id="L15493" class="LineNr">15493 </span><span class="SpecialChar">Single-int-var-in-ecx</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15494" class="LineNr">15494 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15495" class="LineNr">15495 </span> 0x11/imm32/alloc-id:fake +<span id="L15496" class="LineNr">15496 </span> <span class="SpecialChar"><a href='mu.subx.html#L15500'>Int-var-in-ecx</a></span>/imm32 +<span id="L15497" class="LineNr">15497 </span> 0/imm32/next +<span id="L15498" class="LineNr">15498 </span> 0/imm32/next +<span id="L15499" class="LineNr">15499 </span> +<span id="L15500" class="LineNr">15500 </span><span class="SpecialChar">Int-var-in-ecx</span>: +<span id="L15501" class="LineNr">15501 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15502" class="LineNr">15502 </span> 0/imm32/name +<span id="L15503" class="LineNr">15503 </span> 0/imm32/name +<span id="L15504" class="LineNr">15504 </span> 0x11/imm32/alloc-id:fake +<span id="L15505" class="LineNr">15505 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15506" class="LineNr">15506 </span> 1/imm32/some-block-depth +<span id="L15507" class="LineNr">15507 </span> 0/imm32/no-stack-offset +<span id="L15508" class="LineNr">15508 </span> 0x11/imm32/alloc-id:fake +<span id="L15509" class="LineNr">15509 </span> $Register-ecx/imm32/register +<span id="L15510" class="LineNr">15510 </span> +<span id="L15511" class="LineNr">15511 </span><span class="SpecialChar">Single-int-var-in-edx</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15512" class="LineNr">15512 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15513" class="LineNr">15513 </span> 0x11/imm32/alloc-id:fake +<span id="L15514" class="LineNr">15514 </span> <span class="SpecialChar"><a href='mu.subx.html#L15518'>Int-var-in-edx</a></span>/imm32 +<span id="L15515" class="LineNr">15515 </span> 0/imm32/next +<span id="L15516" class="LineNr">15516 </span> 0/imm32/next +<span id="L15517" class="LineNr">15517 </span> +<span id="L15518" class="LineNr">15518 </span><span class="SpecialChar">Int-var-in-edx</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15519" class="LineNr">15519 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15520" class="LineNr">15520 </span> 0/imm32/name +<span id="L15521" class="LineNr">15521 </span> 0/imm32/name +<span id="L15522" class="LineNr">15522 </span> 0x11/imm32/alloc-id:fake +<span id="L15523" class="LineNr">15523 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15524" class="LineNr">15524 </span> 1/imm32/some-block-depth +<span id="L15525" class="LineNr">15525 </span> 0/imm32/no-stack-offset +<span id="L15526" class="LineNr">15526 </span> 0x11/imm32/alloc-id:fake +<span id="L15527" class="LineNr">15527 </span> $Register-edx/imm32/register +<span id="L15528" class="LineNr">15528 </span> +<span id="L15529" class="LineNr">15529 </span><span class="SpecialChar">Single-int-var-in-ebx</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15530" class="LineNr">15530 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15531" class="LineNr">15531 </span> 0x11/imm32/alloc-id:fake +<span id="L15532" class="LineNr">15532 </span> <span class="SpecialChar"><a href='mu.subx.html#L15536'>Int-var-in-ebx</a></span>/imm32 +<span id="L15533" class="LineNr">15533 </span> 0/imm32/next +<span id="L15534" class="LineNr">15534 </span> 0/imm32/next +<span id="L15535" class="LineNr">15535 </span> +<span id="L15536" class="LineNr">15536 </span><span class="SpecialChar">Int-var-in-ebx</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15537" class="LineNr">15537 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15538" class="LineNr">15538 </span> 0/imm32/name +<span id="L15539" class="LineNr">15539 </span> 0/imm32/name +<span id="L15540" class="LineNr">15540 </span> 0x11/imm32/alloc-id:fake +<span id="L15541" class="LineNr">15541 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15542" class="LineNr">15542 </span> 1/imm32/some-block-depth +<span id="L15543" class="LineNr">15543 </span> 0/imm32/no-stack-offset +<span id="L15544" class="LineNr">15544 </span> 0x11/imm32/alloc-id:fake +<span id="L15545" class="LineNr">15545 </span> $Register-ebx/imm32/register +<span id="L15546" class="LineNr">15546 </span> +<span id="L15547" class="LineNr">15547 </span><span class="SpecialChar">Single-int-var-in-esi</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15548" class="LineNr">15548 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15549" class="LineNr">15549 </span> 0x11/imm32/alloc-id:fake +<span id="L15550" class="LineNr">15550 </span> <span class="SpecialChar"><a href='mu.subx.html#L15554'>Int-var-in-esi</a></span>/imm32 +<span id="L15551" class="LineNr">15551 </span> 0/imm32/next +<span id="L15552" class="LineNr">15552 </span> 0/imm32/next +<span id="L15553" class="LineNr">15553 </span> +<span id="L15554" class="LineNr">15554 </span><span class="SpecialChar">Int-var-in-esi</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15555" class="LineNr">15555 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15556" class="LineNr">15556 </span> 0/imm32/name +<span id="L15557" class="LineNr">15557 </span> 0/imm32/name +<span id="L15558" class="LineNr">15558 </span> 0x11/imm32/alloc-id:fake +<span id="L15559" class="LineNr">15559 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15560" class="LineNr">15560 </span> 1/imm32/some-block-depth +<span id="L15561" class="LineNr">15561 </span> 0/imm32/no-stack-offset +<span id="L15562" class="LineNr">15562 </span> 0x11/imm32/alloc-id:fake +<span id="L15563" class="LineNr">15563 </span> $Register-esi/imm32/register +<span id="L15564" class="LineNr">15564 </span> +<span id="L15565" class="LineNr">15565 </span><span class="SpecialChar">Single-int-var-in-edi</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15566" class="LineNr">15566 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15567" class="LineNr">15567 </span> 0x11/imm32/alloc-id:fake +<span id="L15568" class="LineNr">15568 </span> <span class="SpecialChar"><a href='mu.subx.html#L15572'>Int-var-in-edi</a></span>/imm32 +<span id="L15569" class="LineNr">15569 </span> 0/imm32/next +<span id="L15570" class="LineNr">15570 </span> 0/imm32/next +<span id="L15571" class="LineNr">15571 </span> +<span id="L15572" class="LineNr">15572 </span><span class="SpecialChar">Int-var-in-edi</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15573" class="LineNr">15573 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15574" class="LineNr">15574 </span> 0/imm32/name +<span id="L15575" class="LineNr">15575 </span> 0/imm32/name +<span id="L15576" class="LineNr">15576 </span> 0x11/imm32/alloc-id:fake +<span id="L15577" class="LineNr">15577 </span> <span class="SpecialChar"><a href='mu.subx.html#L15601'>Type-int</a></span>/imm32 +<span id="L15578" class="LineNr">15578 </span> 1/imm32/some-block-depth +<span id="L15579" class="LineNr">15579 </span> 0/imm32/no-stack-offset +<span id="L15580" class="LineNr">15580 </span> 0x11/imm32/alloc-id:fake +<span id="L15581" class="LineNr">15581 </span> $Register-edi/imm32/register +<span id="L15582" class="LineNr">15582 </span> +<span id="L15583" class="LineNr">15583 </span><span class="SpecialChar">Single-lit-var</span>: <span class="subxComment"># (payload list var)</span> +<span id="L15584" class="LineNr">15584 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15585" class="LineNr">15585 </span> 0x11/imm32/alloc-id:fake +<span id="L15586" class="LineNr">15586 </span> <span class="SpecialChar"><a href='mu.subx.html#L15590'>Lit-var</a></span>/imm32 +<span id="L15587" class="LineNr">15587 </span> 0/imm32/next +<span id="L15588" class="LineNr">15588 </span> 0/imm32/next +<span id="L15589" class="LineNr">15589 </span> +<span id="L15590" class="LineNr">15590 </span><span class="SpecialChar">Lit-var</span>: <span class="subxComment"># (payload var)</span> +<span id="L15591" class="LineNr">15591 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15592" class="LineNr">15592 </span> 0/imm32/name +<span id="L15593" class="LineNr">15593 </span> 0/imm32/name +<span id="L15594" class="LineNr">15594 </span> 0x11/imm32/alloc-id:fake +<span id="L15595" class="LineNr">15595 </span> <span class="SpecialChar"><a href='mu.subx.html#L15609'>Type-literal</a></span>/imm32 +<span id="L15596" class="LineNr">15596 </span> 1/imm32/some-block-depth +<span id="L15597" class="LineNr">15597 </span> 0/imm32/no-stack-offset +<span id="L15598" class="LineNr">15598 </span> 0/imm32/no-register +<span id="L15599" class="LineNr">15599 </span> 0/imm32/no-register +<span id="L15600" class="LineNr">15600 </span> +<span id="L15601" class="LineNr">15601 </span><span class="SpecialChar">Type-int</span>: <span class="subxComment"># (payload tree type-id)</span> +<span id="L15602" class="LineNr">15602 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15603" class="LineNr">15603 </span> 1/imm32/left-is-atom +<span id="L15604" class="LineNr">15604 </span> 1/imm32/value:int +<span id="L15605" class="LineNr">15605 </span> 0/imm32/left:unused +<span id="L15606" class="LineNr">15606 </span> 0/imm32/right:null +<span id="L15607" class="LineNr">15607 </span> 0/imm32/right:null +<span id="L15608" class="LineNr">15608 </span> +<span id="L15609" class="LineNr">15609 </span><span class="SpecialChar">Type-literal</span>: <span class="subxComment"># (payload tree type-id)</span> +<span id="L15610" class="LineNr">15610 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15611" class="LineNr">15611 </span> 1/imm32/is-atom +<span id="L15612" class="LineNr">15612 </span> 0/imm32/value:literal +<span id="L15613" class="LineNr">15613 </span> 0/imm32/left:unused +<span id="L15614" class="LineNr">15614 </span> 0/imm32/right:null +<span id="L15615" class="LineNr">15615 </span> 0/imm32/right:null +<span id="L15616" class="LineNr">15616 </span> +<span id="L15617" class="LineNr">15617 </span><span class="SpecialChar">Type-addr</span>: <span class="subxComment"># (payload tree type-id)</span> +<span id="L15618" class="LineNr">15618 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15619" class="LineNr">15619 </span> 1/imm32/is-atom +<span id="L15620" class="LineNr">15620 </span> 2/imm32/value:addr +<span id="L15621" class="LineNr">15621 </span> 0/imm32/left:unused +<span id="L15622" class="LineNr">15622 </span> 0/imm32/right:null +<span id="L15623" class="LineNr">15623 </span> 0/imm32/right:null +<span id="L15624" class="LineNr">15624 </span> +<span id="L15625" class="LineNr">15625 </span><span class="SpecialChar">Type-byte</span>: <span class="subxComment"># (payload tree type-id)</span> +<span id="L15626" class="LineNr">15626 </span> 0x11/imm32/alloc-id:fake:payload +<span id="L15627" class="LineNr">15627 </span> 1/imm32/is-atom +<span id="L15628" class="LineNr">15628 </span> 8/imm32/value:byte +<span id="L15629" class="LineNr">15629 </span> 0/imm32/left:unused +<span id="L15630" class="LineNr">15630 </span> 0/imm32/right:null +<span id="L15631" class="LineNr">15631 </span> 0/imm32/right:null +<span id="L15632" class="LineNr">15632 </span> +<span id="L15633" class="LineNr">15633 </span>== code +<span id="L15634" class="LineNr">15634 </span><span class="subxFunction">emit-subx-primitive</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt), primitive: (addr primitive), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L15635" class="LineNr">15635 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15636" class="LineNr">15636 </span> 55/push-ebp +<span id="L15637" class="LineNr">15637 </span> 89/<- %ebp 4/r32/esp +<span id="L15638" class="LineNr">15638 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15639" class="LineNr">15639 </span> 50/push-eax +<span id="L15640" class="LineNr">15640 </span> 51/push-ecx +<span id="L15641" class="LineNr">15641 </span> <span class="subxComment"># ecx = primitive</span> +<span id="L15642" class="LineNr">15642 </span> 8b/-> *(ebp+0x10) 1/r32/ecx +<span id="L15643" class="LineNr">15643 </span> <span class="subxComment"># emit primitive name</span> +<span id="L15644" class="LineNr">15644 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L15645" class="LineNr">15645 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x18) *(ecx+0x1c)) <span class="subxComment"># Primitive-subx-name Primitive-subx-name => eax</span> +<span id="L15646" class="LineNr">15646 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L15647" class="LineNr">15647 </span> <span class="subxComment"># emit rm32 if necessary</span> +<span id="L15648" class="LineNr">15648 </span> (<a href='mu.subx.html#L15665'>emit-subx-rm32</a> *(ebp+8) *(ecx+0x20) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># Primitive-subx-rm32</span> +<span id="L15649" class="LineNr">15649 </span> <span class="subxComment"># emit r32 if necessary</span> +<span id="L15650" class="LineNr">15650 </span> (<a href='mu.subx.html#L15739'>emit-subx-r32</a> *(ebp+8) *(ecx+0x24) *(ebp+0xc)) <span class="subxComment"># Primitive-subx-r32</span> +<span id="L15651" class="LineNr">15651 </span> <span class="subxComment"># emit imm32 if necessary</span> +<span id="L15652" class="LineNr">15652 </span> (<a href='mu.subx.html#L15766'>emit-subx-imm32</a> *(ebp+8) *(ecx+0x28) *(ebp+0xc)) <span class="subxComment"># Primitive-subx-imm32</span> +<span id="L15653" class="LineNr">15653 </span> <span class="subxComment"># emit disp32 if necessary</span> +<span id="L15654" class="LineNr">15654 </span> (<a href='mu.subx.html#L15792'>emit-subx-disp32</a> *(ebp+8) *(ecx+0x2c) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># Primitive-subx-disp32</span> +<span id="L15655" class="LineNr">15655 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L15656" class="LineNr">15656 </span><span class="Constant">$emit-subx-primitive:end</span>: +<span id="L15657" class="LineNr">15657 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15658" class="LineNr">15658 </span> 59/pop-to-ecx +<span id="L15659" class="LineNr">15659 </span> 58/pop-to-eax +<span id="L15660" class="LineNr">15660 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15661" class="LineNr">15661 </span> 89/<- %esp 5/r32/ebp +<span id="L15662" class="LineNr">15662 </span> 5d/pop-to-ebp +<span id="L15663" class="LineNr">15663 </span> c3/return +<span id="L15664" class="LineNr">15664 </span> +<span id="L15665" class="LineNr">15665 </span><span class="subxFunction">emit-subx-rm32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L15666" class="LineNr">15666 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15667" class="LineNr">15667 </span> 55/push-ebp +<span id="L15668" class="LineNr">15668 </span> 89/<- %ebp 4/r32/esp +<span id="L15669" class="LineNr">15669 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15670" class="LineNr">15670 </span> 50/push-eax +<span id="L15671" class="LineNr">15671 </span> <span class="subxComment"># if (l == 0) return</span> +<span id="L15672" class="LineNr">15672 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 +<span id="L15673" class="LineNr">15673 </span> 74/jump-if-= $emit-subx-rm32:end/disp8 +<span id="L15674" class="LineNr">15674 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> +<span id="L15675" class="LineNr">15675 </span> (<a href='mu.subx.html#L15685'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> +<span id="L15676" class="LineNr">15676 </span> (<a href='mu.subx.html#L16026'>emit-subx-var-as-rm32</a> *(ebp+8) %eax) +<span id="L15677" class="LineNr">15677 </span><span class="Constant">$emit-subx-rm32:end</span>: +<span id="L15678" class="LineNr">15678 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15679" class="LineNr">15679 </span> 58/pop-to-eax +<span id="L15680" class="LineNr">15680 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15681" class="LineNr">15681 </span> 89/<- %esp 5/r32/ebp +<span id="L15682" class="LineNr">15682 </span> 5d/pop-to-ebp +<span id="L15683" class="LineNr">15683 </span> c3/return +<span id="L15684" class="LineNr">15684 </span> +<span id="L15685" class="LineNr">15685 </span><span class="subxFunction">get-stmt-operand-from-arg-location</span>: <span class="subxComment"># stmt: (addr stmt), l: arg-location, err: (addr buffered-file), ed: (addr exit-descriptor) -> var/eax: (addr stmt-var)</span> +<span id="L15686" class="LineNr">15686 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15687" class="LineNr">15687 </span> 55/push-ebp +<span id="L15688" class="LineNr">15688 </span> 89/<- %ebp 4/r32/esp +<span id="L15689" class="LineNr">15689 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15690" class="LineNr">15690 </span> 51/push-ecx +<span id="L15691" class="LineNr">15691 </span> <span class="subxComment"># eax = l</span> +<span id="L15692" class="LineNr">15692 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L15693" class="LineNr">15693 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L15694" class="LineNr">15694 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L15695" class="LineNr">15695 </span> <span class="subxComment"># if (l == 1) return stmt->inouts</span> +<span id="L15696" class="LineNr">15696 </span> { +<span id="L15697" class="LineNr">15697 </span> 3d/compare-eax-and 1/imm32 +<span id="L15698" class="LineNr">15698 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L15699" class="LineNr">15699 </span><span class="Constant">$get-stmt-operand-from-arg-location:1</span>: +<span id="L15700" class="LineNr">15700 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L15701" class="LineNr">15701 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 +<span id="L15702" class="LineNr">15702 </span> } +<span id="L15703" class="LineNr">15703 </span> <span class="subxComment"># if (l == 2) return stmt->inouts->next</span> +<span id="L15704" class="LineNr">15704 </span> { +<span id="L15705" class="LineNr">15705 </span> 3d/compare-eax-and 2/imm32 +<span id="L15706" class="LineNr">15706 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L15707" class="LineNr">15707 </span><span class="Constant">$get-stmt-operand-from-arg-location:2</span>: +<span id="L15708" class="LineNr">15708 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L15709" class="LineNr">15709 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L15710" class="LineNr">15710 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 +<span id="L15711" class="LineNr">15711 </span> } +<span id="L15712" class="LineNr">15712 </span> <span class="subxComment"># if (l == 3) return stmt->outputs</span> +<span id="L15713" class="LineNr">15713 </span> { +<span id="L15714" class="LineNr">15714 </span> 3d/compare-eax-and 3/imm32 +<span id="L15715" class="LineNr">15715 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L15716" class="LineNr">15716 </span><span class="Constant">$get-stmt-operand-from-arg-location:3</span>: +<span id="L15717" class="LineNr">15717 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L15718" class="LineNr">15718 </span> eb/jump $get-stmt-operand-from-arg-location:end/disp8 +<span id="L15719" class="LineNr">15719 </span> } +<span id="L15720" class="LineNr">15720 </span> <span class="subxComment"># abort</span> +<span id="L15721" class="LineNr">15721 </span> e9/jump $get-stmt-operand-from-arg-location:abort/disp32 +<span id="L15722" class="LineNr">15722 </span><span class="Constant">$get-stmt-operand-from-arg-location:end</span>: +<span id="L15723" class="LineNr">15723 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15724" class="LineNr">15724 </span> 59/pop-to-ecx +<span id="L15725" class="LineNr">15725 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15726" class="LineNr">15726 </span> 89/<- %esp 5/r32/ebp +<span id="L15727" class="LineNr">15727 </span> 5d/pop-to-ebp +<span id="L15728" class="LineNr">15728 </span> c3/return +<span id="L15729" class="LineNr">15729 </span> +<span id="L15730" class="LineNr">15730 </span><span class="Constant">$get-stmt-operand-from-arg-location:abort</span>: +<span id="L15731" class="LineNr">15731 </span> <span class="subxComment"># error("invalid arg-location " eax)</span> +<span id="L15732" class="LineNr">15732 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="Constant">"invalid arg-location "</span>) +<span id="L15733" class="LineNr">15733 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+0x10) %eax) +<span id="L15734" class="LineNr">15734 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+0x10) <span class="SpecialChar"><a href='../051test.subx.html#L82'>Newline</a></span>) +<span id="L15735" class="LineNr">15735 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> *(ebp+0x10)) +<span id="L15736" class="LineNr">15736 </span> (<a href='../059stop.subx.html#L92'>stop</a> *(ebp+0x14) 1) +<span id="L15737" class="LineNr">15737 </span> <span class="subxComment"># never gets here</span> +<span id="L15738" class="LineNr">15738 </span> +<span id="L15739" class="LineNr">15739 </span><span class="subxFunction">emit-subx-r32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt)</span> +<span id="L15740" class="LineNr">15740 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15741" class="LineNr">15741 </span> 55/push-ebp +<span id="L15742" class="LineNr">15742 </span> 89/<- %ebp 4/r32/esp +<span id="L15743" class="LineNr">15743 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15744" class="LineNr">15744 </span> 50/push-eax +<span id="L15745" class="LineNr">15745 </span> 51/push-ecx +<span id="L15746" class="LineNr">15746 </span> <span class="subxComment"># if (l == 0) return</span> +<span id="L15747" class="LineNr">15747 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 +<span id="L15748" class="LineNr">15748 </span> 0f 84/jump-if-= $emit-subx-r32:end/disp32 +<span id="L15749" class="LineNr">15749 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> +<span id="L15750" class="LineNr">15750 </span> (<a href='mu.subx.html#L15685'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L15751" class="LineNr">15751 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L15752" class="LineNr">15752 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+0x18) *(eax+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L15753" class="LineNr">15753 </span> (<a href='../081table.subx.html#L1800'>maybe-get</a> <span class="SpecialChar"><a href='mu.subx.html#L7987'>Mu-registers</a></span> %eax 0xc) <span class="subxComment"># => eax: (addr register-index)</span> +<span id="L15754" class="LineNr">15754 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L15755" class="LineNr">15755 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *eax) +<span id="L15756" class="LineNr">15756 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/r32"</span>) +<span id="L15757" class="LineNr">15757 </span><span class="Constant">$emit-subx-r32:end</span>: +<span id="L15758" class="LineNr">15758 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15759" class="LineNr">15759 </span> 59/pop-to-ecx +<span id="L15760" class="LineNr">15760 </span> 58/pop-to-eax +<span id="L15761" class="LineNr">15761 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15762" class="LineNr">15762 </span> 89/<- %esp 5/r32/ebp +<span id="L15763" class="LineNr">15763 </span> 5d/pop-to-ebp +<span id="L15764" class="LineNr">15764 </span> c3/return +<span id="L15765" class="LineNr">15765 </span> +<span id="L15766" class="LineNr">15766 </span><span class="subxFunction">emit-subx-imm32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt)</span> +<span id="L15767" class="LineNr">15767 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15768" class="LineNr">15768 </span> 55/push-ebp +<span id="L15769" class="LineNr">15769 </span> 89/<- %ebp 4/r32/esp +<span id="L15770" class="LineNr">15770 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15771" class="LineNr">15771 </span> 50/push-eax +<span id="L15772" class="LineNr">15772 </span> 51/push-ecx +<span id="L15773" class="LineNr">15773 </span> <span class="subxComment"># if (l == 0) return</span> +<span id="L15774" class="LineNr">15774 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 +<span id="L15775" class="LineNr">15775 </span> 0f 84/jump-if-= $emit-subx-imm32:end/disp32 +<span id="L15776" class="LineNr">15776 </span> <span class="subxComment"># var v/eax: (handle var)</span> +<span id="L15777" class="LineNr">15777 </span> (<a href='mu.subx.html#L15685'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc)) <span class="subxComment"># => eax</span> +<span id="L15778" class="LineNr">15778 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L15779" class="LineNr">15779 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L15780" class="LineNr">15780 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L15781" class="LineNr">15781 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L15782" class="LineNr">15782 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/imm32"</span>) +<span id="L15783" class="LineNr">15783 </span><span class="Constant">$emit-subx-imm32:end</span>: +<span id="L15784" class="LineNr">15784 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15785" class="LineNr">15785 </span> 59/pop-to-ecx +<span id="L15786" class="LineNr">15786 </span> 58/pop-to-eax +<span id="L15787" class="LineNr">15787 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15788" class="LineNr">15788 </span> 89/<- %esp 5/r32/ebp +<span id="L15789" class="LineNr">15789 </span> 5d/pop-to-ebp +<span id="L15790" class="LineNr">15790 </span> c3/return +<span id="L15791" class="LineNr">15791 </span> +<span id="L15792" class="LineNr">15792 </span><span class="subxFunction">emit-subx-disp32</span>: <span class="subxComment"># out: (addr buffered-file), l: arg-location, stmt: (addr stmt), err: (addr buffered-file), ed: (addr exit-descriptor)</span> +<span id="L15793" class="LineNr">15793 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15794" class="LineNr">15794 </span> 55/push-ebp +<span id="L15795" class="LineNr">15795 </span> 89/<- %ebp 4/r32/esp +<span id="L15796" class="LineNr">15796 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15797" class="LineNr">15797 </span> 50/push-eax +<span id="L15798" class="LineNr">15798 </span> 51/push-ecx +<span id="L15799" class="LineNr">15799 </span> <span class="subxComment"># if (location == 0) return</span> +<span id="L15800" class="LineNr">15800 </span> 81 7/subop/compare *(ebp+0xc) 0/imm32 +<span id="L15801" class="LineNr">15801 </span> 0f 84/jump-if-= $emit-subx-disp32:end/disp32 +<span id="L15802" class="LineNr">15802 </span> <span class="subxComment"># var v/eax: (addr stmt-var)</span> +<span id="L15803" class="LineNr">15803 </span> (<a href='mu.subx.html#L15685'>get-stmt-operand-from-arg-location</a> *(ebp+0x10) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18)) <span class="subxComment"># => eax</span> +<span id="L15804" class="LineNr">15804 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L15805" class="LineNr">15805 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L15806" class="LineNr">15806 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L15807" class="LineNr">15807 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L15808" class="LineNr">15808 </span> <span class="subxComment"># hack: if instruction operation starts with "break", emit ":break"</span> +<span id="L15809" class="LineNr">15809 </span> <span class="subxComment"># var name/ecx: (addr array byte) = lookup(stmt->operation)</span> +<span id="L15810" class="LineNr">15810 </span> 8b/-> *(ebp+0x10) 0/r32/eax +<span id="L15811" class="LineNr">15811 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L15812" class="LineNr">15812 </span> 89/<- %ecx 0/r32/eax +<span id="L15813" class="LineNr">15813 </span> { +<span id="L15814" class="LineNr">15814 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"break"</span>) <span class="subxComment"># => eax</span> +<span id="L15815" class="LineNr">15815 </span> 3d/compare-eax-and 0/imm32/false +<span id="L15816" class="LineNr">15816 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15817" class="LineNr">15817 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":break"</span>) +<span id="L15818" class="LineNr">15818 </span> } +<span id="L15819" class="LineNr">15819 </span> <span class="subxComment"># hack: if instruction operation starts with "loop", emit ":loop"</span> +<span id="L15820" class="LineNr">15820 </span> { +<span id="L15821" class="LineNr">15821 </span> (<a href='../054string-equal.subx.html#L57'>string-starts-with?</a> %ecx <span class="Constant">"loop"</span>) <span class="subxComment"># => eax</span> +<span id="L15822" class="LineNr">15822 </span> 3d/compare-eax-and 0/imm32/false +<span id="L15823" class="LineNr">15823 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15824" class="LineNr">15824 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">":loop"</span>) +<span id="L15825" class="LineNr">15825 </span> } +<span id="L15826" class="LineNr">15826 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"/disp32"</span>) +<span id="L15827" class="LineNr">15827 </span><span class="Constant">$emit-subx-disp32:end</span>: +<span id="L15828" class="LineNr">15828 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15829" class="LineNr">15829 </span> 59/pop-to-ecx +<span id="L15830" class="LineNr">15830 </span> 58/pop-to-eax +<span id="L15831" class="LineNr">15831 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15832" class="LineNr">15832 </span> 89/<- %esp 5/r32/ebp +<span id="L15833" class="LineNr">15833 </span> 5d/pop-to-ebp +<span id="L15834" class="LineNr">15834 </span> c3/return +<span id="L15835" class="LineNr">15835 </span> +<span id="L15836" class="LineNr">15836 </span><span class="subxFunction">emit-call</span>: <span class="subxComment"># out: (addr buffered-file), stmt: (addr stmt)</span> +<span id="L15837" class="LineNr">15837 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15838" class="LineNr">15838 </span> 55/push-ebp +<span id="L15839" class="LineNr">15839 </span> 89/<- %ebp 4/r32/esp +<span id="L15840" class="LineNr">15840 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15841" class="LineNr">15841 </span> 50/push-eax +<span id="L15842" class="LineNr">15842 </span> 51/push-ecx +<span id="L15843" class="LineNr">15843 </span> <span class="subxComment">#</span> +<span id="L15844" class="LineNr">15844 </span> (<a href='mu.subx.html#L18671'>emit-indent</a> *(ebp+8) *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span>) +<span id="L15845" class="LineNr">15845 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"("</span>) +<span id="L15846" class="LineNr">15846 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L15847" class="LineNr">15847 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L15848" class="LineNr">15848 </span> <span class="subxH1Comment"># - emit function name</span> +<span id="L15849" class="LineNr">15849 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L15850" class="LineNr">15850 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L15851" class="LineNr">15851 </span> <span class="subxH1Comment"># - emit arguments</span> +<span id="L15852" class="LineNr">15852 </span> <span class="subxComment"># var curr/eax: (addr stmt-var) = lookup(stmt->inouts)</span> +<span id="L15853" class="LineNr">15853 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L15854" class="LineNr">15854 </span> { +<span id="L15855" class="LineNr">15855 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L15856" class="LineNr">15856 </span> 3d/compare-eax-and 0/imm32 +<span id="L15857" class="LineNr">15857 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15858" class="LineNr">15858 </span> <span class="subxComment">#</span> +<span id="L15859" class="LineNr">15859 </span> (<a href='mu.subx.html#L15875'>emit-subx-call-operand</a> *(ebp+8) %eax) +<span id="L15860" class="LineNr">15860 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L15861" class="LineNr">15861 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+8) *(eax+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L15862" class="LineNr">15862 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L15863" class="LineNr">15863 </span> } +<span id="L15864" class="LineNr">15864 </span> <span class="subxComment">#</span> +<span id="L15865" class="LineNr">15865 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")\n"</span>) +<span id="L15866" class="LineNr">15866 </span><span class="Constant">$emit-call:end</span>: +<span id="L15867" class="LineNr">15867 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15868" class="LineNr">15868 </span> 59/pop-to-ecx +<span id="L15869" class="LineNr">15869 </span> 58/pop-to-eax +<span id="L15870" class="LineNr">15870 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15871" class="LineNr">15871 </span> 89/<- %esp 5/r32/ebp +<span id="L15872" class="LineNr">15872 </span> 5d/pop-to-ebp +<span id="L15873" class="LineNr">15873 </span> c3/return +<span id="L15874" class="LineNr">15874 </span> +<span id="L15875" class="LineNr">15875 </span><span class="subxFunction">emit-subx-call-operand</span>: <span class="subxComment"># out: (addr buffered-file), s: (addr stmt-var)</span> +<span id="L15876" class="LineNr">15876 </span> <span class="subxComment"># shares code with emit-subx-var-as-rm32</span> +<span id="L15877" class="LineNr">15877 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15878" class="LineNr">15878 </span> 55/push-ebp +<span id="L15879" class="LineNr">15879 </span> 89/<- %ebp 4/r32/esp +<span id="L15880" class="LineNr">15880 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15881" class="LineNr">15881 </span> 50/push-eax +<span id="L15882" class="LineNr">15882 </span> 51/push-ecx +<span id="L15883" class="LineNr">15883 </span> 56/push-esi +<span id="L15884" class="LineNr">15884 </span> <span class="subxComment"># ecx = s</span> +<span id="L15885" class="LineNr">15885 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L15886" class="LineNr">15886 </span> <span class="subxComment"># var operand/esi: (addr var) = lookup(s->value)</span> +<span id="L15887" class="LineNr">15887 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L15888" class="LineNr">15888 </span> 89/<- %esi 0/r32/eax +<span id="L15889" class="LineNr">15889 </span> <span class="subxComment"># if (operand->register && !s->is-deref?) emit "%__"</span> +<span id="L15890" class="LineNr">15890 </span> { +<span id="L15891" class="LineNr">15891 </span><span class="Constant">$emit-subx-call-operand:check-for-register-direct</span>: +<span id="L15892" class="LineNr">15892 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L15893" class="LineNr">15893 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15894" class="LineNr">15894 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> <span id="L15895" class="LineNr">15895 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L15896" class="LineNr">15896 </span><span class="Constant">$emit-subx-call-operand:literal</span>: -<span id="L15897" class="LineNr">15897 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L15898" class="LineNr">15898 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L15896" class="LineNr">15896 </span><span class="Constant">$emit-subx-call-operand:register-direct</span>: +<span id="L15897" class="LineNr">15897 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" %"</span>) +<span id="L15898" class="LineNr">15898 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> <span id="L15899" class="LineNr">15899 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L15900" class="LineNr">15900 </span> } -<span id="L15901" class="LineNr">15901 </span><span class="Constant">$emit-subx-call-operand:end</span>: -<span id="L15902" class="LineNr">15902 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15903" class="LineNr">15903 </span> 5e/pop-to-esi -<span id="L15904" class="LineNr">15904 </span> 59/pop-to-ecx -<span id="L15905" class="LineNr">15905 </span> 58/pop-to-eax -<span id="L15906" class="LineNr">15906 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15907" class="LineNr">15907 </span> 89/<- %esp 5/r32/ebp -<span id="L15908" class="LineNr">15908 </span> 5d/pop-to-ebp -<span id="L15909" class="LineNr">15909 </span> c3/return -<span id="L15910" class="LineNr">15910 </span> -<span id="L15911" class="LineNr">15911 </span><span class="subxFunction">emit-subx-call-operand-register-indirect</span>: <span class="subxComment"># out: (addr buffered-file), v: (addr var)</span> -<span id="L15912" class="LineNr">15912 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15913" class="LineNr">15913 </span> 55/push-ebp -<span id="L15914" class="LineNr">15914 </span> 89/<- %ebp 4/r32/esp -<span id="L15915" class="LineNr">15915 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15916" class="LineNr">15916 </span> 50/push-eax -<span id="L15917" class="LineNr">15917 </span> 51/push-ecx -<span id="L15918" class="LineNr">15918 </span> 56/push-esi -<span id="L15919" class="LineNr">15919 </span> <span class="subxComment"># esi = v</span> -<span id="L15920" class="LineNr">15920 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L15921" class="LineNr">15921 </span> <span class="subxComment"># var size/ecx: int = size-of-deref(v)</span> -<span id="L15922" class="LineNr">15922 </span> (<a href='mu.subx.html#L10170'>size-of-deref</a> %esi) <span class="subxComment"># => eax</span> -<span id="L15923" class="LineNr">15923 </span> 89/<- %ecx 0/r32/eax -<span id="L15924" class="LineNr">15924 </span> <span class="subxComment"># var reg-name/esi: (addr array byte) = lookup(v->register)</span> -<span id="L15925" class="LineNr">15925 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L15926" class="LineNr">15926 </span> 89/<- %esi 0/r32/eax -<span id="L15927" class="LineNr">15927 </span> <span class="subxComment"># TODO: assert size is a multiple of 4</span> -<span id="L15928" class="LineNr">15928 </span> <span class="subxComment"># var i/eax: int = 0</span> -<span id="L15929" class="LineNr">15929 </span> b8/copy-to-eax 0/imm32 -<span id="L15930" class="LineNr">15930 </span> { -<span id="L15931" class="LineNr">15931 </span><span class="Constant">$emit-subx-call-operand-register-indirect:loop</span>: -<span id="L15932" class="LineNr">15932 </span> <span class="subxComment"># if (i >= size) break</span> -<span id="L15933" class="LineNr">15933 </span> 39/compare %eax 1/r32/ecx -<span id="L15934" class="LineNr">15934 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 -<span id="L15935" class="LineNr">15935 </span> <span class="subxComment"># emit " *(" v->register "+" i ")"</span> -<span id="L15936" class="LineNr">15936 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *("</span>) -<span id="L15937" class="LineNr">15937 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %esi) -<span id="L15938" class="LineNr">15938 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"+"</span>) -<span id="L15939" class="LineNr">15939 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) -<span id="L15940" class="LineNr">15940 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) -<span id="L15941" class="LineNr">15941 </span> <span class="subxComment"># i += 4</span> -<span id="L15942" class="LineNr">15942 </span> 05/add-to-eax 4/imm32 -<span id="L15943" class="LineNr">15943 </span> <span class="subxComment">#</span> -<span id="L15944" class="LineNr">15944 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L15945" class="LineNr">15945 </span> } -<span id="L15946" class="LineNr">15946 </span><span class="Constant">$emit-subx-call-operand-register-indirect:end</span>: -<span id="L15947" class="LineNr">15947 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15948" class="LineNr">15948 </span> 5e/pop-to-esi -<span id="L15949" class="LineNr">15949 </span> 59/pop-to-ecx -<span id="L15950" class="LineNr">15950 </span> 58/pop-to-eax -<span id="L15951" class="LineNr">15951 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15952" class="LineNr">15952 </span> 89/<- %esp 5/r32/ebp -<span id="L15953" class="LineNr">15953 </span> 5d/pop-to-ebp -<span id="L15954" class="LineNr">15954 </span> c3/return -<span id="L15955" class="LineNr">15955 </span> -<span id="L15956" class="LineNr">15956 </span><span class="subxFunction">emit-subx-call-operand-stack</span>: <span class="subxComment"># out: (addr buffered-file), v: (addr var)</span> -<span id="L15957" class="LineNr">15957 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15958" class="LineNr">15958 </span> 55/push-ebp -<span id="L15959" class="LineNr">15959 </span> 89/<- %ebp 4/r32/esp -<span id="L15960" class="LineNr">15960 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L15961" class="LineNr">15961 </span> 50/push-eax -<span id="L15962" class="LineNr">15962 </span> 51/push-ecx -<span id="L15963" class="LineNr">15963 </span> 56/push-esi -<span id="L15964" class="LineNr">15964 </span> <span class="subxComment"># esi = v</span> -<span id="L15965" class="LineNr">15965 </span> 8b/-> *(ebp+0xc) 6/r32/esi -<span id="L15966" class="LineNr">15966 </span> <span class="subxComment"># var curr/ecx: int = v->offset</span> -<span id="L15967" class="LineNr">15967 </span> 8b/-> *(esi+0x14) 1/r32/ecx <span class="subxComment"># Var-offset</span> -<span id="L15968" class="LineNr">15968 </span> <span class="subxComment"># var max/eax: int = v->offset + size-of(v)</span> -<span id="L15969" class="LineNr">15969 </span> (<a href='mu.subx.html#L10128'>size-of</a> %esi) <span class="subxComment"># => eax</span> -<span id="L15970" class="LineNr">15970 </span> <span class="subxComment"># TODO: assert size is a multiple of 4</span> -<span id="L15971" class="LineNr">15971 </span> 01/add-to %eax 1/r32/ecx -<span id="L15972" class="LineNr">15972 </span> { -<span id="L15973" class="LineNr">15973 </span><span class="Constant">$emit-subx-call-operand-stack:loop</span>: -<span id="L15974" class="LineNr">15974 </span> <span class="subxComment"># if (curr >= max) break</span> -<span id="L15975" class="LineNr">15975 </span> 39/compare %ecx 0/r32/eax -<span id="L15976" class="LineNr">15976 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 -<span id="L15977" class="LineNr">15977 </span> <span class="subxComment"># emit " *(ebp+" curr ")"</span> -<span id="L15978" class="LineNr">15978 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *(ebp+"</span>) -<span id="L15979" class="LineNr">15979 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %ecx) -<span id="L15980" class="LineNr">15980 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) -<span id="L15981" class="LineNr">15981 </span> <span class="subxComment"># i += 4</span> -<span id="L15982" class="LineNr">15982 </span> 81 0/subop/add %ecx 4/imm32 -<span id="L15983" class="LineNr">15983 </span> <span class="subxComment">#</span> -<span id="L15984" class="LineNr">15984 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L15985" class="LineNr">15985 </span> } -<span id="L15986" class="LineNr">15986 </span><span class="Constant">$emit-subx-call-operand-stack:end</span>: -<span id="L15987" class="LineNr">15987 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L15988" class="LineNr">15988 </span> 5e/pop-to-esi -<span id="L15989" class="LineNr">15989 </span> 59/pop-to-ecx -<span id="L15990" class="LineNr">15990 </span> 58/pop-to-eax -<span id="L15991" class="LineNr">15991 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L15992" class="LineNr">15992 </span> 89/<- %esp 5/r32/ebp -<span id="L15993" class="LineNr">15993 </span> 5d/pop-to-ebp -<span id="L15994" class="LineNr">15994 </span> c3/return -<span id="L15995" class="LineNr">15995 </span> -<span id="L15996" class="LineNr">15996 </span><span class="subxFunction">emit-subx-var-as-rm32</span>: <span class="subxComment"># out: (addr buffered-file), s: (addr stmt-var)</span> -<span id="L15997" class="LineNr">15997 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L15998" class="LineNr">15998 </span> 55/push-ebp -<span id="L15999" class="LineNr">15999 </span> 89/<- %ebp 4/r32/esp -<span id="L16000" class="LineNr">16000 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16001" class="LineNr">16001 </span> 50/push-eax -<span id="L16002" class="LineNr">16002 </span> 51/push-ecx -<span id="L16003" class="LineNr">16003 </span> 56/push-esi -<span id="L16004" class="LineNr">16004 </span> <span class="subxComment"># ecx = s</span> -<span id="L16005" class="LineNr">16005 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L16006" class="LineNr">16006 </span> <span class="subxComment"># var operand/esi: (addr var) = lookup(s->value)</span> -<span id="L16007" class="LineNr">16007 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L16008" class="LineNr">16008 </span> 89/<- %esi 0/r32/eax -<span id="L16009" class="LineNr">16009 </span> <span class="subxComment"># if (operand->register && s->is-deref?) emit "*__"</span> -<span id="L16010" class="LineNr">16010 </span> { -<span id="L16011" class="LineNr">16011 </span><span class="Constant">$emit-subx-var-as-rm32:check-for-register-indirect</span>: -<span id="L16012" class="LineNr">16012 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16013" class="LineNr">16013 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16014" class="LineNr">16014 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L16015" class="LineNr">16015 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16016" class="LineNr">16016 </span><span class="Constant">$emit-subx-var-as-rm32:register-indirect</span>: -<span id="L16017" class="LineNr">16017 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *"</span>) -<span id="L16018" class="LineNr">16018 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L16019" class="LineNr">16019 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L16020" class="LineNr">16020 </span> e9/jump $emit-subx-var-as-rm32:end/disp32 -<span id="L16021" class="LineNr">16021 </span> } -<span id="L16022" class="LineNr">16022 </span> <span class="subxComment"># if (operand->register && !s->is-deref?) emit "%__"</span> -<span id="L16023" class="LineNr">16023 </span> { -<span id="L16024" class="LineNr">16024 </span><span class="Constant">$emit-subx-var-as-rm32:check-for-register-direct</span>: -<span id="L16025" class="LineNr">16025 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16026" class="LineNr">16026 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16027" class="LineNr">16027 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L16028" class="LineNr">16028 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16029" class="LineNr">16029 </span><span class="Constant">$emit-subx-var-as-rm32:register-direct</span>: -<span id="L16030" class="LineNr">16030 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" %"</span>) -<span id="L16031" class="LineNr">16031 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L16032" class="LineNr">16032 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) -<span id="L16033" class="LineNr">16033 </span> e9/jump $emit-subx-var-as-rm32:end/disp32 -<span id="L16034" class="LineNr">16034 </span> } -<span id="L16035" class="LineNr">16035 </span> <span class="subxComment"># else if (operand->stack-offset) emit "*(ebp+__)"</span> -<span id="L16036" class="LineNr">16036 </span> { -<span id="L16037" class="LineNr">16037 </span> 81 7/subop/compare *(esi+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> -<span id="L16038" class="LineNr">16038 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16039" class="LineNr">16039 </span><span class="Constant">$emit-subx-var-as-rm32:stack</span>: -<span id="L16040" class="LineNr">16040 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) -<span id="L16041" class="LineNr">16041 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*(ebp+"</span>) -<span id="L16042" class="LineNr">16042 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *(esi+0x14)) <span class="subxComment"># Var-offset</span> -<span id="L16043" class="LineNr">16043 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) -<span id="L16044" class="LineNr">16044 </span> } -<span id="L16045" class="LineNr">16045 </span><span class="Constant">$emit-subx-var-as-rm32:end</span>: -<span id="L16046" class="LineNr">16046 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16047" class="LineNr">16047 </span> 5e/pop-to-esi -<span id="L16048" class="LineNr">16048 </span> 59/pop-to-ecx -<span id="L16049" class="LineNr">16049 </span> 58/pop-to-eax -<span id="L16050" class="LineNr">16050 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16051" class="LineNr">16051 </span> 89/<- %esp 5/r32/ebp -<span id="L16052" class="LineNr">16052 </span> 5d/pop-to-ebp -<span id="L16053" class="LineNr">16053 </span> c3/return -<span id="L16054" class="LineNr">16054 </span> -<span id="L16055" class="LineNr">16055 </span><span class="subxFunction">find-matching-primitive</span>: <span class="subxComment"># primitives: (addr primitive), stmt: (addr stmt) -> result/eax: (addr primitive)</span> -<span id="L16056" class="LineNr">16056 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16057" class="LineNr">16057 </span> 55/push-ebp -<span id="L16058" class="LineNr">16058 </span> 89/<- %ebp 4/r32/esp -<span id="L16059" class="LineNr">16059 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16060" class="LineNr">16060 </span> 51/push-ecx -<span id="L16061" class="LineNr">16061 </span> <span class="subxComment"># var curr/ecx: (addr primitive) = primitives</span> -<span id="L16062" class="LineNr">16062 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L16063" class="LineNr">16063 </span> { -<span id="L16064" class="LineNr">16064 </span><span class="Constant">$find-matching-primitive:loop</span>: -<span id="L16065" class="LineNr">16065 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L16066" class="LineNr">16066 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L16067" class="LineNr">16067 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16068" class="LineNr">16068 </span> <span class="subxComment"># if match(curr, stmt) return curr</span> -<span id="L16069" class="LineNr">16069 </span> { -<span id="L16070" class="LineNr">16070 </span> (<a href='mu.subx.html#L16093'>mu-stmt-matches-primitive?</a> *(ebp+0xc) %ecx) <span class="subxComment"># => eax</span> -<span id="L16071" class="LineNr">16071 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16072" class="LineNr">16072 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16073" class="LineNr">16073 </span> 89/<- %eax 1/r32/ecx -<span id="L16074" class="LineNr">16074 </span> eb/jump $find-matching-primitive:end/disp8 -<span id="L16075" class="LineNr">16075 </span> } -<span id="L16076" class="LineNr">16076 </span><span class="Constant">$find-matching-primitive:next-primitive</span>: -<span id="L16077" class="LineNr">16077 </span> <span class="subxComment"># curr = curr->next</span> -<span id="L16078" class="LineNr">16078 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x34) *(ecx+0x38)) <span class="subxComment"># Primitive-next Primitive-next => eax</span> -<span id="L16079" class="LineNr">16079 </span> 89/<- %ecx 0/r32/eax -<span id="L16080" class="LineNr">16080 </span> <span class="subxComment">#</span> -<span id="L16081" class="LineNr">16081 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L16082" class="LineNr">16082 </span> } -<span id="L16083" class="LineNr">16083 </span> <span class="subxComment"># return null</span> -<span id="L16084" class="LineNr">16084 </span> b8/copy-to-eax 0/imm32 -<span id="L16085" class="LineNr">16085 </span><span class="Constant">$find-matching-primitive:end</span>: -<span id="L16086" class="LineNr">16086 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16087" class="LineNr">16087 </span> 59/pop-to-ecx -<span id="L16088" class="LineNr">16088 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16089" class="LineNr">16089 </span> 89/<- %esp 5/r32/ebp -<span id="L16090" class="LineNr">16090 </span> 5d/pop-to-ebp -<span id="L16091" class="LineNr">16091 </span> c3/return -<span id="L16092" class="LineNr">16092 </span> -<span id="L16093" class="LineNr">16093 </span><span class="subxFunction">mu-stmt-matches-primitive?</span>: <span class="subxComment"># stmt: (addr stmt), primitive: (addr primitive) -> result/eax: boolean</span> -<span id="L16094" class="LineNr">16094 </span> <span class="subxComment"># A mu stmt matches a primitive if the name matches, all the inout vars</span> -<span id="L16095" class="LineNr">16095 </span> <span class="subxComment"># match, and all the output vars match.</span> -<span id="L16096" class="LineNr">16096 </span> <span class="subxComment"># Vars match if types match and registers match.</span> -<span id="L16097" class="LineNr">16097 </span> <span class="subxComment"># In addition, a stmt output matches a primitive's output if types match</span> -<span id="L16098" class="LineNr">16098 </span> <span class="subxComment"># and the primitive has a wildcard register.</span> -<span id="L16099" class="LineNr">16099 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16100" class="LineNr">16100 </span> 55/push-ebp -<span id="L16101" class="LineNr">16101 </span> 89/<- %ebp 4/r32/esp -<span id="L16102" class="LineNr">16102 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16103" class="LineNr">16103 </span> 51/push-ecx -<span id="L16104" class="LineNr">16104 </span> 52/push-edx -<span id="L16105" class="LineNr">16105 </span> 53/push-ebx -<span id="L16106" class="LineNr">16106 </span> 56/push-esi -<span id="L16107" class="LineNr">16107 </span> 57/push-edi -<span id="L16108" class="LineNr">16108 </span> <span class="subxComment"># ecx = stmt</span> -<span id="L16109" class="LineNr">16109 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L16110" class="LineNr">16110 </span> <span class="subxComment"># edx = primitive</span> -<span id="L16111" class="LineNr">16111 </span> 8b/-> *(ebp+0xc) 2/r32/edx -<span id="L16112" class="LineNr">16112 </span> { -<span id="L16113" class="LineNr">16113 </span><span class="Constant">$mu-stmt-matches-primitive?:check-name</span>: -<span id="L16114" class="LineNr">16114 </span> <span class="subxComment"># if (primitive->name != stmt->operation) return false</span> -<span id="L16115" class="LineNr">16115 </span> <span class="subxS1Comment"># . var esi: (addr array byte) = lookup(stmt->operation)</span> -<span id="L16116" class="LineNr">16116 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L16117" class="LineNr">16117 </span> 89/<- %esi 0/r32/eax -<span id="L16118" class="LineNr">16118 </span> <span class="subxS1Comment"># . var edi: (addr array byte) = lookup(primitive->name)</span> -<span id="L16119" class="LineNr">16119 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Primitive-name Primitive-name => eax</span> -<span id="L16120" class="LineNr">16120 </span> 89/<- %edi 0/r32/eax -<span id="L16121" class="LineNr">16121 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %esi %edi) <span class="subxComment"># => eax</span> -<span id="L16122" class="LineNr">16122 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16123" class="LineNr">16123 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16124" class="LineNr">16124 </span> b8/copy-to-eax 0/imm32 -<span id="L16125" class="LineNr">16125 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16126" class="LineNr">16126 </span> } -<span id="L16127" class="LineNr">16127 </span> <span class="subxComment"># var curr/esi: (addr stmt-var) = lookup(stmt->inouts)</span> -<span id="L16128" class="LineNr">16128 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> -<span id="L16129" class="LineNr">16129 </span> 89/<- %esi 0/r32/eax -<span id="L16130" class="LineNr">16130 </span> <span class="subxComment"># var curr2/edi: (addr list var) = lookup(primitive->inouts)</span> -<span id="L16131" class="LineNr">16131 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Primitive-inouts Primitive-inouts => eax</span> -<span id="L16132" class="LineNr">16132 </span> 89/<- %edi 0/r32/eax -<span id="L16133" class="LineNr">16133 </span> { -<span id="L16134" class="LineNr">16134 </span><span class="Constant">$mu-stmt-matches-primitive?:inouts-loop</span>: -<span id="L16135" class="LineNr">16135 </span> <span class="subxComment"># if (curr == 0 && curr2 == 0) move on to check outputs</span> -<span id="L16136" class="LineNr">16136 </span> { -<span id="L16137" class="LineNr">16137 </span><span class="Constant">$mu-stmt-matches-primitive?:check-both-inouts-null</span>: -<span id="L16138" class="LineNr">16138 </span> 81 7/subop/compare %esi 0/imm32 -<span id="L16139" class="LineNr">16139 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16140" class="LineNr">16140 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-inout-null</span>: -<span id="L16141" class="LineNr">16141 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L16142" class="LineNr">16142 </span> 0f 84/jump-if-= $mu-stmt-matches-primitive?:check-outputs/disp32 -<span id="L16143" class="LineNr">16143 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-inout-null-and-prim-inout-not-null</span>: -<span id="L16144" class="LineNr">16144 </span> <span class="subxComment"># return false</span> -<span id="L16145" class="LineNr">16145 </span> b8/copy-to-eax 0/imm32/false -<span id="L16146" class="LineNr">16146 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16147" class="LineNr">16147 </span> } -<span id="L16148" class="LineNr">16148 </span> <span class="subxComment"># if (curr2 == 0) return false</span> -<span id="L16149" class="LineNr">16149 </span> { -<span id="L16150" class="LineNr">16150 </span><span class="Constant">$mu-stmt-matches-primitive?:check-prim-inout-null</span>: -<span id="L16151" class="LineNr">16151 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L16152" class="LineNr">16152 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16153" class="LineNr">16153 </span><span class="Constant">$mu-stmt-matches-primitive?:prim-inout-null</span>: -<span id="L16154" class="LineNr">16154 </span> b8/copy-to-eax 0/imm32/false -<span id="L16155" class="LineNr">16155 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16156" class="LineNr">16156 </span> } -<span id="L16157" class="LineNr">16157 </span> <span class="subxComment"># if (curr != curr2) return false</span> -<span id="L16158" class="LineNr">16158 </span> { -<span id="L16159" class="LineNr">16159 </span><span class="Constant">$mu-stmt-matches-primitive?:check-inouts-match</span>: -<span id="L16160" class="LineNr">16160 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L16161" class="LineNr">16161 </span> (<a href='mu.subx.html#L16250'>operand-matches-primitive?</a> %esi %eax) <span class="subxComment"># => eax</span> -<span id="L16162" class="LineNr">16162 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16163" class="LineNr">16163 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16164" class="LineNr">16164 </span><span class="Constant">$mu-stmt-matches-primitive?:inouts-match</span>: -<span id="L16165" class="LineNr">16165 </span> b8/copy-to-eax 0/imm32/false -<span id="L16166" class="LineNr">16166 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16167" class="LineNr">16167 </span> } -<span id="L16168" class="LineNr">16168 </span><span class="Constant">$mu-stmt-matches-primitive?:next-inout</span>: -<span id="L16169" class="LineNr">16169 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L16170" class="LineNr">16170 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L16171" class="LineNr">16171 </span> 89/<- %esi 0/r32/eax -<span id="L16172" class="LineNr">16172 </span> <span class="subxComment"># curr2 = lookup(curr2->next)</span> -<span id="L16173" class="LineNr">16173 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L16174" class="LineNr">16174 </span> 89/<- %edi 0/r32/eax -<span id="L16175" class="LineNr">16175 </span> <span class="subxComment">#</span> -<span id="L16176" class="LineNr">16176 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L16177" class="LineNr">16177 </span> } -<span id="L16178" class="LineNr">16178 </span><span class="Constant">$mu-stmt-matches-primitive?:check-outputs</span>: -<span id="L16179" class="LineNr">16179 </span> <span class="subxComment"># var curr/esi: (addr stmt-var) = lookup(stmt->outputs)</span> -<span id="L16180" class="LineNr">16180 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> -<span id="L16181" class="LineNr">16181 </span> 89/<- %esi 0/r32/eax -<span id="L16182" class="LineNr">16182 </span> <span class="subxComment"># var curr2/edi: (addr list var) = lookup(primitive->outputs)</span> -<span id="L16183" class="LineNr">16183 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x10) *(edx+0x14)) <span class="subxComment"># Primitive-outputs Primitive-outputs => eax</span> -<span id="L16184" class="LineNr">16184 </span> 89/<- %edi 0/r32/eax -<span id="L16185" class="LineNr">16185 </span> { -<span id="L16186" class="LineNr">16186 </span><span class="Constant">$mu-stmt-matches-primitive?:outputs-loop</span>: -<span id="L16187" class="LineNr">16187 </span> <span class="subxComment"># if (curr == 0) return (curr2 == 0)</span> +<span id="L15900" class="LineNr">15900 </span> e9/jump $emit-subx-call-operand:end/disp32 +<span id="L15901" class="LineNr">15901 </span> } +<span id="L15902" class="LineNr">15902 </span> <span class="subxComment"># else if (operand->register && s->is-deref?) emit "*__"</span> +<span id="L15903" class="LineNr">15903 </span> { +<span id="L15904" class="LineNr">15904 </span><span class="Constant">$emit-subx-call-operand:check-for-register-indirect</span>: +<span id="L15905" class="LineNr">15905 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L15906" class="LineNr">15906 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15907" class="LineNr">15907 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L15908" class="LineNr">15908 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15909" class="LineNr">15909 </span><span class="Constant">$emit-subx-call-operand:register-indirect</span>: +<span id="L15910" class="LineNr">15910 </span> (<a href='mu.subx.html#L15941'>emit-subx-call-operand-register-indirect</a> *(ebp+8) %esi) +<span id="L15911" class="LineNr">15911 </span> e9/jump $emit-subx-call-operand:end/disp32 +<span id="L15912" class="LineNr">15912 </span> } +<span id="L15913" class="LineNr">15913 </span> <span class="subxComment"># else if (operand->stack-offset) emit "*(ebp+__)"</span> +<span id="L15914" class="LineNr">15914 </span> { +<span id="L15915" class="LineNr">15915 </span> 81 7/subop/compare *(esi+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> +<span id="L15916" class="LineNr">15916 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L15917" class="LineNr">15917 </span><span class="Constant">$emit-subx-call-operand:stack</span>: +<span id="L15918" class="LineNr">15918 </span> (<a href='mu.subx.html#L15986'>emit-subx-call-operand-stack</a> *(ebp+8) %esi) +<span id="L15919" class="LineNr">15919 </span> e9/jump $emit-subx-call-operand:end/disp32 +<span id="L15920" class="LineNr">15920 </span> } +<span id="L15921" class="LineNr">15921 </span> <span class="subxComment"># else if (operand->type == literal) emit "__"</span> +<span id="L15922" class="LineNr">15922 </span> { +<span id="L15923" class="LineNr">15923 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L15924" class="LineNr">15924 </span> 81 7/subop/compare *(eax+4) 0/imm32 <span class="subxComment"># Tree-left</span> +<span id="L15925" class="LineNr">15925 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L15926" class="LineNr">15926 </span><span class="Constant">$emit-subx-call-operand:literal</span>: +<span id="L15927" class="LineNr">15927 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L15928" class="LineNr">15928 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *esi *(esi+4)) <span class="subxComment"># Var-name Var-name => eax</span> +<span id="L15929" class="LineNr">15929 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L15930" class="LineNr">15930 </span> } +<span id="L15931" class="LineNr">15931 </span><span class="Constant">$emit-subx-call-operand:end</span>: +<span id="L15932" class="LineNr">15932 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15933" class="LineNr">15933 </span> 5e/pop-to-esi +<span id="L15934" class="LineNr">15934 </span> 59/pop-to-ecx +<span id="L15935" class="LineNr">15935 </span> 58/pop-to-eax +<span id="L15936" class="LineNr">15936 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15937" class="LineNr">15937 </span> 89/<- %esp 5/r32/ebp +<span id="L15938" class="LineNr">15938 </span> 5d/pop-to-ebp +<span id="L15939" class="LineNr">15939 </span> c3/return +<span id="L15940" class="LineNr">15940 </span> +<span id="L15941" class="LineNr">15941 </span><span class="subxFunction">emit-subx-call-operand-register-indirect</span>: <span class="subxComment"># out: (addr buffered-file), v: (addr var)</span> +<span id="L15942" class="LineNr">15942 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15943" class="LineNr">15943 </span> 55/push-ebp +<span id="L15944" class="LineNr">15944 </span> 89/<- %ebp 4/r32/esp +<span id="L15945" class="LineNr">15945 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15946" class="LineNr">15946 </span> 50/push-eax +<span id="L15947" class="LineNr">15947 </span> 51/push-ecx +<span id="L15948" class="LineNr">15948 </span> 56/push-esi +<span id="L15949" class="LineNr">15949 </span> <span class="subxComment"># esi = v</span> +<span id="L15950" class="LineNr">15950 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L15951" class="LineNr">15951 </span> <span class="subxComment"># var size/ecx: int = size-of-deref(v)</span> +<span id="L15952" class="LineNr">15952 </span> (<a href='mu.subx.html#L10200'>size-of-deref</a> %esi) <span class="subxComment"># => eax</span> +<span id="L15953" class="LineNr">15953 </span> 89/<- %ecx 0/r32/eax +<span id="L15954" class="LineNr">15954 </span> <span class="subxComment"># var reg-name/esi: (addr array byte) = lookup(v->register)</span> +<span id="L15955" class="LineNr">15955 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L15956" class="LineNr">15956 </span> 89/<- %esi 0/r32/eax +<span id="L15957" class="LineNr">15957 </span> <span class="subxComment"># TODO: assert size is a multiple of 4</span> +<span id="L15958" class="LineNr">15958 </span> <span class="subxComment"># var i/eax: int = 0</span> +<span id="L15959" class="LineNr">15959 </span> b8/copy-to-eax 0/imm32 +<span id="L15960" class="LineNr">15960 </span> { +<span id="L15961" class="LineNr">15961 </span><span class="Constant">$emit-subx-call-operand-register-indirect:loop</span>: +<span id="L15962" class="LineNr">15962 </span> <span class="subxComment"># if (i >= size) break</span> +<span id="L15963" class="LineNr">15963 </span> 39/compare %eax 1/r32/ecx +<span id="L15964" class="LineNr">15964 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 +<span id="L15965" class="LineNr">15965 </span> <span class="subxComment"># emit " *(" v->register "+" i ")"</span> +<span id="L15966" class="LineNr">15966 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *("</span>) +<span id="L15967" class="LineNr">15967 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %esi) +<span id="L15968" class="LineNr">15968 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"+"</span>) +<span id="L15969" class="LineNr">15969 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %eax) +<span id="L15970" class="LineNr">15970 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) +<span id="L15971" class="LineNr">15971 </span> <span class="subxComment"># i += 4</span> +<span id="L15972" class="LineNr">15972 </span> 05/add-to-eax 4/imm32 +<span id="L15973" class="LineNr">15973 </span> <span class="subxComment">#</span> +<span id="L15974" class="LineNr">15974 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L15975" class="LineNr">15975 </span> } +<span id="L15976" class="LineNr">15976 </span><span class="Constant">$emit-subx-call-operand-register-indirect:end</span>: +<span id="L15977" class="LineNr">15977 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L15978" class="LineNr">15978 </span> 5e/pop-to-esi +<span id="L15979" class="LineNr">15979 </span> 59/pop-to-ecx +<span id="L15980" class="LineNr">15980 </span> 58/pop-to-eax +<span id="L15981" class="LineNr">15981 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L15982" class="LineNr">15982 </span> 89/<- %esp 5/r32/ebp +<span id="L15983" class="LineNr">15983 </span> 5d/pop-to-ebp +<span id="L15984" class="LineNr">15984 </span> c3/return +<span id="L15985" class="LineNr">15985 </span> +<span id="L15986" class="LineNr">15986 </span><span class="subxFunction">emit-subx-call-operand-stack</span>: <span class="subxComment"># out: (addr buffered-file), v: (addr var)</span> +<span id="L15987" class="LineNr">15987 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L15988" class="LineNr">15988 </span> 55/push-ebp +<span id="L15989" class="LineNr">15989 </span> 89/<- %ebp 4/r32/esp +<span id="L15990" class="LineNr">15990 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L15991" class="LineNr">15991 </span> 50/push-eax +<span id="L15992" class="LineNr">15992 </span> 51/push-ecx +<span id="L15993" class="LineNr">15993 </span> 56/push-esi +<span id="L15994" class="LineNr">15994 </span> <span class="subxComment"># esi = v</span> +<span id="L15995" class="LineNr">15995 </span> 8b/-> *(ebp+0xc) 6/r32/esi +<span id="L15996" class="LineNr">15996 </span> <span class="subxComment"># var curr/ecx: int = v->offset</span> +<span id="L15997" class="LineNr">15997 </span> 8b/-> *(esi+0x14) 1/r32/ecx <span class="subxComment"># Var-offset</span> +<span id="L15998" class="LineNr">15998 </span> <span class="subxComment"># var max/eax: int = v->offset + size-of(v)</span> +<span id="L15999" class="LineNr">15999 </span> (<a href='mu.subx.html#L10158'>size-of</a> %esi) <span class="subxComment"># => eax</span> +<span id="L16000" class="LineNr">16000 </span> <span class="subxComment"># TODO: assert size is a multiple of 4</span> +<span id="L16001" class="LineNr">16001 </span> 01/add-to %eax 1/r32/ecx +<span id="L16002" class="LineNr">16002 </span> { +<span id="L16003" class="LineNr">16003 </span><span class="Constant">$emit-subx-call-operand-stack:loop</span>: +<span id="L16004" class="LineNr">16004 </span> <span class="subxComment"># if (curr >= max) break</span> +<span id="L16005" class="LineNr">16005 </span> 39/compare %ecx 0/r32/eax +<span id="L16006" class="LineNr">16006 </span> 7d/jump-if->= <span class="Constant">break</span>/disp8 +<span id="L16007" class="LineNr">16007 </span> <span class="subxComment"># emit " *(ebp+" curr ")"</span> +<span id="L16008" class="LineNr">16008 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *(ebp+"</span>) +<span id="L16009" class="LineNr">16009 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) %ecx) +<span id="L16010" class="LineNr">16010 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) +<span id="L16011" class="LineNr">16011 </span> <span class="subxComment"># i += 4</span> +<span id="L16012" class="LineNr">16012 </span> 81 0/subop/add %ecx 4/imm32 +<span id="L16013" class="LineNr">16013 </span> <span class="subxComment">#</span> +<span id="L16014" class="LineNr">16014 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L16015" class="LineNr">16015 </span> } +<span id="L16016" class="LineNr">16016 </span><span class="Constant">$emit-subx-call-operand-stack:end</span>: +<span id="L16017" class="LineNr">16017 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16018" class="LineNr">16018 </span> 5e/pop-to-esi +<span id="L16019" class="LineNr">16019 </span> 59/pop-to-ecx +<span id="L16020" class="LineNr">16020 </span> 58/pop-to-eax +<span id="L16021" class="LineNr">16021 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16022" class="LineNr">16022 </span> 89/<- %esp 5/r32/ebp +<span id="L16023" class="LineNr">16023 </span> 5d/pop-to-ebp +<span id="L16024" class="LineNr">16024 </span> c3/return +<span id="L16025" class="LineNr">16025 </span> +<span id="L16026" class="LineNr">16026 </span><span class="subxFunction">emit-subx-var-as-rm32</span>: <span class="subxComment"># out: (addr buffered-file), s: (addr stmt-var)</span> +<span id="L16027" class="LineNr">16027 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16028" class="LineNr">16028 </span> 55/push-ebp +<span id="L16029" class="LineNr">16029 </span> 89/<- %ebp 4/r32/esp +<span id="L16030" class="LineNr">16030 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16031" class="LineNr">16031 </span> 50/push-eax +<span id="L16032" class="LineNr">16032 </span> 51/push-ecx +<span id="L16033" class="LineNr">16033 </span> 56/push-esi +<span id="L16034" class="LineNr">16034 </span> <span class="subxComment"># ecx = s</span> +<span id="L16035" class="LineNr">16035 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L16036" class="LineNr">16036 </span> <span class="subxComment"># var operand/esi: (addr var) = lookup(s->value)</span> +<span id="L16037" class="LineNr">16037 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L16038" class="LineNr">16038 </span> 89/<- %esi 0/r32/eax +<span id="L16039" class="LineNr">16039 </span> <span class="subxComment"># if (operand->register && s->is-deref?) emit "*__"</span> +<span id="L16040" class="LineNr">16040 </span> { +<span id="L16041" class="LineNr">16041 </span><span class="Constant">$emit-subx-var-as-rm32:check-for-register-indirect</span>: +<span id="L16042" class="LineNr">16042 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16043" class="LineNr">16043 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16044" class="LineNr">16044 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L16045" class="LineNr">16045 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16046" class="LineNr">16046 </span><span class="Constant">$emit-subx-var-as-rm32:register-indirect</span>: +<span id="L16047" class="LineNr">16047 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" *"</span>) +<span id="L16048" class="LineNr">16048 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L16049" class="LineNr">16049 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L16050" class="LineNr">16050 </span> e9/jump $emit-subx-var-as-rm32:end/disp32 +<span id="L16051" class="LineNr">16051 </span> } +<span id="L16052" class="LineNr">16052 </span> <span class="subxComment"># if (operand->register && !s->is-deref?) emit "%__"</span> +<span id="L16053" class="LineNr">16053 </span> { +<span id="L16054" class="LineNr">16054 </span><span class="Constant">$emit-subx-var-as-rm32:check-for-register-direct</span>: +<span id="L16055" class="LineNr">16055 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16056" class="LineNr">16056 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16057" class="LineNr">16057 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L16058" class="LineNr">16058 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16059" class="LineNr">16059 </span><span class="Constant">$emit-subx-var-as-rm32:register-direct</span>: +<span id="L16060" class="LineNr">16060 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" %"</span>) +<span id="L16061" class="LineNr">16061 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L16062" class="LineNr">16062 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) %eax) +<span id="L16063" class="LineNr">16063 </span> e9/jump $emit-subx-var-as-rm32:end/disp32 +<span id="L16064" class="LineNr">16064 </span> } +<span id="L16065" class="LineNr">16065 </span> <span class="subxComment"># else if (operand->stack-offset) emit "*(ebp+__)"</span> +<span id="L16066" class="LineNr">16066 </span> { +<span id="L16067" class="LineNr">16067 </span> 81 7/subop/compare *(esi+0x14) 0/imm32 <span class="subxComment"># Var-offset</span> +<span id="L16068" class="LineNr">16068 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16069" class="LineNr">16069 </span><span class="Constant">$emit-subx-var-as-rm32:stack</span>: +<span id="L16070" class="LineNr">16070 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="SpecialChar"><a href='../051test.subx.html#L93'>Space</a></span>) +<span id="L16071" class="LineNr">16071 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">"*(ebp+"</span>) +<span id="L16072" class="LineNr">16072 </span> (<a href='../066print-int.subx.html#L266'>print-int32-buffered</a> *(ebp+8) *(esi+0x14)) <span class="subxComment"># Var-offset</span> +<span id="L16073" class="LineNr">16073 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">")"</span>) +<span id="L16074" class="LineNr">16074 </span> } +<span id="L16075" class="LineNr">16075 </span><span class="Constant">$emit-subx-var-as-rm32:end</span>: +<span id="L16076" class="LineNr">16076 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16077" class="LineNr">16077 </span> 5e/pop-to-esi +<span id="L16078" class="LineNr">16078 </span> 59/pop-to-ecx +<span id="L16079" class="LineNr">16079 </span> 58/pop-to-eax +<span id="L16080" class="LineNr">16080 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16081" class="LineNr">16081 </span> 89/<- %esp 5/r32/ebp +<span id="L16082" class="LineNr">16082 </span> 5d/pop-to-ebp +<span id="L16083" class="LineNr">16083 </span> c3/return +<span id="L16084" class="LineNr">16084 </span> +<span id="L16085" class="LineNr">16085 </span><span class="subxFunction">find-matching-primitive</span>: <span class="subxComment"># primitives: (addr primitive), stmt: (addr stmt) -> result/eax: (addr primitive)</span> +<span id="L16086" class="LineNr">16086 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16087" class="LineNr">16087 </span> 55/push-ebp +<span id="L16088" class="LineNr">16088 </span> 89/<- %ebp 4/r32/esp +<span id="L16089" class="LineNr">16089 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16090" class="LineNr">16090 </span> 51/push-ecx +<span id="L16091" class="LineNr">16091 </span> <span class="subxComment"># var curr/ecx: (addr primitive) = primitives</span> +<span id="L16092" class="LineNr">16092 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L16093" class="LineNr">16093 </span> { +<span id="L16094" class="LineNr">16094 </span><span class="Constant">$find-matching-primitive:loop</span>: +<span id="L16095" class="LineNr">16095 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L16096" class="LineNr">16096 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L16097" class="LineNr">16097 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16098" class="LineNr">16098 </span> <span class="subxComment"># if match(curr, stmt) return curr</span> +<span id="L16099" class="LineNr">16099 </span> { +<span id="L16100" class="LineNr">16100 </span> (<a href='mu.subx.html#L16123'>mu-stmt-matches-primitive?</a> *(ebp+0xc) %ecx) <span class="subxComment"># => eax</span> +<span id="L16101" class="LineNr">16101 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16102" class="LineNr">16102 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16103" class="LineNr">16103 </span> 89/<- %eax 1/r32/ecx +<span id="L16104" class="LineNr">16104 </span> eb/jump $find-matching-primitive:end/disp8 +<span id="L16105" class="LineNr">16105 </span> } +<span id="L16106" class="LineNr">16106 </span><span class="Constant">$find-matching-primitive:next-primitive</span>: +<span id="L16107" class="LineNr">16107 </span> <span class="subxComment"># curr = curr->next</span> +<span id="L16108" class="LineNr">16108 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x34) *(ecx+0x38)) <span class="subxComment"># Primitive-next Primitive-next => eax</span> +<span id="L16109" class="LineNr">16109 </span> 89/<- %ecx 0/r32/eax +<span id="L16110" class="LineNr">16110 </span> <span class="subxComment">#</span> +<span id="L16111" class="LineNr">16111 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L16112" class="LineNr">16112 </span> } +<span id="L16113" class="LineNr">16113 </span> <span class="subxComment"># return null</span> +<span id="L16114" class="LineNr">16114 </span> b8/copy-to-eax 0/imm32 +<span id="L16115" class="LineNr">16115 </span><span class="Constant">$find-matching-primitive:end</span>: +<span id="L16116" class="LineNr">16116 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16117" class="LineNr">16117 </span> 59/pop-to-ecx +<span id="L16118" class="LineNr">16118 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16119" class="LineNr">16119 </span> 89/<- %esp 5/r32/ebp +<span id="L16120" class="LineNr">16120 </span> 5d/pop-to-ebp +<span id="L16121" class="LineNr">16121 </span> c3/return +<span id="L16122" class="LineNr">16122 </span> +<span id="L16123" class="LineNr">16123 </span><span class="subxFunction">mu-stmt-matches-primitive?</span>: <span class="subxComment"># stmt: (addr stmt), primitive: (addr primitive) -> result/eax: boolean</span> +<span id="L16124" class="LineNr">16124 </span> <span class="subxComment"># A mu stmt matches a primitive if the name matches, all the inout vars</span> +<span id="L16125" class="LineNr">16125 </span> <span class="subxComment"># match, and all the output vars match.</span> +<span id="L16126" class="LineNr">16126 </span> <span class="subxComment"># Vars match if types match and registers match.</span> +<span id="L16127" class="LineNr">16127 </span> <span class="subxComment"># In addition, a stmt output matches a primitive's output if types match</span> +<span id="L16128" class="LineNr">16128 </span> <span class="subxComment"># and the primitive has a wildcard register.</span> +<span id="L16129" class="LineNr">16129 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16130" class="LineNr">16130 </span> 55/push-ebp +<span id="L16131" class="LineNr">16131 </span> 89/<- %ebp 4/r32/esp +<span id="L16132" class="LineNr">16132 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16133" class="LineNr">16133 </span> 51/push-ecx +<span id="L16134" class="LineNr">16134 </span> 52/push-edx +<span id="L16135" class="LineNr">16135 </span> 53/push-ebx +<span id="L16136" class="LineNr">16136 </span> 56/push-esi +<span id="L16137" class="LineNr">16137 </span> 57/push-edi +<span id="L16138" class="LineNr">16138 </span> <span class="subxComment"># ecx = stmt</span> +<span id="L16139" class="LineNr">16139 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L16140" class="LineNr">16140 </span> <span class="subxComment"># edx = primitive</span> +<span id="L16141" class="LineNr">16141 </span> 8b/-> *(ebp+0xc) 2/r32/edx +<span id="L16142" class="LineNr">16142 </span> { +<span id="L16143" class="LineNr">16143 </span><span class="Constant">$mu-stmt-matches-primitive?:check-name</span>: +<span id="L16144" class="LineNr">16144 </span> <span class="subxComment"># if (primitive->name != stmt->operation) return false</span> +<span id="L16145" class="LineNr">16145 </span> <span class="subxS1Comment"># . var esi: (addr array byte) = lookup(stmt->operation)</span> +<span id="L16146" class="LineNr">16146 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+4) *(ecx+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L16147" class="LineNr">16147 </span> 89/<- %esi 0/r32/eax +<span id="L16148" class="LineNr">16148 </span> <span class="subxS1Comment"># . var edi: (addr array byte) = lookup(primitive->name)</span> +<span id="L16149" class="LineNr">16149 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edx *(edx+4)) <span class="subxComment"># Primitive-name Primitive-name => eax</span> +<span id="L16150" class="LineNr">16150 </span> 89/<- %edi 0/r32/eax +<span id="L16151" class="LineNr">16151 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %esi %edi) <span class="subxComment"># => eax</span> +<span id="L16152" class="LineNr">16152 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16153" class="LineNr">16153 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16154" class="LineNr">16154 </span> b8/copy-to-eax 0/imm32 +<span id="L16155" class="LineNr">16155 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16156" class="LineNr">16156 </span> } +<span id="L16157" class="LineNr">16157 </span> <span class="subxComment"># var curr/esi: (addr stmt-var) = lookup(stmt->inouts)</span> +<span id="L16158" class="LineNr">16158 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0xc) *(ecx+0x10)) <span class="subxComment"># Stmt1-inouts Stmt1-inouts => eax</span> +<span id="L16159" class="LineNr">16159 </span> 89/<- %esi 0/r32/eax +<span id="L16160" class="LineNr">16160 </span> <span class="subxComment"># var curr2/edi: (addr list var) = lookup(primitive->inouts)</span> +<span id="L16161" class="LineNr">16161 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+8) *(edx+0xc)) <span class="subxComment"># Primitive-inouts Primitive-inouts => eax</span> +<span id="L16162" class="LineNr">16162 </span> 89/<- %edi 0/r32/eax +<span id="L16163" class="LineNr">16163 </span> { +<span id="L16164" class="LineNr">16164 </span><span class="Constant">$mu-stmt-matches-primitive?:inouts-loop</span>: +<span id="L16165" class="LineNr">16165 </span> <span class="subxComment"># if (curr == 0 && curr2 == 0) move on to check outputs</span> +<span id="L16166" class="LineNr">16166 </span> { +<span id="L16167" class="LineNr">16167 </span><span class="Constant">$mu-stmt-matches-primitive?:check-both-inouts-null</span>: +<span id="L16168" class="LineNr">16168 </span> 81 7/subop/compare %esi 0/imm32 +<span id="L16169" class="LineNr">16169 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16170" class="LineNr">16170 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-inout-null</span>: +<span id="L16171" class="LineNr">16171 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L16172" class="LineNr">16172 </span> 0f 84/jump-if-= $mu-stmt-matches-primitive?:check-outputs/disp32 +<span id="L16173" class="LineNr">16173 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-inout-null-and-prim-inout-not-null</span>: +<span id="L16174" class="LineNr">16174 </span> <span class="subxComment"># return false</span> +<span id="L16175" class="LineNr">16175 </span> b8/copy-to-eax 0/imm32/false +<span id="L16176" class="LineNr">16176 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16177" class="LineNr">16177 </span> } +<span id="L16178" class="LineNr">16178 </span> <span class="subxComment"># if (curr2 == 0) return false</span> +<span id="L16179" class="LineNr">16179 </span> { +<span id="L16180" class="LineNr">16180 </span><span class="Constant">$mu-stmt-matches-primitive?:check-prim-inout-null</span>: +<span id="L16181" class="LineNr">16181 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L16182" class="LineNr">16182 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16183" class="LineNr">16183 </span><span class="Constant">$mu-stmt-matches-primitive?:prim-inout-null</span>: +<span id="L16184" class="LineNr">16184 </span> b8/copy-to-eax 0/imm32/false +<span id="L16185" class="LineNr">16185 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16186" class="LineNr">16186 </span> } +<span id="L16187" class="LineNr">16187 </span> <span class="subxComment"># if (curr != curr2) return false</span> <span id="L16188" class="LineNr">16188 </span> { -<span id="L16189" class="LineNr">16189 </span><span class="Constant">$mu-stmt-matches-primitive?:check-both-outputs-null</span>: -<span id="L16190" class="LineNr">16190 </span> 81 7/subop/compare %esi 0/imm32 -<span id="L16191" class="LineNr">16191 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16192" class="LineNr">16192 </span> { -<span id="L16193" class="LineNr">16193 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-output-null</span>: -<span id="L16194" class="LineNr">16194 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L16195" class="LineNr">16195 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16196" class="LineNr">16196 </span><span class="Constant">$mu-stmt-matches-primitive?:both-outputs-null</span>: -<span id="L16197" class="LineNr">16197 </span> <span class="subxComment"># return true</span> -<span id="L16198" class="LineNr">16198 </span> b8/copy-to-eax 1/imm32 -<span id="L16199" class="LineNr">16199 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16200" class="LineNr">16200 </span> } -<span id="L16201" class="LineNr">16201 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-output-null-and-prim-output-not-null</span>: -<span id="L16202" class="LineNr">16202 </span> <span class="subxComment"># return false</span> -<span id="L16203" class="LineNr">16203 </span> b8/copy-to-eax 0/imm32 -<span id="L16204" class="LineNr">16204 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16205" class="LineNr">16205 </span> } -<span id="L16206" class="LineNr">16206 </span> <span class="subxComment"># if (curr2 == 0) return false</span> -<span id="L16207" class="LineNr">16207 </span> { -<span id="L16208" class="LineNr">16208 </span><span class="Constant">$mu-stmt-matches-primitive?:check-prim-output-null</span>: -<span id="L16209" class="LineNr">16209 </span> 81 7/subop/compare %edi 0/imm32 -<span id="L16210" class="LineNr">16210 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16211" class="LineNr">16211 </span><span class="Constant">$mu-stmt-matches-primitive?:prim-output-is-null</span>: -<span id="L16212" class="LineNr">16212 </span> b8/copy-to-eax 0/imm32 -<span id="L16213" class="LineNr">16213 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16214" class="LineNr">16214 </span> } -<span id="L16215" class="LineNr">16215 </span> <span class="subxComment"># if (curr != curr2) return false</span> -<span id="L16216" class="LineNr">16216 </span> { -<span id="L16217" class="LineNr">16217 </span><span class="Constant">$mu-stmt-matches-primitive?:check-outputs-match</span>: -<span id="L16218" class="LineNr">16218 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># List-value List-value => eax</span> -<span id="L16219" class="LineNr">16219 </span> (<a href='mu.subx.html#L16250'>operand-matches-primitive?</a> %esi %eax) <span class="subxComment"># => eax</span> -<span id="L16220" class="LineNr">16220 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16189" class="LineNr">16189 </span><span class="Constant">$mu-stmt-matches-primitive?:check-inouts-match</span>: +<span id="L16190" class="LineNr">16190 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L16191" class="LineNr">16191 </span> (<a href='mu.subx.html#L16280'>operand-matches-primitive?</a> %esi %eax) <span class="subxComment"># => eax</span> +<span id="L16192" class="LineNr">16192 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16193" class="LineNr">16193 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16194" class="LineNr">16194 </span><span class="Constant">$mu-stmt-matches-primitive?:inouts-match</span>: +<span id="L16195" class="LineNr">16195 </span> b8/copy-to-eax 0/imm32/false +<span id="L16196" class="LineNr">16196 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16197" class="LineNr">16197 </span> } +<span id="L16198" class="LineNr">16198 </span><span class="Constant">$mu-stmt-matches-primitive?:next-inout</span>: +<span id="L16199" class="LineNr">16199 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L16200" class="LineNr">16200 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L16201" class="LineNr">16201 </span> 89/<- %esi 0/r32/eax +<span id="L16202" class="LineNr">16202 </span> <span class="subxComment"># curr2 = lookup(curr2->next)</span> +<span id="L16203" class="LineNr">16203 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L16204" class="LineNr">16204 </span> 89/<- %edi 0/r32/eax +<span id="L16205" class="LineNr">16205 </span> <span class="subxComment">#</span> +<span id="L16206" class="LineNr">16206 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L16207" class="LineNr">16207 </span> } +<span id="L16208" class="LineNr">16208 </span><span class="Constant">$mu-stmt-matches-primitive?:check-outputs</span>: +<span id="L16209" class="LineNr">16209 </span> <span class="subxComment"># var curr/esi: (addr stmt-var) = lookup(stmt->outputs)</span> +<span id="L16210" class="LineNr">16210 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x14) *(ecx+0x18)) <span class="subxComment"># Stmt1-outputs Stmt1-outputs => eax</span> +<span id="L16211" class="LineNr">16211 </span> 89/<- %esi 0/r32/eax +<span id="L16212" class="LineNr">16212 </span> <span class="subxComment"># var curr2/edi: (addr list var) = lookup(primitive->outputs)</span> +<span id="L16213" class="LineNr">16213 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edx+0x10) *(edx+0x14)) <span class="subxComment"># Primitive-outputs Primitive-outputs => eax</span> +<span id="L16214" class="LineNr">16214 </span> 89/<- %edi 0/r32/eax +<span id="L16215" class="LineNr">16215 </span> { +<span id="L16216" class="LineNr">16216 </span><span class="Constant">$mu-stmt-matches-primitive?:outputs-loop</span>: +<span id="L16217" class="LineNr">16217 </span> <span class="subxComment"># if (curr == 0) return (curr2 == 0)</span> +<span id="L16218" class="LineNr">16218 </span> { +<span id="L16219" class="LineNr">16219 </span><span class="Constant">$mu-stmt-matches-primitive?:check-both-outputs-null</span>: +<span id="L16220" class="LineNr">16220 </span> 81 7/subop/compare %esi 0/imm32 <span id="L16221" class="LineNr">16221 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16222" class="LineNr">16222 </span><span class="Constant">$mu-stmt-matches-primitive?:outputs-match</span>: -<span id="L16223" class="LineNr">16223 </span> b8/copy-to-eax 0/imm32 -<span id="L16224" class="LineNr">16224 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 -<span id="L16225" class="LineNr">16225 </span> } -<span id="L16226" class="LineNr">16226 </span><span class="Constant">$mu-stmt-matches-primitive?:next-output</span>: -<span id="L16227" class="LineNr">16227 </span> <span class="subxComment"># curr = lookup(curr->next)</span> -<span id="L16228" class="LineNr">16228 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> -<span id="L16229" class="LineNr">16229 </span> 89/<- %esi 0/r32/eax -<span id="L16230" class="LineNr">16230 </span> <span class="subxComment"># curr2 = lookup(curr2->next)</span> -<span id="L16231" class="LineNr">16231 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># List-next List-next => eax</span> -<span id="L16232" class="LineNr">16232 </span> 89/<- %edi 0/r32/eax -<span id="L16233" class="LineNr">16233 </span> <span class="subxComment">#</span> -<span id="L16234" class="LineNr">16234 </span> e9/jump <span class="Constant">loop</span>/disp32 -<span id="L16235" class="LineNr">16235 </span> } -<span id="L16236" class="LineNr">16236 </span><span class="Constant">$mu-stmt-matches-primitive?:return-true</span>: -<span id="L16237" class="LineNr">16237 </span> b8/copy-to-eax 1/imm32 -<span id="L16238" class="LineNr">16238 </span><span class="Constant">$mu-stmt-matches-primitive?:end</span>: -<span id="L16239" class="LineNr">16239 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16240" class="LineNr">16240 </span> 5f/pop-to-edi -<span id="L16241" class="LineNr">16241 </span> 5e/pop-to-esi -<span id="L16242" class="LineNr">16242 </span> 5b/pop-to-ebx -<span id="L16243" class="LineNr">16243 </span> 5a/pop-to-edx -<span id="L16244" class="LineNr">16244 </span> 59/pop-to-ecx -<span id="L16245" class="LineNr">16245 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16246" class="LineNr">16246 </span> 89/<- %esp 5/r32/ebp -<span id="L16247" class="LineNr">16247 </span> 5d/pop-to-ebp -<span id="L16248" class="LineNr">16248 </span> c3/return -<span id="L16249" class="LineNr">16249 </span> -<span id="L16250" class="LineNr">16250 </span><span class="subxFunction">operand-matches-primitive?</span>: <span class="subxComment"># s: (addr stmt-var), prim-var: (addr var) -> result/eax: boolean</span> -<span id="L16251" class="LineNr">16251 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16252" class="LineNr">16252 </span> 55/push-ebp -<span id="L16253" class="LineNr">16253 </span> 89/<- %ebp 4/r32/esp -<span id="L16254" class="LineNr">16254 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16255" class="LineNr">16255 </span> 51/push-ecx -<span id="L16256" class="LineNr">16256 </span> 52/push-edx -<span id="L16257" class="LineNr">16257 </span> 53/push-ebx -<span id="L16258" class="LineNr">16258 </span> 56/push-esi -<span id="L16259" class="LineNr">16259 </span> 57/push-edi -<span id="L16260" class="LineNr">16260 </span> <span class="subxComment"># ecx = s</span> -<span id="L16261" class="LineNr">16261 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L16262" class="LineNr">16262 </span> <span class="subxComment"># var var/esi: (addr var) = lookup(s->value)</span> -<span id="L16263" class="LineNr">16263 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> -<span id="L16264" class="LineNr">16264 </span> 89/<- %esi 0/r32/eax -<span id="L16265" class="LineNr">16265 </span> <span class="subxComment"># edi = prim-var</span> -<span id="L16266" class="LineNr">16266 </span> 8b/-> *(ebp+0xc) 7/r32/edi -<span id="L16267" class="LineNr">16267 </span><span class="Constant">$operand-matches-primitive?:check-type</span>: -<span id="L16268" class="LineNr">16268 </span> <span class="subxComment"># if (var->type != prim-var->type) return false</span> -<span id="L16269" class="LineNr">16269 </span> <span class="subxS1Comment"># . var vtype/ebx: (addr tree type-id) = lookup(var->type)</span> -<span id="L16270" class="LineNr">16270 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L16271" class="LineNr">16271 </span> 89/<- %ebx 0/r32/eax -<span id="L16272" class="LineNr">16272 </span> <span class="subxS1Comment"># . var ptype/eax: (addr tree type-id) = lookup(prim-var->type)</span> -<span id="L16273" class="LineNr">16273 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> -<span id="L16274" class="LineNr">16274 </span> (<a href='mu.subx.html#L16409'>subx-type-equal?</a> %ebx %eax) <span class="subxComment"># => eax</span> -<span id="L16275" class="LineNr">16275 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16276" class="LineNr">16276 </span> 0f 84/jump-if-= $operand-matches-primitive?:return-false/disp32 -<span id="L16277" class="LineNr">16277 </span> { -<span id="L16278" class="LineNr">16278 </span><span class="Constant">$operand-matches-primitive?:check-register</span>: -<span id="L16279" class="LineNr">16279 </span> <span class="subxComment"># if prim-var is in memory and var is in register but dereference, match</span> -<span id="L16280" class="LineNr">16280 </span> { -<span id="L16281" class="LineNr">16281 </span> 81 7/subop/compare *(edi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16282" class="LineNr">16282 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 -<span id="L16283" class="LineNr">16283 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16284" class="LineNr">16284 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16285" class="LineNr">16285 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L16286" class="LineNr">16286 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16287" class="LineNr">16287 </span><span class="Constant">$operand-matches-primitive?:var-deref-match</span>: -<span id="L16288" class="LineNr">16288 </span> e9/jump $operand-matches-primitive?:return-true/disp32 -<span id="L16289" class="LineNr">16289 </span> } -<span id="L16290" class="LineNr">16290 </span> <span class="subxComment"># if prim-var is in register and var is in register but dereference, no match</span> -<span id="L16291" class="LineNr">16291 </span> { -<span id="L16292" class="LineNr">16292 </span> 81 7/subop/compare *(edi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16293" class="LineNr">16293 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L16294" class="LineNr">16294 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> -<span id="L16295" class="LineNr">16295 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 -<span id="L16296" class="LineNr">16296 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> -<span id="L16297" class="LineNr">16297 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16298" class="LineNr">16298 </span><span class="Constant">$operand-matches-primitive?:var-deref-no-match</span>: -<span id="L16299" class="LineNr">16299 </span> e9/jump $operand-matches-primitive?:return-false/disp32 -<span id="L16300" class="LineNr">16300 </span> } -<span id="L16301" class="LineNr">16301 </span> <span class="subxComment"># return false if var->register doesn't match prim-var->register</span> -<span id="L16302" class="LineNr">16302 </span> { -<span id="L16303" class="LineNr">16303 </span> <span class="subxComment"># if register addresses are equal, it's a match</span> -<span id="L16304" class="LineNr">16304 </span> <span class="subxComment"># var vreg/ebx: (addr array byte) = lookup(var->register)</span> -<span id="L16305" class="LineNr">16305 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L16306" class="LineNr">16306 </span> 89/<- %ebx 0/r32/eax -<span id="L16307" class="LineNr">16307 </span> <span class="subxComment"># var preg/ecx: (addr array byte) = lookup(prim-var->register)</span> -<span id="L16308" class="LineNr">16308 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x18) *(edi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> -<span id="L16309" class="LineNr">16309 </span> 89/<- %ecx 0/r32/eax -<span id="L16310" class="LineNr">16310 </span> <span class="subxComment"># if (vreg == preg) break</span> -<span id="L16311" class="LineNr">16311 </span> 39/compare %ecx 3/r32/ebx -<span id="L16312" class="LineNr">16312 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16313" class="LineNr">16313 </span><span class="Constant">$operand-matches-primitive?:var-register-no-match</span>: -<span id="L16314" class="LineNr">16314 </span> <span class="subxComment"># if either address is 0, return false</span> -<span id="L16315" class="LineNr">16315 </span> 81 7/subop/compare %ebx 0/imm32 -<span id="L16316" class="LineNr">16316 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 -<span id="L16317" class="LineNr">16317 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L16318" class="LineNr">16318 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 -<span id="L16319" class="LineNr">16319 </span> <span class="subxComment"># if prim-var->register is wildcard, it's a match</span> -<span id="L16320" class="LineNr">16320 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"*"</span>) <span class="subxComment"># Any-register => eax</span> -<span id="L16321" class="LineNr">16321 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16322" class="LineNr">16322 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 -<span id="L16323" class="LineNr">16323 </span><span class="Constant">$operand-matches-primitive?:wildcard-no-match</span>: -<span id="L16324" class="LineNr">16324 </span> <span class="subxComment"># if string contents aren't equal, return false</span> -<span id="L16325" class="LineNr">16325 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx %ebx) <span class="subxComment"># => eax</span> -<span id="L16326" class="LineNr">16326 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16327" class="LineNr">16327 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 -<span id="L16328" class="LineNr">16328 </span> } -<span id="L16329" class="LineNr">16329 </span> } -<span id="L16330" class="LineNr">16330 </span><span class="Constant">$operand-matches-primitive?:return-true</span>: -<span id="L16331" class="LineNr">16331 </span> b8/copy-to-eax 1/imm32/true -<span id="L16332" class="LineNr">16332 </span> eb/jump $operand-matches-primitive?:end/disp8 -<span id="L16333" class="LineNr">16333 </span><span class="Constant">$operand-matches-primitive?:return-false</span>: -<span id="L16334" class="LineNr">16334 </span> b8/copy-to-eax 0/imm32/false -<span id="L16335" class="LineNr">16335 </span><span class="Constant">$operand-matches-primitive?:end</span>: -<span id="L16336" class="LineNr">16336 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16337" class="LineNr">16337 </span> 5f/pop-to-edi -<span id="L16338" class="LineNr">16338 </span> 5e/pop-to-esi -<span id="L16339" class="LineNr">16339 </span> 5b/pop-to-ebx -<span id="L16340" class="LineNr">16340 </span> 5a/pop-to-edx -<span id="L16341" class="LineNr">16341 </span> 59/pop-to-ecx -<span id="L16342" class="LineNr">16342 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16343" class="LineNr">16343 </span> 89/<- %esp 5/r32/ebp -<span id="L16344" class="LineNr">16344 </span> 5d/pop-to-ebp -<span id="L16345" class="LineNr">16345 </span> c3/return -<span id="L16346" class="LineNr">16346 </span> -<span id="L16347" class="LineNr">16347 </span><span class="subxFunction">find-matching-function</span>: <span class="subxComment"># functions: (addr function), stmt: (addr stmt) -> result/eax: (addr function)</span> -<span id="L16348" class="LineNr">16348 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16349" class="LineNr">16349 </span> 55/push-ebp -<span id="L16350" class="LineNr">16350 </span> 89/<- %ebp 4/r32/esp -<span id="L16351" class="LineNr">16351 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16352" class="LineNr">16352 </span> 51/push-ecx -<span id="L16353" class="LineNr">16353 </span> <span class="subxComment"># var curr/ecx: (handle function) = functions</span> -<span id="L16354" class="LineNr">16354 </span> 8b/-> *(ebp+8) 1/r32/ecx -<span id="L16355" class="LineNr">16355 </span> { -<span id="L16356" class="LineNr">16356 </span> <span class="subxComment"># if (curr == null) break</span> -<span id="L16357" class="LineNr">16357 </span> 81 7/subop/compare %ecx 0/imm32 -<span id="L16358" class="LineNr">16358 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16359" class="LineNr">16359 </span><span class="CommentedCode">#? (write-buffered Stderr "iter\n")</span> -<span id="L16360" class="LineNr">16360 </span><span class="CommentedCode">#? (flush Stderr)</span> -<span id="L16361" class="LineNr">16361 </span> <span class="subxComment"># if match(stmt, curr) return curr</span> -<span id="L16362" class="LineNr">16362 </span> { -<span id="L16363" class="LineNr">16363 </span> (<a href='mu.subx.html#L16386'>mu-stmt-matches-function?</a> *(ebp+0xc) %ecx) <span class="subxComment"># => eax</span> -<span id="L16364" class="LineNr">16364 </span> 3d/compare-eax-and 0/imm32/false -<span id="L16365" class="LineNr">16365 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 -<span id="L16366" class="LineNr">16366 </span> 89/<- %eax 1/r32/ecx -<span id="L16367" class="LineNr">16367 </span> eb/jump $find-matching-function:end/disp8 -<span id="L16368" class="LineNr">16368 </span> } -<span id="L16369" class="LineNr">16369 </span> <span class="subxComment"># curr = curr->next</span> -<span id="L16370" class="LineNr">16370 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x20) *(ecx+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> -<span id="L16371" class="LineNr">16371 </span> 89/<- %ecx 0/r32/eax -<span id="L16372" class="LineNr">16372 </span> <span class="subxComment">#</span> -<span id="L16373" class="LineNr">16373 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L16374" class="LineNr">16374 </span> } -<span id="L16375" class="LineNr">16375 </span> <span class="subxComment"># return null</span> -<span id="L16376" class="LineNr">16376 </span> b8/copy-to-eax 0/imm32 -<span id="L16377" class="LineNr">16377 </span><span class="Constant">$find-matching-function:end</span>: -<span id="L16378" class="LineNr">16378 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16379" class="LineNr">16379 </span> 59/pop-to-ecx -<span id="L16380" class="LineNr">16380 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16381" class="LineNr">16381 </span> 89/<- %esp 5/r32/ebp -<span id="L16382" class="LineNr">16382 </span> 5d/pop-to-ebp -<span id="L16383" class="LineNr">16383 </span> c3/return -<span id="L16384" class="LineNr">16384 </span> -<span id="L16385" class="LineNr">16385 </span><span class="subxComment"># Just compare names; user-defined functions don't support overloading yet.</span> -<span id="L16386" class="LineNr">16386 </span><span class="subxFunction">mu-stmt-matches-function?</span>: <span class="subxComment"># stmt: (addr stmt1), function: (addr function) -> result/eax: boolean</span> -<span id="L16387" class="LineNr">16387 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16388" class="LineNr">16388 </span> 55/push-ebp -<span id="L16389" class="LineNr">16389 </span> 89/<- %ebp 4/r32/esp -<span id="L16390" class="LineNr">16390 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16391" class="LineNr">16391 </span> 51/push-ecx -<span id="L16392" class="LineNr">16392 </span> <span class="subxComment"># return function->name == stmt->operation</span> -<span id="L16393" class="LineNr">16393 </span> <span class="subxComment"># ecx = lookup(stmt->operation)</span> -<span id="L16394" class="LineNr">16394 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L16395" class="LineNr">16395 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> -<span id="L16396" class="LineNr">16396 </span> 89/<- %ecx 0/r32/eax -<span id="L16397" class="LineNr">16397 </span> <span class="subxComment"># eax = lookup(function->name)</span> -<span id="L16398" class="LineNr">16398 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L16399" class="LineNr">16399 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> -<span id="L16400" class="LineNr">16400 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %ecx) <span class="subxComment"># => eax</span> -<span id="L16401" class="LineNr">16401 </span><span class="Constant">$mu-stmt-matches-function?:end</span>: -<span id="L16402" class="LineNr">16402 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16403" class="LineNr">16403 </span> 59/pop-to-ecx -<span id="L16404" class="LineNr">16404 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16405" class="LineNr">16405 </span> 89/<- %esp 5/r32/ebp -<span id="L16406" class="LineNr">16406 </span> 5d/pop-to-ebp -<span id="L16407" class="LineNr">16407 </span> c3/return -<span id="L16408" class="LineNr">16408 </span> -<span id="L16409" class="LineNr">16409 </span><span class="subxFunction">subx-type-equal?</span>: <span class="subxComment"># a: (addr tree type-id), b: (addr tree type-id) -> result/eax: boolean</span> -<span id="L16410" class="LineNr">16410 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16411" class="LineNr">16411 </span> 55/push-ebp -<span id="L16412" class="LineNr">16412 </span> 89/<- %ebp 4/r32/esp -<span id="L16413" class="LineNr">16413 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16414" class="LineNr">16414 </span> 51/push-ecx -<span id="L16415" class="LineNr">16415 </span> <span class="subxComment"># var alit/ecx: boolean = is-literal-type?(a)</span> -<span id="L16416" class="LineNr">16416 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> *(ebp+8) 0) <span class="subxComment"># => eax</span> -<span id="L16417" class="LineNr">16417 </span> 89/<- %ecx 0/r32/eax -<span id="L16418" class="LineNr">16418 </span> <span class="subxComment"># var blit/eax: boolean = is-literal-type?(b)</span> -<span id="L16419" class="LineNr">16419 </span> (<a href='mu.subx.html#L16432'>is-simple-mu-type?</a> *(ebp+0xc) 0) <span class="subxComment"># => eax</span> -<span id="L16420" class="LineNr">16420 </span> <span class="subxComment"># return alit == blit</span> -<span id="L16421" class="LineNr">16421 </span> 39/compare %eax 1/r32/ecx -<span id="L16422" class="LineNr">16422 </span> 0f 94/set-byte-if-= %al -<span id="L16423" class="LineNr">16423 </span> 81 4/subop/and %eax 0xff/imm32 -<span id="L16424" class="LineNr">16424 </span><span class="Constant">$subx-type-equal?:end</span>: -<span id="L16425" class="LineNr">16425 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16426" class="LineNr">16426 </span> 59/pop-to-ecx -<span id="L16427" class="LineNr">16427 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16428" class="LineNr">16428 </span> 89/<- %esp 5/r32/ebp -<span id="L16429" class="LineNr">16429 </span> 5d/pop-to-ebp -<span id="L16430" class="LineNr">16430 </span> c3/return -<span id="L16431" class="LineNr">16431 </span> -<span id="L16432" class="LineNr">16432 </span><span class="subxFunction">is-simple-mu-type?</span>: <span class="subxComment"># a: (addr tree type-id), n: type-id -> result/eax: boolean</span> -<span id="L16433" class="LineNr">16433 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16434" class="LineNr">16434 </span> 55/push-ebp -<span id="L16435" class="LineNr">16435 </span> 89/<- %ebp 4/r32/esp -<span id="L16436" class="LineNr">16436 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L16437" class="LineNr">16437 </span> 51/push-ecx -<span id="L16438" class="LineNr">16438 </span> <span class="subxComment"># ecx = n</span> -<span id="L16439" class="LineNr">16439 </span> 8b/-> *(ebp+0xc) 1/r32/ecx -<span id="L16440" class="LineNr">16440 </span> <span class="subxComment"># return (a->value == n)</span> -<span id="L16441" class="LineNr">16441 </span> 8b/-> *(ebp+8) 0/r32/eax -<span id="L16442" class="LineNr">16442 </span> 39/compare *(eax+4) 1/r32/ecx <span class="subxComment"># Tree-value</span> -<span id="L16443" class="LineNr">16443 </span> 0f 94/set-byte-if-= %al -<span id="L16444" class="LineNr">16444 </span> 81 4/subop/and %eax 0xff/imm32 -<span id="L16445" class="LineNr">16445 </span><span class="Constant">$is-simple-mu-type?:end</span>: -<span id="L16446" class="LineNr">16446 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L16447" class="LineNr">16447 </span> 59/pop-to-ecx -<span id="L16448" class="LineNr">16448 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16449" class="LineNr">16449 </span> 89/<- %esp 5/r32/ebp -<span id="L16450" class="LineNr">16450 </span> 5d/pop-to-ebp -<span id="L16451" class="LineNr">16451 </span> c3/return -<span id="L16452" class="LineNr">16452 </span> -<span id="L16453" class="LineNr">16453 </span><span class="subxTest">test-emit-subx-stmt-primitive</span>: -<span id="L16454" class="LineNr">16454 </span> <span class="subxComment"># Primitive operation on a variable on the stack.</span> -<span id="L16455" class="LineNr">16455 </span> <span class="subxComment"># increment foo</span> -<span id="L16456" class="LineNr">16456 </span> <span class="subxComment"># =></span> -<span id="L16457" class="LineNr">16457 </span> <span class="subxComment"># ff 0/subop/increment *(ebp-8)</span> -<span id="L16458" class="LineNr">16458 </span> <span class="subxComment">#</span> -<span id="L16459" class="LineNr">16459 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L16460" class="LineNr">16460 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L16461" class="LineNr">16461 </span> <span class="subxComment"># type: int</span> -<span id="L16462" class="LineNr">16462 </span> <span class="subxComment"># stack-offset: -8</span> -<span id="L16463" class="LineNr">16463 </span> <span class="subxComment">#</span> -<span id="L16464" class="LineNr">16464 </span> <span class="subxComment"># There's a primitive with this info:</span> -<span id="L16465" class="LineNr">16465 </span> <span class="subxComment"># name: 'increment'</span> -<span id="L16466" class="LineNr">16466 </span> <span class="subxComment"># inouts: int/mem</span> -<span id="L16467" class="LineNr">16467 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16468" class="LineNr">16468 </span> <span class="subxComment">#</span> -<span id="L16469" class="LineNr">16469 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16470" class="LineNr">16470 </span> 55/push-ebp -<span id="L16471" class="LineNr">16471 </span> 89/<- %ebp 4/r32/esp -<span id="L16472" class="LineNr">16472 </span> <span class="subxComment"># setup</span> -<span id="L16473" class="LineNr">16473 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L16474" class="LineNr">16474 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L16475" class="LineNr">16475 </span> <span class="subxComment"># simulate allocated payloads starting with an initial fake alloc-id (0x11)</span> -<span id="L16476" class="LineNr">16476 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-type</span>: -<span id="L16477" class="LineNr">16477 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L16478" class="LineNr">16478 </span> 68/push 0/imm32/right:null -<span id="L16479" class="LineNr">16479 </span> 68/push 0/imm32/right:null -<span id="L16480" class="LineNr">16480 </span> 68/push 0/imm32/left:unused -<span id="L16481" class="LineNr">16481 </span> 68/push 1/imm32/value:int -<span id="L16482" class="LineNr">16482 </span> 68/push 1/imm32/is-atom?:true -<span id="L16483" class="LineNr">16483 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16484" class="LineNr">16484 </span> 89/<- %ecx 4/r32/esp -<span id="L16485" class="LineNr">16485 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-var</span>: -<span id="L16486" class="LineNr">16486 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(type)</span> -<span id="L16487" class="LineNr">16487 </span> 68/push 0/imm32/no-register -<span id="L16488" class="LineNr">16488 </span> 68/push 0/imm32/no-register -<span id="L16489" class="LineNr">16489 </span> 68/push -8/imm32/stack-offset -<span id="L16490" class="LineNr">16490 </span> 68/push 1/imm32/block-depth -<span id="L16491" class="LineNr">16491 </span> 51/push-ecx/type -<span id="L16492" class="LineNr">16492 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16493" class="LineNr">16493 </span> 68/push 0/imm32/name -<span id="L16494" class="LineNr">16494 </span> 68/push 0/imm32/name -<span id="L16495" class="LineNr">16495 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16496" class="LineNr">16496 </span> 89/<- %ecx 4/r32/esp -<span id="L16497" class="LineNr">16497 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-var-name</span>: -<span id="L16498" class="LineNr">16498 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L16499" class="LineNr">16499 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16500" class="LineNr">16500 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L16501" class="LineNr">16501 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt-var</span>: -<span id="L16502" class="LineNr">16502 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> -<span id="L16503" class="LineNr">16503 </span> 68/push 0/imm32/is-deref:false -<span id="L16504" class="LineNr">16504 </span> 68/push 0/imm32/next -<span id="L16505" class="LineNr">16505 </span> 68/push 0/imm32/next -<span id="L16506" class="LineNr">16506 </span> 51/push-ecx/var-foo -<span id="L16507" class="LineNr">16507 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16508" class="LineNr">16508 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16509" class="LineNr">16509 </span> 89/<- %ebx 4/r32/esp -<span id="L16510" class="LineNr">16510 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt</span>: -<span id="L16511" class="LineNr">16511 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L16512" class="LineNr">16512 </span> 68/push 0/imm32/no-outputs -<span id="L16513" class="LineNr">16513 </span> 68/push 0/imm32/no-outputs -<span id="L16514" class="LineNr">16514 </span> 53/push-ebx/inouts -<span id="L16515" class="LineNr">16515 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16516" class="LineNr">16516 </span> 68/push 0/imm32/operation -<span id="L16517" class="LineNr">16517 </span> 68/push 0/imm32/operation -<span id="L16518" class="LineNr">16518 </span> 68/push 1/imm32/tag -<span id="L16519" class="LineNr">16519 </span> 89/<- %esi 4/r32/esp -<span id="L16520" class="LineNr">16520 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt-operation</span>: -<span id="L16521" class="LineNr">16521 </span> <span class="subxComment"># stmt->operation = "increment"</span> -<span id="L16522" class="LineNr">16522 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L16523" class="LineNr">16523 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L16524" class="LineNr">16524 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive</span>: -<span id="L16525" class="LineNr">16525 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> -<span id="L16526" class="LineNr">16526 </span> 68/push 0/imm32/next -<span id="L16527" class="LineNr">16527 </span> 68/push 0/imm32/next -<span id="L16528" class="LineNr">16528 </span> 68/push 0/imm32/output-is-write-only -<span id="L16529" class="LineNr">16529 </span> 68/push 0/imm32/no-disp32 -<span id="L16530" class="LineNr">16530 </span> 68/push 0/imm32/no-imm32 -<span id="L16531" class="LineNr">16531 </span> 68/push 0/imm32/no-r32 -<span id="L16532" class="LineNr">16532 </span> 68/push 1/imm32/rm32-is-first-inout -<span id="L16533" class="LineNr">16533 </span> 68/push 0/imm32/subx-name -<span id="L16534" class="LineNr">16534 </span> 68/push 0/imm32/subx-name -<span id="L16535" class="LineNr">16535 </span> 68/push 0/imm32/no-outputs -<span id="L16536" class="LineNr">16536 </span> 68/push 0/imm32/no-outputs -<span id="L16537" class="LineNr">16537 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> -<span id="L16538" class="LineNr">16538 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16539" class="LineNr">16539 </span> 68/push 0/imm32/name -<span id="L16540" class="LineNr">16540 </span> 68/push 0/imm32/name -<span id="L16541" class="LineNr">16541 </span> 89/<- %ebx 4/r32/esp -<span id="L16542" class="LineNr">16542 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive-name</span>: -<span id="L16543" class="LineNr">16543 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L16544" class="LineNr">16544 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> -<span id="L16545" class="LineNr">16545 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive-subx-name</span>: -<span id="L16546" class="LineNr">16546 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L16547" class="LineNr">16547 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> -<span id="L16548" class="LineNr">16548 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L16549" class="LineNr">16549 </span> <span class="subxComment"># convert</span> -<span id="L16550" class="LineNr">16550 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L16551" class="LineNr">16551 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L16552" class="LineNr">16552 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L16553" class="Folded">16553 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L16559" class="LineNr">16559 </span> <span class="subxComment"># check output</span> -<span id="L16560" class="LineNr">16560 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment *(ebp+0xfffffff8)"</span> <span class="Constant">"F - test-emit-subx-stmt-primitive"</span>) -<span id="L16561" class="LineNr">16561 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16562" class="LineNr">16562 </span> 89/<- %esp 5/r32/ebp -<span id="L16563" class="LineNr">16563 </span> 5d/pop-to-ebp -<span id="L16564" class="LineNr">16564 </span> c3/return -<span id="L16565" class="LineNr">16565 </span> -<span id="L16566" class="LineNr">16566 </span><span class="subxTest">test-emit-subx-stmt-primitive-register</span>: -<span id="L16567" class="LineNr">16567 </span> <span class="subxComment"># Primitive operation on a variable in a register.</span> -<span id="L16568" class="LineNr">16568 </span> <span class="subxComment"># foo <- increment</span> -<span id="L16569" class="LineNr">16569 </span> <span class="subxComment"># =></span> -<span id="L16570" class="LineNr">16570 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> -<span id="L16571" class="LineNr">16571 </span> <span class="subxComment">#</span> -<span id="L16572" class="LineNr">16572 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L16573" class="LineNr">16573 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L16574" class="LineNr">16574 </span> <span class="subxComment"># type: int</span> -<span id="L16575" class="LineNr">16575 </span> <span class="subxComment"># register: 'eax'</span> -<span id="L16576" class="LineNr">16576 </span> <span class="subxComment">#</span> -<span id="L16577" class="LineNr">16577 </span> <span class="subxComment"># There's a primitive with this info:</span> -<span id="L16578" class="LineNr">16578 </span> <span class="subxComment"># name: 'increment'</span> -<span id="L16579" class="LineNr">16579 </span> <span class="subxComment"># out: int/reg</span> -<span id="L16580" class="LineNr">16580 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16581" class="LineNr">16581 </span> <span class="subxComment">#</span> -<span id="L16582" class="LineNr">16582 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16583" class="LineNr">16583 </span> 55/push-ebp -<span id="L16584" class="LineNr">16584 </span> 89/<- %ebp 4/r32/esp -<span id="L16585" class="LineNr">16585 </span> <span class="subxComment"># setup</span> -<span id="L16586" class="LineNr">16586 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L16587" class="LineNr">16587 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L16588" class="LineNr">16588 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-type</span>: -<span id="L16589" class="LineNr">16589 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L16590" class="LineNr">16590 </span> 68/push 0/imm32/right:null -<span id="L16591" class="LineNr">16591 </span> 68/push 0/imm32/right:null -<span id="L16592" class="LineNr">16592 </span> 68/push 0/imm32/left:unused -<span id="L16593" class="LineNr">16593 </span> 68/push 1/imm32/value:int -<span id="L16594" class="LineNr">16594 </span> 68/push 1/imm32/is-atom?:true -<span id="L16595" class="LineNr">16595 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16596" class="LineNr">16596 </span> 89/<- %ecx 4/r32/esp -<span id="L16597" class="LineNr">16597 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var</span>: -<span id="L16598" class="LineNr">16598 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> -<span id="L16599" class="LineNr">16599 </span> 68/push 0/imm32/register -<span id="L16600" class="LineNr">16600 </span> 68/push 0/imm32/register -<span id="L16601" class="LineNr">16601 </span> 68/push 0/imm32/no-stack-offset -<span id="L16602" class="LineNr">16602 </span> 68/push 1/imm32/block-depth -<span id="L16603" class="LineNr">16603 </span> 51/push-ecx -<span id="L16604" class="LineNr">16604 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16605" class="LineNr">16605 </span> 68/push 0/imm32/name -<span id="L16606" class="LineNr">16606 </span> 68/push 0/imm32/name -<span id="L16607" class="LineNr">16607 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16608" class="LineNr">16608 </span> 89/<- %ecx 4/r32/esp -<span id="L16609" class="LineNr">16609 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-name</span>: -<span id="L16610" class="LineNr">16610 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L16611" class="LineNr">16611 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16612" class="LineNr">16612 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L16613" class="LineNr">16613 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-register</span>: -<span id="L16614" class="LineNr">16614 </span> <span class="subxComment"># var-foo->register = "eax"</span> -<span id="L16615" class="LineNr">16615 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16616" class="LineNr">16616 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L16617" class="LineNr">16617 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt-var</span>: -<span id="L16618" class="LineNr">16618 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> -<span id="L16619" class="LineNr">16619 </span> 68/push 0/imm32/is-deref:false -<span id="L16620" class="LineNr">16620 </span> 68/push 0/imm32/next -<span id="L16621" class="LineNr">16621 </span> 68/push 0/imm32/next -<span id="L16622" class="LineNr">16622 </span> 51/push-ecx/var-foo -<span id="L16623" class="LineNr">16623 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16624" class="LineNr">16624 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16625" class="LineNr">16625 </span> 89/<- %ebx 4/r32/esp -<span id="L16626" class="LineNr">16626 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt</span>: -<span id="L16627" class="LineNr">16627 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L16628" class="LineNr">16628 </span> 53/push-ebx/outputs -<span id="L16629" class="LineNr">16629 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16630" class="LineNr">16630 </span> 68/push 0/imm32/no-inouts -<span id="L16631" class="LineNr">16631 </span> 68/push 0/imm32/no-inouts -<span id="L16632" class="LineNr">16632 </span> 68/push 0/imm32/operation -<span id="L16633" class="LineNr">16633 </span> 68/push 0/imm32/operation -<span id="L16634" class="LineNr">16634 </span> 68/push 1/imm32 -<span id="L16635" class="LineNr">16635 </span> 89/<- %esi 4/r32/esp -<span id="L16636" class="LineNr">16636 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt-operation</span>: -<span id="L16637" class="LineNr">16637 </span> <span class="subxComment"># stmt->operation = "increment"</span> -<span id="L16638" class="LineNr">16638 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L16639" class="LineNr">16639 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L16640" class="LineNr">16640 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-var</span>: -<span id="L16641" class="LineNr">16641 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> -<span id="L16642" class="LineNr">16642 </span> 68/push 0/imm32/register -<span id="L16643" class="LineNr">16643 </span> 68/push 0/imm32/register -<span id="L16644" class="LineNr">16644 </span> 68/push 0/imm32/no-stack-offset -<span id="L16645" class="LineNr">16645 </span> 68/push 1/imm32/block-depth -<span id="L16646" class="LineNr">16646 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> -<span id="L16647" class="LineNr">16647 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16648" class="LineNr">16648 </span> 68/push 0/imm32/name -<span id="L16649" class="LineNr">16649 </span> 68/push 0/imm32/name -<span id="L16650" class="LineNr">16650 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16651" class="LineNr">16651 </span> 89/<- %ebx 4/r32/esp -<span id="L16652" class="LineNr">16652 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-var-name</span>: -<span id="L16653" class="LineNr">16653 </span> <span class="subxComment"># formal-var->name = "dummy"</span> -<span id="L16654" class="LineNr">16654 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16655" class="LineNr">16655 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) -<span id="L16656" class="LineNr">16656 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-register</span>: -<span id="L16657" class="LineNr">16657 </span> <span class="subxComment"># formal-var->register = "*"</span> -<span id="L16658" class="LineNr">16658 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16659" class="LineNr">16659 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> -<span id="L16660" class="LineNr">16660 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-list</span>: -<span id="L16661" class="LineNr">16661 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list var)</span> -<span id="L16662" class="LineNr">16662 </span> 68/push 0/imm32/next -<span id="L16663" class="LineNr">16663 </span> 68/push 0/imm32/next -<span id="L16664" class="LineNr">16664 </span> 53/push-ebx/formal-var -<span id="L16665" class="LineNr">16665 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16666" class="LineNr">16666 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16667" class="LineNr">16667 </span> 89/<- %ebx 4/r32/esp -<span id="L16668" class="LineNr">16668 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive</span>: -<span id="L16669" class="LineNr">16669 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> -<span id="L16670" class="LineNr">16670 </span> 68/push 0/imm32/next -<span id="L16671" class="LineNr">16671 </span> 68/push 0/imm32/next -<span id="L16672" class="LineNr">16672 </span> 68/push 0/imm32/output-is-write-only -<span id="L16673" class="LineNr">16673 </span> 68/push 0/imm32/no-disp32 -<span id="L16674" class="LineNr">16674 </span> 68/push 0/imm32/no-imm32 -<span id="L16675" class="LineNr">16675 </span> 68/push 0/imm32/no-r32 -<span id="L16676" class="LineNr">16676 </span> 68/push 3/imm32/rm32-is-first-output -<span id="L16677" class="LineNr">16677 </span> 68/push 0/imm32/subx-name -<span id="L16678" class="LineNr">16678 </span> 68/push 0/imm32/subx-name -<span id="L16679" class="LineNr">16679 </span> 53/push-ebx/outputs -<span id="L16680" class="LineNr">16680 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16681" class="LineNr">16681 </span> 68/push 0/imm32/no-inouts -<span id="L16682" class="LineNr">16682 </span> 68/push 0/imm32/no-inouts -<span id="L16683" class="LineNr">16683 </span> 68/push 0/imm32/name -<span id="L16684" class="LineNr">16684 </span> 68/push 0/imm32/name -<span id="L16685" class="LineNr">16685 </span> 89/<- %ebx 4/r32/esp -<span id="L16686" class="LineNr">16686 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive-name</span>: -<span id="L16687" class="LineNr">16687 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L16688" class="LineNr">16688 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> -<span id="L16689" class="LineNr">16689 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive-subx-name</span>: -<span id="L16690" class="LineNr">16690 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L16691" class="LineNr">16691 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> -<span id="L16692" class="LineNr">16692 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L16693" class="LineNr">16693 </span> <span class="subxComment"># convert</span> -<span id="L16694" class="LineNr">16694 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L16695" class="LineNr">16695 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L16696" class="LineNr">16696 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L16697" class="Folded">16697 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L16703" class="LineNr">16703 </span> <span class="subxComment"># check output</span> -<span id="L16704" class="LineNr">16704 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-primitive-register"</span>) -<span id="L16705" class="LineNr">16705 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16706" class="LineNr">16706 </span> 89/<- %esp 5/r32/ebp -<span id="L16707" class="LineNr">16707 </span> 5d/pop-to-ebp -<span id="L16708" class="LineNr">16708 </span> c3/return -<span id="L16709" class="LineNr">16709 </span> -<span id="L16710" class="LineNr">16710 </span><span class="subxTest">test-emit-subx-stmt-select-primitive</span>: -<span id="L16711" class="LineNr">16711 </span> <span class="subxComment"># Select the right primitive between overloads.</span> -<span id="L16712" class="LineNr">16712 </span> <span class="subxComment"># foo <- increment</span> -<span id="L16713" class="LineNr">16713 </span> <span class="subxComment"># =></span> -<span id="L16714" class="LineNr">16714 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> -<span id="L16715" class="LineNr">16715 </span> <span class="subxComment">#</span> -<span id="L16716" class="LineNr">16716 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L16717" class="LineNr">16717 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L16718" class="LineNr">16718 </span> <span class="subxComment"># type: int</span> -<span id="L16719" class="LineNr">16719 </span> <span class="subxComment"># register: 'eax'</span> -<span id="L16720" class="LineNr">16720 </span> <span class="subxComment">#</span> -<span id="L16721" class="LineNr">16721 </span> <span class="subxComment"># There's two primitives, as follows:</span> -<span id="L16722" class="LineNr">16722 </span> <span class="subxComment"># - name: 'increment'</span> -<span id="L16723" class="LineNr">16723 </span> <span class="subxComment"># out: int/reg</span> -<span id="L16724" class="LineNr">16724 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16725" class="LineNr">16725 </span> <span class="subxComment"># - name: 'increment'</span> -<span id="L16726" class="LineNr">16726 </span> <span class="subxComment"># inout: int/mem</span> -<span id="L16727" class="LineNr">16727 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16728" class="LineNr">16728 </span> <span class="subxComment">#</span> -<span id="L16729" class="LineNr">16729 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16730" class="LineNr">16730 </span> 55/push-ebp -<span id="L16731" class="LineNr">16731 </span> 89/<- %ebp 4/r32/esp -<span id="L16732" class="LineNr">16732 </span> <span class="subxComment"># setup</span> -<span id="L16733" class="LineNr">16733 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L16734" class="LineNr">16734 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L16735" class="LineNr">16735 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-type</span>: -<span id="L16736" class="LineNr">16736 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L16737" class="LineNr">16737 </span> 68/push 0/imm32/right:null -<span id="L16738" class="LineNr">16738 </span> 68/push 0/imm32/right:null -<span id="L16739" class="LineNr">16739 </span> 68/push 0/imm32/left:unused -<span id="L16740" class="LineNr">16740 </span> 68/push 1/imm32/value:int -<span id="L16741" class="LineNr">16741 </span> 68/push 1/imm32/is-atom?:true -<span id="L16742" class="LineNr">16742 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16743" class="LineNr">16743 </span> 89/<- %ecx 4/r32/esp -<span id="L16744" class="LineNr">16744 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var</span>: -<span id="L16745" class="LineNr">16745 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> -<span id="L16746" class="LineNr">16746 </span> 68/push 0/imm32/register -<span id="L16747" class="LineNr">16747 </span> 68/push 0/imm32/register -<span id="L16748" class="LineNr">16748 </span> 68/push 0/imm32/no-stack-offset -<span id="L16749" class="LineNr">16749 </span> 68/push 1/imm32/block-depth -<span id="L16750" class="LineNr">16750 </span> 51/push-ecx -<span id="L16751" class="LineNr">16751 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16752" class="LineNr">16752 </span> 68/push 0/imm32/name -<span id="L16753" class="LineNr">16753 </span> 68/push 0/imm32/name -<span id="L16754" class="LineNr">16754 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16755" class="LineNr">16755 </span> 89/<- %ecx 4/r32/esp -<span id="L16756" class="LineNr">16756 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-name</span>: -<span id="L16757" class="LineNr">16757 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L16758" class="LineNr">16758 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16759" class="LineNr">16759 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L16760" class="LineNr">16760 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-register</span>: -<span id="L16761" class="LineNr">16761 </span> <span class="subxComment"># var-foo->register = "eax"</span> -<span id="L16762" class="LineNr">16762 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16763" class="LineNr">16763 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L16764" class="LineNr">16764 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt-var</span>: -<span id="L16765" class="LineNr">16765 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> -<span id="L16766" class="LineNr">16766 </span> 68/push 0/imm32/is-deref:false -<span id="L16767" class="LineNr">16767 </span> 68/push 0/imm32/next -<span id="L16768" class="LineNr">16768 </span> 68/push 0/imm32/next -<span id="L16769" class="LineNr">16769 </span> 51/push-ecx/var-foo -<span id="L16770" class="LineNr">16770 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16771" class="LineNr">16771 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16772" class="LineNr">16772 </span> 89/<- %ebx 4/r32/esp -<span id="L16773" class="LineNr">16773 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt</span>: -<span id="L16774" class="LineNr">16774 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L16775" class="LineNr">16775 </span> 53/push-ebx/outputs -<span id="L16776" class="LineNr">16776 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16777" class="LineNr">16777 </span> 68/push 0/imm32/no-inouts -<span id="L16778" class="LineNr">16778 </span> 68/push 0/imm32/no-inouts -<span id="L16779" class="LineNr">16779 </span> 68/push 0/imm32/operation -<span id="L16780" class="LineNr">16780 </span> 68/push 0/imm32/operation -<span id="L16781" class="LineNr">16781 </span> 68/push 1/imm32 -<span id="L16782" class="LineNr">16782 </span> 89/<- %esi 4/r32/esp -<span id="L16783" class="LineNr">16783 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt-operation</span>: -<span id="L16784" class="LineNr">16784 </span> <span class="subxComment"># stmt->operation = "increment"</span> -<span id="L16785" class="LineNr">16785 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L16786" class="LineNr">16786 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L16787" class="LineNr">16787 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-var</span>: -<span id="L16788" class="LineNr">16788 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> -<span id="L16789" class="LineNr">16789 </span> 68/push 0/imm32/register -<span id="L16790" class="LineNr">16790 </span> 68/push 0/imm32/register -<span id="L16791" class="LineNr">16791 </span> 68/push 0/imm32/no-stack-offset -<span id="L16792" class="LineNr">16792 </span> 68/push 1/imm32/block-depth -<span id="L16793" class="LineNr">16793 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> -<span id="L16794" class="LineNr">16794 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16795" class="LineNr">16795 </span> 68/push 0/imm32/name -<span id="L16796" class="LineNr">16796 </span> 68/push 0/imm32/name -<span id="L16797" class="LineNr">16797 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16798" class="LineNr">16798 </span> 89/<- %ebx 4/r32/esp -<span id="L16799" class="LineNr">16799 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-var-name</span>: -<span id="L16800" class="LineNr">16800 </span> <span class="subxComment"># formal-var->name = "dummy"</span> -<span id="L16801" class="LineNr">16801 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16802" class="LineNr">16802 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) -<span id="L16803" class="LineNr">16803 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-register</span>: -<span id="L16804" class="LineNr">16804 </span> <span class="subxComment"># formal-var->register = "*"</span> -<span id="L16805" class="LineNr">16805 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16806" class="LineNr">16806 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> -<span id="L16807" class="LineNr">16807 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-list</span>: -<span id="L16808" class="LineNr">16808 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list var)</span> -<span id="L16809" class="LineNr">16809 </span> 68/push 0/imm32/next -<span id="L16810" class="LineNr">16810 </span> 68/push 0/imm32/next -<span id="L16811" class="LineNr">16811 </span> 53/push-ebx/formal-var -<span id="L16812" class="LineNr">16812 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16813" class="LineNr">16813 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16814" class="LineNr">16814 </span> 89/<- %ebx 4/r32/esp -<span id="L16815" class="LineNr">16815 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2</span>: -<span id="L16816" class="LineNr">16816 </span> <span class="subxComment"># var primitive2/edi: (payload primitive)</span> -<span id="L16817" class="LineNr">16817 </span> 68/push 0/imm32/next -<span id="L16818" class="LineNr">16818 </span> 68/push 0/imm32/next -<span id="L16819" class="LineNr">16819 </span> 68/push 0/imm32/output-is-write-only -<span id="L16820" class="LineNr">16820 </span> 68/push 0/imm32/no-disp32 -<span id="L16821" class="LineNr">16821 </span> 68/push 0/imm32/no-imm32 -<span id="L16822" class="LineNr">16822 </span> 68/push 0/imm32/no-r32 -<span id="L16823" class="LineNr">16823 </span> 68/push 3/imm32/rm32-is-first-output -<span id="L16824" class="LineNr">16824 </span> 68/push 0/imm32/subx-name -<span id="L16825" class="LineNr">16825 </span> 68/push 0/imm32/subx-name -<span id="L16826" class="LineNr">16826 </span> 53/push-ebx/outputs -<span id="L16827" class="LineNr">16827 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16828" class="LineNr">16828 </span> 68/push 0/imm32/no-inouts -<span id="L16829" class="LineNr">16829 </span> 68/push 0/imm32/no-inouts -<span id="L16830" class="LineNr">16830 </span> 68/push 0/imm32/name -<span id="L16831" class="LineNr">16831 </span> 68/push 0/imm32/name -<span id="L16832" class="LineNr">16832 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16833" class="LineNr">16833 </span> 89/<- %edi 4/r32/esp -<span id="L16834" class="LineNr">16834 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2-name</span>: -<span id="L16835" class="LineNr">16835 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L16836" class="LineNr">16836 </span> 8d/copy-address *(edi+4) 0/r32/eax <span class="subxComment"># Primitive-name + 4</span> -<span id="L16837" class="LineNr">16837 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L16838" class="LineNr">16838 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2-subx-name</span>: -<span id="L16839" class="LineNr">16839 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L16840" class="LineNr">16840 </span> 8d/copy-address *(edi+0x1c) 0/r32/eax <span class="subxComment"># Primitive-subx-name + 4</span> -<span id="L16841" class="LineNr">16841 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L16842" class="LineNr">16842 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive</span>: -<span id="L16843" class="LineNr">16843 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> -<span id="L16844" class="LineNr">16844 </span> 57/push-edi -<span id="L16845" class="LineNr">16845 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16846" class="LineNr">16846 </span> 68/push 0/imm32/output-is-write-only -<span id="L16847" class="LineNr">16847 </span> 68/push 0/imm32/no-disp32 -<span id="L16848" class="LineNr">16848 </span> 68/push 0/imm32/no-imm32 -<span id="L16849" class="LineNr">16849 </span> 68/push 0/imm32/no-r32 -<span id="L16850" class="LineNr">16850 </span> 68/push 1/imm32/rm32-is-first-inout -<span id="L16851" class="LineNr">16851 </span> 68/push 0/imm32/subx-name -<span id="L16852" class="LineNr">16852 </span> 68/push 0/imm32/subx-name -<span id="L16853" class="LineNr">16853 </span> 68/push 0/imm32/no-outputs -<span id="L16854" class="LineNr">16854 </span> 68/push 0/imm32/no-outputs -<span id="L16855" class="LineNr">16855 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> -<span id="L16856" class="LineNr">16856 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16857" class="LineNr">16857 </span> 68/push 0/imm32/name -<span id="L16858" class="LineNr">16858 </span> 68/push 0/imm32/name -<span id="L16859" class="LineNr">16859 </span> 89/<- %ebx 4/r32/esp -<span id="L16860" class="LineNr">16860 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive-name</span>: -<span id="L16861" class="LineNr">16861 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L16862" class="LineNr">16862 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> -<span id="L16863" class="LineNr">16863 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive-subx-name</span>: -<span id="L16864" class="LineNr">16864 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L16865" class="LineNr">16865 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> -<span id="L16866" class="LineNr">16866 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L16867" class="LineNr">16867 </span> <span class="subxComment"># convert</span> -<span id="L16868" class="LineNr">16868 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L16869" class="LineNr">16869 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L16870" class="LineNr">16870 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L16871" class="Folded">16871 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L16877" class="LineNr">16877 </span> <span class="subxComment"># check output</span> -<span id="L16878" class="LineNr">16878 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-select-primitive"</span>) -<span id="L16879" class="LineNr">16879 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L16880" class="LineNr">16880 </span> 89/<- %esp 5/r32/ebp -<span id="L16881" class="LineNr">16881 </span> 5d/pop-to-ebp -<span id="L16882" class="LineNr">16882 </span> c3/return -<span id="L16883" class="LineNr">16883 </span> -<span id="L16884" class="LineNr">16884 </span><span class="subxTest">test-emit-subx-stmt-select-primitive-2</span>: -<span id="L16885" class="LineNr">16885 </span> <span class="subxComment"># Select the right primitive between overloads.</span> -<span id="L16886" class="LineNr">16886 </span> <span class="subxComment"># increment foo</span> -<span id="L16887" class="LineNr">16887 </span> <span class="subxComment"># =></span> -<span id="L16888" class="LineNr">16888 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> -<span id="L16889" class="LineNr">16889 </span> <span class="subxComment">#</span> -<span id="L16890" class="LineNr">16890 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L16891" class="LineNr">16891 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L16892" class="LineNr">16892 </span> <span class="subxComment"># type: int</span> -<span id="L16893" class="LineNr">16893 </span> <span class="subxComment"># register: 'eax'</span> -<span id="L16894" class="LineNr">16894 </span> <span class="subxComment">#</span> -<span id="L16895" class="LineNr">16895 </span> <span class="subxComment"># There's two primitives, as follows:</span> -<span id="L16896" class="LineNr">16896 </span> <span class="subxComment"># - name: 'increment'</span> -<span id="L16897" class="LineNr">16897 </span> <span class="subxComment"># out: int/reg</span> -<span id="L16898" class="LineNr">16898 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16899" class="LineNr">16899 </span> <span class="subxComment"># - name: 'increment'</span> -<span id="L16900" class="LineNr">16900 </span> <span class="subxComment"># inout: int/mem</span> -<span id="L16901" class="LineNr">16901 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> -<span id="L16902" class="LineNr">16902 </span> <span class="subxComment">#</span> -<span id="L16903" class="LineNr">16903 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L16904" class="LineNr">16904 </span> 55/push-ebp -<span id="L16905" class="LineNr">16905 </span> 89/<- %ebp 4/r32/esp -<span id="L16906" class="LineNr">16906 </span> <span class="subxComment"># setup</span> -<span id="L16907" class="LineNr">16907 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L16908" class="LineNr">16908 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L16909" class="LineNr">16909 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-type</span>: -<span id="L16910" class="LineNr">16910 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L16911" class="LineNr">16911 </span> 68/push 0/imm32/right:null -<span id="L16912" class="LineNr">16912 </span> 68/push 0/imm32/right:null -<span id="L16913" class="LineNr">16913 </span> 68/push 0/imm32/left:unused -<span id="L16914" class="LineNr">16914 </span> 68/push 1/imm32/value:int -<span id="L16915" class="LineNr">16915 </span> 68/push 1/imm32/is-atom?:true -<span id="L16916" class="LineNr">16916 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16917" class="LineNr">16917 </span> 89/<- %ecx 4/r32/esp -<span id="L16918" class="LineNr">16918 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var</span>: -<span id="L16919" class="LineNr">16919 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> -<span id="L16920" class="LineNr">16920 </span> 68/push 0/imm32/register -<span id="L16921" class="LineNr">16921 </span> 68/push 0/imm32/register -<span id="L16922" class="LineNr">16922 </span> 68/push 0/imm32/no-stack-offset -<span id="L16923" class="LineNr">16923 </span> 68/push 1/imm32/block-depth -<span id="L16924" class="LineNr">16924 </span> 51/push-ecx -<span id="L16925" class="LineNr">16925 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16926" class="LineNr">16926 </span> 68/push 0/imm32/name -<span id="L16927" class="LineNr">16927 </span> 68/push 0/imm32/name -<span id="L16928" class="LineNr">16928 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16929" class="LineNr">16929 </span> 89/<- %ecx 4/r32/esp -<span id="L16930" class="LineNr">16930 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-name</span>: -<span id="L16931" class="LineNr">16931 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L16932" class="LineNr">16932 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16933" class="LineNr">16933 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L16934" class="LineNr">16934 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-register</span>: -<span id="L16935" class="LineNr">16935 </span> <span class="subxComment"># var-foo->register = "eax"</span> -<span id="L16936" class="LineNr">16936 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16937" class="LineNr">16937 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L16938" class="LineNr">16938 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt-var</span>: -<span id="L16939" class="LineNr">16939 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> -<span id="L16940" class="LineNr">16940 </span> 68/push 0/imm32/is-deref:false -<span id="L16941" class="LineNr">16941 </span> 68/push 0/imm32/next -<span id="L16942" class="LineNr">16942 </span> 68/push 0/imm32/next -<span id="L16943" class="LineNr">16943 </span> 51/push-ecx/var-foo -<span id="L16944" class="LineNr">16944 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16945" class="LineNr">16945 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16946" class="LineNr">16946 </span> 89/<- %ebx 4/r32/esp -<span id="L16947" class="LineNr">16947 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt</span>: -<span id="L16948" class="LineNr">16948 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L16949" class="LineNr">16949 </span> 68/push 0/imm32/no-outputs -<span id="L16950" class="LineNr">16950 </span> 68/push 0/imm32/no-outputs -<span id="L16951" class="LineNr">16951 </span> 53/push-ebx/inouts -<span id="L16952" class="LineNr">16952 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16953" class="LineNr">16953 </span> 68/push 0/imm32/operation -<span id="L16954" class="LineNr">16954 </span> 68/push 0/imm32/operation -<span id="L16955" class="LineNr">16955 </span> 68/push 1/imm32 -<span id="L16956" class="LineNr">16956 </span> 89/<- %esi 4/r32/esp -<span id="L16957" class="LineNr">16957 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt-operation</span>: -<span id="L16958" class="LineNr">16958 </span> <span class="subxComment"># stmt->operation = "increment"</span> -<span id="L16959" class="LineNr">16959 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L16960" class="LineNr">16960 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L16961" class="LineNr">16961 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-var</span>: -<span id="L16962" class="LineNr">16962 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> -<span id="L16963" class="LineNr">16963 </span> 68/push 0/imm32/register -<span id="L16964" class="LineNr">16964 </span> 68/push 0/imm32/register -<span id="L16965" class="LineNr">16965 </span> 68/push 0/imm32/no-stack-offset -<span id="L16966" class="LineNr">16966 </span> 68/push 1/imm32/block-depth -<span id="L16967" class="LineNr">16967 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> -<span id="L16968" class="LineNr">16968 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16969" class="LineNr">16969 </span> 68/push 0/imm32/name -<span id="L16970" class="LineNr">16970 </span> 68/push 0/imm32/name -<span id="L16971" class="LineNr">16971 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16972" class="LineNr">16972 </span> 89/<- %ebx 4/r32/esp -<span id="L16973" class="LineNr">16973 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-var-name</span>: -<span id="L16974" class="LineNr">16974 </span> <span class="subxComment"># formal-var->name = "dummy"</span> -<span id="L16975" class="LineNr">16975 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L16976" class="LineNr">16976 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) -<span id="L16977" class="LineNr">16977 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-register</span>: -<span id="L16978" class="LineNr">16978 </span> <span class="subxComment"># formal-var->register = "*"</span> -<span id="L16979" class="LineNr">16979 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L16980" class="LineNr">16980 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> -<span id="L16981" class="LineNr">16981 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-list</span>: -<span id="L16982" class="LineNr">16982 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list stmt-var)</span> -<span id="L16983" class="LineNr">16983 </span> 68/push 0/imm32/next -<span id="L16984" class="LineNr">16984 </span> 68/push 0/imm32/next -<span id="L16985" class="LineNr">16985 </span> 53/push-ebx/formal-var -<span id="L16986" class="LineNr">16986 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L16987" class="LineNr">16987 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L16988" class="LineNr">16988 </span> 89/<- %ebx 4/r32/esp -<span id="L16989" class="LineNr">16989 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2</span>: -<span id="L16990" class="LineNr">16990 </span> <span class="subxComment"># var primitive2/edi: (payload primitive)</span> -<span id="L16991" class="LineNr">16991 </span> 68/push 0/imm32/next -<span id="L16992" class="LineNr">16992 </span> 68/push 0/imm32/next -<span id="L16993" class="LineNr">16993 </span> 68/push 0/imm32/output-is-write-only -<span id="L16994" class="LineNr">16994 </span> 68/push 0/imm32/no-disp32 -<span id="L16995" class="LineNr">16995 </span> 68/push 0/imm32/no-imm32 -<span id="L16996" class="LineNr">16996 </span> 68/push 0/imm32/no-r32 -<span id="L16997" class="LineNr">16997 </span> 68/push 3/imm32/rm32-is-first-output -<span id="L16998" class="LineNr">16998 </span> 68/push 0/imm32/subx-name -<span id="L16999" class="LineNr">16999 </span> 68/push 0/imm32/subx-name -<span id="L17000" class="LineNr">17000 </span> 53/push-ebx/outputs -<span id="L17001" class="LineNr">17001 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17002" class="LineNr">17002 </span> 68/push 0/imm32/no-inouts -<span id="L17003" class="LineNr">17003 </span> 68/push 0/imm32/no-inouts -<span id="L17004" class="LineNr">17004 </span> 68/push 0/imm32/name -<span id="L17005" class="LineNr">17005 </span> 68/push 0/imm32/name -<span id="L17006" class="LineNr">17006 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17007" class="LineNr">17007 </span> 89/<- %edi 4/r32/esp -<span id="L17008" class="LineNr">17008 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2-name</span>: -<span id="L17009" class="LineNr">17009 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L17010" class="LineNr">17010 </span> 8d/copy-address *(edi+4) 0/r32/eax <span class="subxComment"># Primitive-name + 4</span> -<span id="L17011" class="LineNr">17011 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L17012" class="LineNr">17012 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2-subx-name</span>: -<span id="L17013" class="LineNr">17013 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L17014" class="LineNr">17014 </span> 8d/copy-address *(edi+0x1c) 0/r32/eax <span class="subxComment"># Primitive-subx-name + 4</span> -<span id="L17015" class="LineNr">17015 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L17016" class="LineNr">17016 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive</span>: -<span id="L17017" class="LineNr">17017 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> -<span id="L17018" class="LineNr">17018 </span> 57/push-edi -<span id="L17019" class="LineNr">17019 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17020" class="LineNr">17020 </span> 68/push 0/imm32/output-is-write-only -<span id="L17021" class="LineNr">17021 </span> 68/push 0/imm32/no-disp32 -<span id="L17022" class="LineNr">17022 </span> 68/push 0/imm32/no-imm32 -<span id="L17023" class="LineNr">17023 </span> 68/push 0/imm32/no-r32 -<span id="L17024" class="LineNr">17024 </span> 68/push 1/imm32/rm32-is-first-inout -<span id="L17025" class="LineNr">17025 </span> 68/push 0/imm32/subx-name -<span id="L17026" class="LineNr">17026 </span> 68/push 0/imm32/subx-name -<span id="L17027" class="LineNr">17027 </span> 68/push 0/imm32/no-outputs -<span id="L17028" class="LineNr">17028 </span> 68/push 0/imm32/no-outputs -<span id="L17029" class="LineNr">17029 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> -<span id="L17030" class="LineNr">17030 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17031" class="LineNr">17031 </span> 68/push 0/imm32/name -<span id="L17032" class="LineNr">17032 </span> 68/push 0/imm32/name -<span id="L17033" class="LineNr">17033 </span> 89/<- %ebx 4/r32/esp -<span id="L17034" class="LineNr">17034 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive-name</span>: -<span id="L17035" class="LineNr">17035 </span> <span class="subxComment"># primitives->name = "increment"</span> -<span id="L17036" class="LineNr">17036 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> -<span id="L17037" class="LineNr">17037 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive-subx-name</span>: -<span id="L17038" class="LineNr">17038 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> -<span id="L17039" class="LineNr">17039 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> -<span id="L17040" class="LineNr">17040 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) -<span id="L17041" class="LineNr">17041 </span> <span class="subxComment"># convert</span> -<span id="L17042" class="LineNr">17042 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17043" class="LineNr">17043 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17044" class="LineNr">17044 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17045" class="Folded">17045 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17051" class="LineNr">17051 </span> <span class="subxComment"># check output</span> -<span id="L17052" class="LineNr">17052 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-select-primitive-2"</span>) -<span id="L17053" class="LineNr">17053 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17054" class="LineNr">17054 </span> 89/<- %esp 5/r32/ebp -<span id="L17055" class="LineNr">17055 </span> 5d/pop-to-ebp -<span id="L17056" class="LineNr">17056 </span> c3/return -<span id="L17057" class="LineNr">17057 </span> -<span id="L17058" class="LineNr">17058 </span><span class="subxTest">test-increment-register</span>: -<span id="L17059" class="LineNr">17059 </span> <span class="subxComment"># Select the right register between overloads.</span> -<span id="L17060" class="LineNr">17060 </span> <span class="subxComment"># foo <- increment</span> -<span id="L17061" class="LineNr">17061 </span> <span class="subxComment"># =></span> -<span id="L17062" class="LineNr">17062 </span> <span class="subxComment"># 50/increment-eax</span> -<span id="L17063" class="LineNr">17063 </span> <span class="subxComment">#</span> -<span id="L17064" class="LineNr">17064 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L17065" class="LineNr">17065 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L17066" class="LineNr">17066 </span> <span class="subxComment"># type: int</span> -<span id="L17067" class="LineNr">17067 </span> <span class="subxComment"># register: 'eax'</span> -<span id="L17068" class="LineNr">17068 </span> <span class="subxComment">#</span> -<span id="L17069" class="LineNr">17069 </span> <span class="subxComment"># Primitives are the global definitions.</span> -<span id="L17070" class="LineNr">17070 </span> <span class="subxComment">#</span> -<span id="L17071" class="LineNr">17071 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17072" class="LineNr">17072 </span> 55/push-ebp -<span id="L17073" class="LineNr">17073 </span> 89/<- %ebp 4/r32/esp -<span id="L17074" class="LineNr">17074 </span> <span class="subxComment"># setup</span> -<span id="L17075" class="LineNr">17075 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17076" class="LineNr">17076 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17077" class="LineNr">17077 </span><span class="Constant">$test-increment-register:initialize-type</span>: -<span id="L17078" class="LineNr">17078 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17079" class="LineNr">17079 </span> 68/push 0/imm32/right:null -<span id="L17080" class="LineNr">17080 </span> 68/push 0/imm32/right:null -<span id="L17081" class="LineNr">17081 </span> 68/push 0/imm32/left:unused -<span id="L17082" class="LineNr">17082 </span> 68/push 1/imm32/value:int -<span id="L17083" class="LineNr">17083 </span> 68/push 1/imm32/is-atom?:true -<span id="L17084" class="LineNr">17084 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17085" class="LineNr">17085 </span> 89/<- %ecx 4/r32/esp -<span id="L17086" class="LineNr">17086 </span><span class="Constant">$test-increment-register:initialize-var</span>: -<span id="L17087" class="LineNr">17087 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> -<span id="L17088" class="LineNr">17088 </span> 68/push 0/imm32/register -<span id="L17089" class="LineNr">17089 </span> 68/push 0/imm32/register -<span id="L17090" class="LineNr">17090 </span> 68/push 0/imm32/no-stack-offset -<span id="L17091" class="LineNr">17091 </span> 68/push 1/imm32/block-depth -<span id="L17092" class="LineNr">17092 </span> 51/push-ecx -<span id="L17093" class="LineNr">17093 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17094" class="LineNr">17094 </span> 68/push 0/imm32/name -<span id="L17095" class="LineNr">17095 </span> 68/push 0/imm32/name -<span id="L17096" class="LineNr">17096 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17097" class="LineNr">17097 </span> 89/<- %ecx 4/r32/esp -<span id="L17098" class="LineNr">17098 </span><span class="Constant">$test-increment-register:initialize-var-name</span>: -<span id="L17099" class="LineNr">17099 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L17100" class="LineNr">17100 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17101" class="LineNr">17101 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L17102" class="LineNr">17102 </span><span class="Constant">$test-increment-register:initialize-var-register</span>: -<span id="L17103" class="LineNr">17103 </span> <span class="subxComment"># var-foo->register = "eax"</span> -<span id="L17104" class="LineNr">17104 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17105" class="LineNr">17105 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17106" class="LineNr">17106 </span><span class="Constant">$test-increment-register:initialize-stmt-var</span>: -<span id="L17107" class="LineNr">17107 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> -<span id="L17108" class="LineNr">17108 </span> 68/push 0/imm32/is-deref:false -<span id="L17109" class="LineNr">17109 </span> 68/push 0/imm32/next -<span id="L17110" class="LineNr">17110 </span> 68/push 0/imm32/next -<span id="L17111" class="LineNr">17111 </span> 51/push-ecx/var-foo -<span id="L17112" class="LineNr">17112 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17113" class="LineNr">17113 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17114" class="LineNr">17114 </span> 89/<- %ebx 4/r32/esp -<span id="L17115" class="LineNr">17115 </span><span class="Constant">$test-increment-register:initialize-stmt</span>: -<span id="L17116" class="LineNr">17116 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17117" class="LineNr">17117 </span> 53/push-ebx/outputs -<span id="L17118" class="LineNr">17118 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17119" class="LineNr">17119 </span> 68/push 0/imm32/no-inouts -<span id="L17120" class="LineNr">17120 </span> 68/push 0/imm32/no-inouts -<span id="L17121" class="LineNr">17121 </span> 68/push 0/imm32/operation -<span id="L17122" class="LineNr">17122 </span> 68/push 0/imm32/operation -<span id="L17123" class="LineNr">17123 </span> 68/push 1/imm32 -<span id="L17124" class="LineNr">17124 </span> 89/<- %esi 4/r32/esp -<span id="L17125" class="LineNr">17125 </span><span class="Constant">$test-increment-register:initialize-stmt-operation</span>: -<span id="L17126" class="LineNr">17126 </span> <span class="subxComment"># stmt->operation = "increment"</span> -<span id="L17127" class="LineNr">17127 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17128" class="LineNr">17128 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) -<span id="L17129" class="LineNr">17129 </span> <span class="subxComment"># convert</span> -<span id="L17130" class="LineNr">17130 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17131" class="LineNr">17131 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17132" class="LineNr">17132 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17133" class="Folded">17133 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17139" class="LineNr">17139 </span> <span class="subxComment"># check output</span> -<span id="L17140" class="LineNr">17140 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"40/increment-eax"</span> <span class="Constant">"F - test-increment-register"</span>) -<span id="L17141" class="LineNr">17141 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17142" class="LineNr">17142 </span> 89/<- %esp 5/r32/ebp -<span id="L17143" class="LineNr">17143 </span> 5d/pop-to-ebp -<span id="L17144" class="LineNr">17144 </span> c3/return -<span id="L17145" class="LineNr">17145 </span> -<span id="L17146" class="LineNr">17146 </span><span class="subxTest">test-add-reg-to-reg</span>: -<span id="L17147" class="LineNr">17147 </span> <span class="subxComment"># var1/reg <- add var2/reg</span> -<span id="L17148" class="LineNr">17148 </span> <span class="subxComment"># =></span> -<span id="L17149" class="LineNr">17149 </span> <span class="subxComment"># 01/add-to %var1 var2</span> -<span id="L17150" class="LineNr">17150 </span> <span class="subxComment">#</span> -<span id="L17151" class="LineNr">17151 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17152" class="LineNr">17152 </span> 55/push-ebp -<span id="L17153" class="LineNr">17153 </span> 89/<- %ebp 4/r32/esp -<span id="L17154" class="LineNr">17154 </span> <span class="subxComment"># setup</span> -<span id="L17155" class="LineNr">17155 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17156" class="LineNr">17156 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17157" class="LineNr">17157 </span><span class="Constant">$test-add-reg-to-reg:initialize-type</span>: -<span id="L17158" class="LineNr">17158 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17159" class="LineNr">17159 </span> 68/push 0/imm32/right:null -<span id="L17160" class="LineNr">17160 </span> 68/push 0/imm32/right:null -<span id="L17161" class="LineNr">17161 </span> 68/push 0/imm32/left:unused -<span id="L17162" class="LineNr">17162 </span> 68/push 1/imm32/value:int -<span id="L17163" class="LineNr">17163 </span> 68/push 1/imm32/is-atom?:true -<span id="L17164" class="LineNr">17164 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17165" class="LineNr">17165 </span> 89/<- %ecx 4/r32/esp -<span id="L17166" class="LineNr">17166 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1</span>: -<span id="L17167" class="LineNr">17167 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17168" class="LineNr">17168 </span> 68/push 0/imm32/register -<span id="L17169" class="LineNr">17169 </span> 68/push 0/imm32/register -<span id="L17170" class="LineNr">17170 </span> 68/push 0/imm32/no-stack-offset -<span id="L17171" class="LineNr">17171 </span> 68/push 1/imm32/block-depth -<span id="L17172" class="LineNr">17172 </span> 51/push-ecx -<span id="L17173" class="LineNr">17173 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17174" class="LineNr">17174 </span> 68/push 0/imm32/name -<span id="L17175" class="LineNr">17175 </span> 68/push 0/imm32/name -<span id="L17176" class="LineNr">17176 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17177" class="LineNr">17177 </span> 89/<- %ecx 4/r32/esp -<span id="L17178" class="LineNr">17178 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1-name</span>: -<span id="L17179" class="LineNr">17179 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L17180" class="LineNr">17180 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17181" class="LineNr">17181 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17182" class="LineNr">17182 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1-register</span>: -<span id="L17183" class="LineNr">17183 </span> <span class="subxComment"># var1->register = "eax"</span> -<span id="L17184" class="LineNr">17184 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17185" class="LineNr">17185 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17186" class="LineNr">17186 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2</span>: -<span id="L17187" class="LineNr">17187 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L17188" class="LineNr">17188 </span> 68/push 0/imm32/register -<span id="L17189" class="LineNr">17189 </span> 68/push 0/imm32/register -<span id="L17190" class="LineNr">17190 </span> 68/push 0/imm32/no-stack-offset -<span id="L17191" class="LineNr">17191 </span> 68/push 1/imm32/block-depth -<span id="L17192" class="LineNr">17192 </span> ff 6/subop/push *(ecx+0x10) -<span id="L17193" class="LineNr">17193 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17194" class="LineNr">17194 </span> 68/push 0/imm32/name -<span id="L17195" class="LineNr">17195 </span> 68/push 0/imm32/name -<span id="L17196" class="LineNr">17196 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17197" class="LineNr">17197 </span> 89/<- %edx 4/r32/esp -<span id="L17198" class="LineNr">17198 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2-name</span>: -<span id="L17199" class="LineNr">17199 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L17200" class="LineNr">17200 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17201" class="LineNr">17201 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L17202" class="LineNr">17202 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2-register</span>: -<span id="L17203" class="LineNr">17203 </span> <span class="subxComment"># var2->register = "ecx"</span> -<span id="L17204" class="LineNr">17204 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17205" class="LineNr">17205 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) -<span id="L17206" class="LineNr">17206 </span><span class="Constant">$test-add-reg-to-reg:initialize-inouts</span>: -<span id="L17207" class="LineNr">17207 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L17208" class="LineNr">17208 </span> 68/push 0/imm32/is-deref:false -<span id="L17209" class="LineNr">17209 </span> 68/push 0/imm32/next -<span id="L17210" class="LineNr">17210 </span> 68/push 0/imm32/next -<span id="L17211" class="LineNr">17211 </span> 52/push-edx/var2 -<span id="L17212" class="LineNr">17212 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17213" class="LineNr">17213 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17214" class="LineNr">17214 </span> 89/<- %esi 4/r32/esp -<span id="L17215" class="LineNr">17215 </span><span class="Constant">$test-add-reg-to-reg:initialize-outputs</span>: -<span id="L17216" class="LineNr">17216 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [var1]</span> -<span id="L17217" class="LineNr">17217 </span> 68/push 0/imm32/is-deref:false -<span id="L17218" class="LineNr">17218 </span> 68/push 0/imm32/next -<span id="L17219" class="LineNr">17219 </span> 68/push 0/imm32/next -<span id="L17220" class="LineNr">17220 </span> 51/push-ecx/var1 -<span id="L17221" class="LineNr">17221 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17222" class="LineNr">17222 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17223" class="LineNr">17223 </span> 89/<- %edi 4/r32/esp -<span id="L17224" class="LineNr">17224 </span><span class="Constant">$test-add-reg-to-reg:initialize-stmt</span>: -<span id="L17225" class="LineNr">17225 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17226" class="LineNr">17226 </span> 68/push 0/imm32/next -<span id="L17227" class="LineNr">17227 </span> 68/push 0/imm32/next -<span id="L17228" class="LineNr">17228 </span> 57/push-edi/outputs -<span id="L17229" class="LineNr">17229 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17230" class="LineNr">17230 </span> 56/push-esi/inouts -<span id="L17231" class="LineNr">17231 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17232" class="LineNr">17232 </span> 68/push 0/imm32/operation -<span id="L17233" class="LineNr">17233 </span> 68/push 0/imm32/operation -<span id="L17234" class="LineNr">17234 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17235" class="LineNr">17235 </span> 89/<- %esi 4/r32/esp -<span id="L17236" class="LineNr">17236 </span><span class="Constant">$test-add-reg-to-reg:initialize-stmt-operation</span>: -<span id="L17237" class="LineNr">17237 </span> <span class="subxComment"># stmt->operation = "add"</span> -<span id="L17238" class="LineNr">17238 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17239" class="LineNr">17239 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) -<span id="L17240" class="LineNr">17240 </span> <span class="subxComment"># convert</span> -<span id="L17241" class="LineNr">17241 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17242" class="LineNr">17242 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17243" class="LineNr">17243 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17244" class="Folded">17244 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17250" class="LineNr">17250 </span> <span class="subxComment"># check output</span> -<span id="L17251" class="LineNr">17251 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"01/add-to %eax 0x00000001/r32"</span> <span class="Constant">"F - test-add-reg-to-reg"</span>) -<span id="L17252" class="LineNr">17252 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17253" class="LineNr">17253 </span> 89/<- %esp 5/r32/ebp -<span id="L17254" class="LineNr">17254 </span> 5d/pop-to-ebp -<span id="L17255" class="LineNr">17255 </span> c3/return -<span id="L17256" class="LineNr">17256 </span> -<span id="L17257" class="LineNr">17257 </span><span class="subxTest">test-add-reg-to-mem</span>: -<span id="L17258" class="LineNr">17258 </span> <span class="subxComment"># add-to var1 var2/reg</span> -<span id="L17259" class="LineNr">17259 </span> <span class="subxComment"># =></span> -<span id="L17260" class="LineNr">17260 </span> <span class="subxComment"># 01/add-to *(ebp+__) var2</span> -<span id="L17261" class="LineNr">17261 </span> <span class="subxComment">#</span> -<span id="L17262" class="LineNr">17262 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17263" class="LineNr">17263 </span> 55/push-ebp -<span id="L17264" class="LineNr">17264 </span> 89/<- %ebp 4/r32/esp -<span id="L17265" class="LineNr">17265 </span> <span class="subxComment"># setup</span> -<span id="L17266" class="LineNr">17266 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17267" class="LineNr">17267 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17268" class="LineNr">17268 </span><span class="Constant">$test-add-reg-to-mem:initialize-type</span>: -<span id="L17269" class="LineNr">17269 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17270" class="LineNr">17270 </span> 68/push 0/imm32/right:null -<span id="L17271" class="LineNr">17271 </span> 68/push 0/imm32/right:null -<span id="L17272" class="LineNr">17272 </span> 68/push 0/imm32/left:unused -<span id="L17273" class="LineNr">17273 </span> 68/push 1/imm32/value:int -<span id="L17274" class="LineNr">17274 </span> 68/push 1/imm32/is-atom?:true -<span id="L17275" class="LineNr">17275 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17276" class="LineNr">17276 </span> 89/<- %ecx 4/r32/esp -<span id="L17277" class="LineNr">17277 </span><span class="Constant">$test-add-reg-to-mem:initialize-var1</span>: -<span id="L17278" class="LineNr">17278 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17279" class="LineNr">17279 </span> 68/push 0/imm32/register -<span id="L17280" class="LineNr">17280 </span> 68/push 0/imm32/register -<span id="L17281" class="LineNr">17281 </span> 68/push 8/imm32/stack-offset -<span id="L17282" class="LineNr">17282 </span> 68/push 1/imm32/block-depth -<span id="L17283" class="LineNr">17283 </span> 51/push-ecx -<span id="L17284" class="LineNr">17284 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17285" class="LineNr">17285 </span> 68/push 0/imm32/name -<span id="L17286" class="LineNr">17286 </span> 68/push 0/imm32/name -<span id="L17287" class="LineNr">17287 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17288" class="LineNr">17288 </span> 89/<- %ecx 4/r32/esp -<span id="L17289" class="LineNr">17289 </span><span class="Constant">$test-add-reg-to-mem:initialize-var1-name</span>: -<span id="L17290" class="LineNr">17290 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L17291" class="LineNr">17291 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17292" class="LineNr">17292 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17293" class="LineNr">17293 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2</span>: -<span id="L17294" class="LineNr">17294 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L17295" class="LineNr">17295 </span> 68/push 0/imm32/register -<span id="L17296" class="LineNr">17296 </span> 68/push 0/imm32/register -<span id="L17297" class="LineNr">17297 </span> 68/push 0/imm32/no-stack-offset -<span id="L17298" class="LineNr">17298 </span> 68/push 1/imm32/block-depth -<span id="L17299" class="LineNr">17299 </span> ff 6/subop/push *(ecx+0x10) -<span id="L17300" class="LineNr">17300 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17301" class="LineNr">17301 </span> 68/push 0/imm32/name -<span id="L17302" class="LineNr">17302 </span> 68/push 0/imm32/name -<span id="L17303" class="LineNr">17303 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17304" class="LineNr">17304 </span> 89/<- %edx 4/r32/esp -<span id="L17305" class="LineNr">17305 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2-name</span>: -<span id="L17306" class="LineNr">17306 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L17307" class="LineNr">17307 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17308" class="LineNr">17308 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L17309" class="LineNr">17309 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2-register</span>: -<span id="L17310" class="LineNr">17310 </span> <span class="subxComment"># var2->register = "ecx"</span> -<span id="L17311" class="LineNr">17311 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17312" class="LineNr">17312 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) -<span id="L17313" class="LineNr">17313 </span><span class="Constant">$test-add-reg-to-mem:initialize-inouts</span>: -<span id="L17314" class="LineNr">17314 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L17315" class="LineNr">17315 </span> 68/push 0/imm32/is-deref:false -<span id="L17316" class="LineNr">17316 </span> 68/push 0/imm32/next -<span id="L17317" class="LineNr">17317 </span> 68/push 0/imm32/next -<span id="L17318" class="LineNr">17318 </span> 52/push-edx/var2 -<span id="L17319" class="LineNr">17319 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17320" class="LineNr">17320 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17321" class="LineNr">17321 </span> 89/<- %esi 4/r32/esp -<span id="L17322" class="LineNr">17322 </span> <span class="subxComment"># inouts = [var1, var2]</span> -<span id="L17323" class="LineNr">17323 </span> 68/push 0/imm32/is-deref:false -<span id="L17324" class="LineNr">17324 </span> 56/push-esi/next -<span id="L17325" class="LineNr">17325 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17326" class="LineNr">17326 </span> 51/push-ecx/var1 -<span id="L17327" class="LineNr">17327 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17328" class="LineNr">17328 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17329" class="LineNr">17329 </span> 89/<- %esi 4/r32/esp -<span id="L17330" class="LineNr">17330 </span><span class="Constant">$test-add-reg-to-mem:initialize-stmt</span>: -<span id="L17331" class="LineNr">17331 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17332" class="LineNr">17332 </span> 68/push 0/imm32/next -<span id="L17333" class="LineNr">17333 </span> 68/push 0/imm32/next -<span id="L17334" class="LineNr">17334 </span> 68/push 0/imm32/outputs -<span id="L17335" class="LineNr">17335 </span> 68/push 0/imm32/outputs -<span id="L17336" class="LineNr">17336 </span> 56/push-esi/inouts -<span id="L17337" class="LineNr">17337 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17338" class="LineNr">17338 </span> 68/push 0/imm32/operation -<span id="L17339" class="LineNr">17339 </span> 68/push 0/imm32/operation -<span id="L17340" class="LineNr">17340 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17341" class="LineNr">17341 </span> 89/<- %esi 4/r32/esp -<span id="L17342" class="LineNr">17342 </span><span class="Constant">$test-add-reg-to-mem:initialize-stmt-operation</span>: -<span id="L17343" class="LineNr">17343 </span> <span class="subxComment"># stmt->operation = "add-to"</span> -<span id="L17344" class="LineNr">17344 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17345" class="LineNr">17345 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add-to"</span> %eax) -<span id="L17346" class="LineNr">17346 </span> <span class="subxComment"># convert</span> -<span id="L17347" class="LineNr">17347 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17348" class="LineNr">17348 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17349" class="LineNr">17349 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17350" class="Folded">17350 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17356" class="LineNr">17356 </span> <span class="subxComment"># check output</span> -<span id="L17357" class="LineNr">17357 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"01/add-to *(ebp+0x00000008) 0x00000001/r32"</span> <span class="Constant">"F - test-add-reg-to-mem"</span>) -<span id="L17358" class="LineNr">17358 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17359" class="LineNr">17359 </span> 89/<- %esp 5/r32/ebp -<span id="L17360" class="LineNr">17360 </span> 5d/pop-to-ebp -<span id="L17361" class="LineNr">17361 </span> c3/return -<span id="L17362" class="LineNr">17362 </span> -<span id="L17363" class="LineNr">17363 </span><span class="subxTest">test-add-mem-to-reg</span>: -<span id="L17364" class="LineNr">17364 </span> <span class="subxComment"># var1/reg <- add var2</span> -<span id="L17365" class="LineNr">17365 </span> <span class="subxComment"># =></span> -<span id="L17366" class="LineNr">17366 </span> <span class="subxComment"># 03/add *(ebp+__) var1</span> -<span id="L17367" class="LineNr">17367 </span> <span class="subxComment">#</span> -<span id="L17368" class="LineNr">17368 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17369" class="LineNr">17369 </span> 55/push-ebp -<span id="L17370" class="LineNr">17370 </span> 89/<- %ebp 4/r32/esp -<span id="L17371" class="LineNr">17371 </span> <span class="subxComment"># setup</span> -<span id="L17372" class="LineNr">17372 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17373" class="LineNr">17373 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17374" class="LineNr">17374 </span><span class="Constant">$test-add-mem-to-reg:initialize-type</span>: -<span id="L17375" class="LineNr">17375 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17376" class="LineNr">17376 </span> 68/push 0/imm32/right:null -<span id="L17377" class="LineNr">17377 </span> 68/push 0/imm32/right:null -<span id="L17378" class="LineNr">17378 </span> 68/push 0/imm32/left:unused -<span id="L17379" class="LineNr">17379 </span> 68/push 1/imm32/value:int -<span id="L17380" class="LineNr">17380 </span> 68/push 1/imm32/is-atom?:true -<span id="L17381" class="LineNr">17381 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17382" class="LineNr">17382 </span> 89/<- %ecx 4/r32/esp -<span id="L17383" class="LineNr">17383 </span><span class="Constant">$test-add-mem-to-reg:initialize-var</span>: -<span id="L17384" class="LineNr">17384 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17385" class="LineNr">17385 </span> 68/push 0/imm32/register -<span id="L17386" class="LineNr">17386 </span> 68/push 0/imm32/register -<span id="L17387" class="LineNr">17387 </span> 68/push 0/imm32/no-stack-offset -<span id="L17388" class="LineNr">17388 </span> 68/push 1/imm32/block-depth -<span id="L17389" class="LineNr">17389 </span> 51/push-ecx -<span id="L17390" class="LineNr">17390 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17391" class="LineNr">17391 </span> 68/push 0/imm32/name -<span id="L17392" class="LineNr">17392 </span> 68/push 0/imm32/name -<span id="L17393" class="LineNr">17393 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17394" class="LineNr">17394 </span> 89/<- %ecx 4/r32/esp -<span id="L17395" class="LineNr">17395 </span><span class="Constant">$test-add-mem-to-reg:initialize-var-name</span>: -<span id="L17396" class="LineNr">17396 </span> <span class="subxComment"># var1->name = "foo"</span> -<span id="L17397" class="LineNr">17397 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17398" class="LineNr">17398 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17399" class="LineNr">17399 </span><span class="Constant">$test-add-mem-to-reg:initialize-var-register</span>: -<span id="L17400" class="LineNr">17400 </span> <span class="subxComment"># var1->register = "eax"</span> -<span id="L17401" class="LineNr">17401 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17402" class="LineNr">17402 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17403" class="LineNr">17403 </span><span class="Constant">$test-add-mem-to-reg:initialize-var2</span>: -<span id="L17404" class="LineNr">17404 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L17405" class="LineNr">17405 </span> 68/push 0/imm32/register -<span id="L17406" class="LineNr">17406 </span> 68/push 0/imm32/register -<span id="L17407" class="LineNr">17407 </span> 68/push 8/imm32/stack-offset -<span id="L17408" class="LineNr">17408 </span> 68/push 1/imm32/block-depth -<span id="L17409" class="LineNr">17409 </span> ff 6/subop/push *(ecx+0x10) -<span id="L17410" class="LineNr">17410 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17411" class="LineNr">17411 </span> 68/push 0/imm32/name -<span id="L17412" class="LineNr">17412 </span> 68/push 0/imm32/name -<span id="L17413" class="LineNr">17413 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17414" class="LineNr">17414 </span> 89/<- %edx 4/r32/esp -<span id="L17415" class="LineNr">17415 </span><span class="Constant">$test-add-mem-to-reg:initialize-var2-name</span>: -<span id="L17416" class="LineNr">17416 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L17417" class="LineNr">17417 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17418" class="LineNr">17418 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L17419" class="LineNr">17419 </span><span class="Constant">$test-add-mem-to-reg:initialize-inouts</span>: -<span id="L17420" class="LineNr">17420 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L17421" class="LineNr">17421 </span> 68/push 0/imm32/is-deref:false -<span id="L17422" class="LineNr">17422 </span> 68/push 0/imm32/next -<span id="L17423" class="LineNr">17423 </span> 68/push 0/imm32/next -<span id="L17424" class="LineNr">17424 </span> 52/push-edx/var2 -<span id="L17425" class="LineNr">17425 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17426" class="LineNr">17426 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17427" class="LineNr">17427 </span> 89/<- %esi 4/r32/esp -<span id="L17428" class="LineNr">17428 </span><span class="Constant">$test-add-mem-to-reg:initialize-outputs</span>: -<span id="L17429" class="LineNr">17429 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [var1]</span> -<span id="L17430" class="LineNr">17430 </span> 68/push 0/imm32/is-deref:false -<span id="L17431" class="LineNr">17431 </span> 68/push 0/imm32/next -<span id="L17432" class="LineNr">17432 </span> 68/push 0/imm32/next -<span id="L17433" class="LineNr">17433 </span> 51/push-ecx/var1 -<span id="L17434" class="LineNr">17434 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17435" class="LineNr">17435 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17436" class="LineNr">17436 </span> 89/<- %edi 4/r32/esp -<span id="L17437" class="LineNr">17437 </span><span class="Constant">$test-add-mem-to-reg:initialize-stmt</span>: -<span id="L17438" class="LineNr">17438 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17439" class="LineNr">17439 </span> 68/push 0/imm32/next -<span id="L17440" class="LineNr">17440 </span> 68/push 0/imm32/next -<span id="L17441" class="LineNr">17441 </span> 57/push-edi/outputs -<span id="L17442" class="LineNr">17442 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17443" class="LineNr">17443 </span> 56/push-esi/inouts -<span id="L17444" class="LineNr">17444 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17445" class="LineNr">17445 </span> 68/push 0/imm32/operation -<span id="L17446" class="LineNr">17446 </span> 68/push 0/imm32/operation -<span id="L17447" class="LineNr">17447 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17448" class="LineNr">17448 </span> 89/<- %esi 4/r32/esp -<span id="L17449" class="LineNr">17449 </span><span class="Constant">$test-add-mem-to-reg:initialize-stmt-operation</span>: -<span id="L17450" class="LineNr">17450 </span> <span class="subxComment"># stmt->operation = "add"</span> -<span id="L17451" class="LineNr">17451 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17452" class="LineNr">17452 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) -<span id="L17453" class="LineNr">17453 </span> <span class="subxComment"># convert</span> -<span id="L17454" class="LineNr">17454 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17455" class="LineNr">17455 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17456" class="LineNr">17456 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17457" class="Folded">17457 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17463" class="LineNr">17463 </span> <span class="subxComment"># check output</span> -<span id="L17464" class="LineNr">17464 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"03/add *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-add-mem-to-reg"</span>) -<span id="L17465" class="LineNr">17465 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17466" class="LineNr">17466 </span> 89/<- %esp 5/r32/ebp -<span id="L17467" class="LineNr">17467 </span> 5d/pop-to-ebp -<span id="L17468" class="LineNr">17468 </span> c3/return -<span id="L17469" class="LineNr">17469 </span> -<span id="L17470" class="LineNr">17470 </span><span class="subxTest">test-add-literal-to-eax</span>: -<span id="L17471" class="LineNr">17471 </span> <span class="subxComment"># var1/eax <- add 0x34</span> -<span id="L17472" class="LineNr">17472 </span> <span class="subxComment"># =></span> -<span id="L17473" class="LineNr">17473 </span> <span class="subxComment"># 05/add-to-eax 0x34/imm32</span> -<span id="L17474" class="LineNr">17474 </span> <span class="subxComment">#</span> -<span id="L17475" class="LineNr">17475 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17476" class="LineNr">17476 </span> 55/push-ebp -<span id="L17477" class="LineNr">17477 </span> 89/<- %ebp 4/r32/esp -<span id="L17478" class="LineNr">17478 </span> <span class="subxComment"># setup</span> -<span id="L17479" class="LineNr">17479 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17480" class="LineNr">17480 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17481" class="LineNr">17481 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-type</span>: -<span id="L17482" class="LineNr">17482 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17483" class="LineNr">17483 </span> 68/push 0/imm32/right:null -<span id="L17484" class="LineNr">17484 </span> 68/push 0/imm32/right:null -<span id="L17485" class="LineNr">17485 </span> 68/push 0/imm32/left:unused -<span id="L17486" class="LineNr">17486 </span> 68/push 1/imm32/value:int -<span id="L17487" class="LineNr">17487 </span> 68/push 1/imm32/is-atom?:true -<span id="L17488" class="LineNr">17488 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17489" class="LineNr">17489 </span> 89/<- %ecx 4/r32/esp -<span id="L17490" class="LineNr">17490 </span><span class="Constant">$test-add-literal-to-eax:initialize-var</span>: -<span id="L17491" class="LineNr">17491 </span> <span class="subxComment"># var v/ecx: (payload var)</span> -<span id="L17492" class="LineNr">17492 </span> 68/push 0/imm32/register -<span id="L17493" class="LineNr">17493 </span> 68/push 0/imm32/register -<span id="L17494" class="LineNr">17494 </span> 68/push 0/imm32/no-stack-offset -<span id="L17495" class="LineNr">17495 </span> 68/push 1/imm32/block-depth -<span id="L17496" class="LineNr">17496 </span> 51/push-ecx -<span id="L17497" class="LineNr">17497 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17498" class="LineNr">17498 </span> 68/push 0/imm32/name -<span id="L17499" class="LineNr">17499 </span> 68/push 0/imm32/name -<span id="L17500" class="LineNr">17500 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17501" class="LineNr">17501 </span> 89/<- %ecx 4/r32/esp -<span id="L17502" class="LineNr">17502 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-name</span>: -<span id="L17503" class="LineNr">17503 </span> <span class="subxComment"># v->name = "v"</span> -<span id="L17504" class="LineNr">17504 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17505" class="LineNr">17505 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"v"</span> %eax) -<span id="L17506" class="LineNr">17506 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-register</span>: -<span id="L17507" class="LineNr">17507 </span> <span class="subxComment"># v->register = "eax"</span> -<span id="L17508" class="LineNr">17508 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17509" class="LineNr">17509 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17510" class="LineNr">17510 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal-type</span>: -<span id="L17511" class="LineNr">17511 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L17512" class="LineNr">17512 </span> 68/push 0/imm32/right:null +<span id="L16222" class="LineNr">16222 </span> { +<span id="L16223" class="LineNr">16223 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-output-null</span>: +<span id="L16224" class="LineNr">16224 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L16225" class="LineNr">16225 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16226" class="LineNr">16226 </span><span class="Constant">$mu-stmt-matches-primitive?:both-outputs-null</span>: +<span id="L16227" class="LineNr">16227 </span> <span class="subxComment"># return true</span> +<span id="L16228" class="LineNr">16228 </span> b8/copy-to-eax 1/imm32 +<span id="L16229" class="LineNr">16229 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16230" class="LineNr">16230 </span> } +<span id="L16231" class="LineNr">16231 </span><span class="Constant">$mu-stmt-matches-primitive?:stmt-output-null-and-prim-output-not-null</span>: +<span id="L16232" class="LineNr">16232 </span> <span class="subxComment"># return false</span> +<span id="L16233" class="LineNr">16233 </span> b8/copy-to-eax 0/imm32 +<span id="L16234" class="LineNr">16234 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16235" class="LineNr">16235 </span> } +<span id="L16236" class="LineNr">16236 </span> <span class="subxComment"># if (curr2 == 0) return false</span> +<span id="L16237" class="LineNr">16237 </span> { +<span id="L16238" class="LineNr">16238 </span><span class="Constant">$mu-stmt-matches-primitive?:check-prim-output-null</span>: +<span id="L16239" class="LineNr">16239 </span> 81 7/subop/compare %edi 0/imm32 +<span id="L16240" class="LineNr">16240 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16241" class="LineNr">16241 </span><span class="Constant">$mu-stmt-matches-primitive?:prim-output-is-null</span>: +<span id="L16242" class="LineNr">16242 </span> b8/copy-to-eax 0/imm32 +<span id="L16243" class="LineNr">16243 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16244" class="LineNr">16244 </span> } +<span id="L16245" class="LineNr">16245 </span> <span class="subxComment"># if (curr != curr2) return false</span> +<span id="L16246" class="LineNr">16246 </span> { +<span id="L16247" class="LineNr">16247 </span><span class="Constant">$mu-stmt-matches-primitive?:check-outputs-match</span>: +<span id="L16248" class="LineNr">16248 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *edi *(edi+4)) <span class="subxComment"># List-value List-value => eax</span> +<span id="L16249" class="LineNr">16249 </span> (<a href='mu.subx.html#L16280'>operand-matches-primitive?</a> %esi %eax) <span class="subxComment"># => eax</span> +<span id="L16250" class="LineNr">16250 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16251" class="LineNr">16251 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16252" class="LineNr">16252 </span><span class="Constant">$mu-stmt-matches-primitive?:outputs-match</span>: +<span id="L16253" class="LineNr">16253 </span> b8/copy-to-eax 0/imm32 +<span id="L16254" class="LineNr">16254 </span> e9/jump $mu-stmt-matches-primitive?:end/disp32 +<span id="L16255" class="LineNr">16255 </span> } +<span id="L16256" class="LineNr">16256 </span><span class="Constant">$mu-stmt-matches-primitive?:next-output</span>: +<span id="L16257" class="LineNr">16257 </span> <span class="subxComment"># curr = lookup(curr->next)</span> +<span id="L16258" class="LineNr">16258 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Stmt-var-next Stmt-var-next => eax</span> +<span id="L16259" class="LineNr">16259 </span> 89/<- %esi 0/r32/eax +<span id="L16260" class="LineNr">16260 </span> <span class="subxComment"># curr2 = lookup(curr2->next)</span> +<span id="L16261" class="LineNr">16261 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># List-next List-next => eax</span> +<span id="L16262" class="LineNr">16262 </span> 89/<- %edi 0/r32/eax +<span id="L16263" class="LineNr">16263 </span> <span class="subxComment">#</span> +<span id="L16264" class="LineNr">16264 </span> e9/jump <span class="Constant">loop</span>/disp32 +<span id="L16265" class="LineNr">16265 </span> } +<span id="L16266" class="LineNr">16266 </span><span class="Constant">$mu-stmt-matches-primitive?:return-true</span>: +<span id="L16267" class="LineNr">16267 </span> b8/copy-to-eax 1/imm32 +<span id="L16268" class="LineNr">16268 </span><span class="Constant">$mu-stmt-matches-primitive?:end</span>: +<span id="L16269" class="LineNr">16269 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16270" class="LineNr">16270 </span> 5f/pop-to-edi +<span id="L16271" class="LineNr">16271 </span> 5e/pop-to-esi +<span id="L16272" class="LineNr">16272 </span> 5b/pop-to-ebx +<span id="L16273" class="LineNr">16273 </span> 5a/pop-to-edx +<span id="L16274" class="LineNr">16274 </span> 59/pop-to-ecx +<span id="L16275" class="LineNr">16275 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16276" class="LineNr">16276 </span> 89/<- %esp 5/r32/ebp +<span id="L16277" class="LineNr">16277 </span> 5d/pop-to-ebp +<span id="L16278" class="LineNr">16278 </span> c3/return +<span id="L16279" class="LineNr">16279 </span> +<span id="L16280" class="LineNr">16280 </span><span class="subxFunction">operand-matches-primitive?</span>: <span class="subxComment"># s: (addr stmt-var), prim-var: (addr var) -> result/eax: boolean</span> +<span id="L16281" class="LineNr">16281 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16282" class="LineNr">16282 </span> 55/push-ebp +<span id="L16283" class="LineNr">16283 </span> 89/<- %ebp 4/r32/esp +<span id="L16284" class="LineNr">16284 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16285" class="LineNr">16285 </span> 51/push-ecx +<span id="L16286" class="LineNr">16286 </span> 52/push-edx +<span id="L16287" class="LineNr">16287 </span> 53/push-ebx +<span id="L16288" class="LineNr">16288 </span> 56/push-esi +<span id="L16289" class="LineNr">16289 </span> 57/push-edi +<span id="L16290" class="LineNr">16290 </span> <span class="subxComment"># ecx = s</span> +<span id="L16291" class="LineNr">16291 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L16292" class="LineNr">16292 </span> <span class="subxComment"># var var/esi: (addr var) = lookup(s->value)</span> +<span id="L16293" class="LineNr">16293 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *ecx *(ecx+4)) <span class="subxComment"># Stmt-var-value Stmt-var-value => eax</span> +<span id="L16294" class="LineNr">16294 </span> 89/<- %esi 0/r32/eax +<span id="L16295" class="LineNr">16295 </span> <span class="subxComment"># edi = prim-var</span> +<span id="L16296" class="LineNr">16296 </span> 8b/-> *(ebp+0xc) 7/r32/edi +<span id="L16297" class="LineNr">16297 </span><span class="Constant">$operand-matches-primitive?:check-type</span>: +<span id="L16298" class="LineNr">16298 </span> <span class="subxComment"># if (var->type != prim-var->type) return false</span> +<span id="L16299" class="LineNr">16299 </span> <span class="subxS1Comment"># . var vtype/ebx: (addr tree type-id) = lookup(var->type)</span> +<span id="L16300" class="LineNr">16300 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+8) *(esi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L16301" class="LineNr">16301 </span> 89/<- %ebx 0/r32/eax +<span id="L16302" class="LineNr">16302 </span> <span class="subxS1Comment"># . var ptype/eax: (addr tree type-id) = lookup(prim-var->type)</span> +<span id="L16303" class="LineNr">16303 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+8) *(edi+0xc)) <span class="subxComment"># Var-type Var-type => eax</span> +<span id="L16304" class="LineNr">16304 </span> (<a href='mu.subx.html#L16439'>subx-type-equal?</a> %ebx %eax) <span class="subxComment"># => eax</span> +<span id="L16305" class="LineNr">16305 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16306" class="LineNr">16306 </span> 0f 84/jump-if-= $operand-matches-primitive?:return-false/disp32 +<span id="L16307" class="LineNr">16307 </span> { +<span id="L16308" class="LineNr">16308 </span><span class="Constant">$operand-matches-primitive?:check-register</span>: +<span id="L16309" class="LineNr">16309 </span> <span class="subxComment"># if prim-var is in memory and var is in register but dereference, match</span> +<span id="L16310" class="LineNr">16310 </span> { +<span id="L16311" class="LineNr">16311 </span> 81 7/subop/compare *(edi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16312" class="LineNr">16312 </span> 0f 85/jump-if-!= <span class="Constant">break</span>/disp32 +<span id="L16313" class="LineNr">16313 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16314" class="LineNr">16314 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16315" class="LineNr">16315 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L16316" class="LineNr">16316 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16317" class="LineNr">16317 </span><span class="Constant">$operand-matches-primitive?:var-deref-match</span>: +<span id="L16318" class="LineNr">16318 </span> e9/jump $operand-matches-primitive?:return-true/disp32 +<span id="L16319" class="LineNr">16319 </span> } +<span id="L16320" class="LineNr">16320 </span> <span class="subxComment"># if prim-var is in register and var is in register but dereference, no match</span> +<span id="L16321" class="LineNr">16321 </span> { +<span id="L16322" class="LineNr">16322 </span> 81 7/subop/compare *(edi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16323" class="LineNr">16323 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L16324" class="LineNr">16324 </span> 81 7/subop/compare *(esi+0x18) 0/imm32 <span class="subxComment"># Var-register</span> +<span id="L16325" class="LineNr">16325 </span> 0f 84/jump-if-= <span class="Constant">break</span>/disp32 +<span id="L16326" class="LineNr">16326 </span> 81 7/subop/compare *(ecx+0x10) 0/imm32/false <span class="subxComment"># Stmt-var-is-deref</span> +<span id="L16327" class="LineNr">16327 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16328" class="LineNr">16328 </span><span class="Constant">$operand-matches-primitive?:var-deref-no-match</span>: +<span id="L16329" class="LineNr">16329 </span> e9/jump $operand-matches-primitive?:return-false/disp32 +<span id="L16330" class="LineNr">16330 </span> } +<span id="L16331" class="LineNr">16331 </span> <span class="subxComment"># return false if var->register doesn't match prim-var->register</span> +<span id="L16332" class="LineNr">16332 </span> { +<span id="L16333" class="LineNr">16333 </span> <span class="subxComment"># if register addresses are equal, it's a match</span> +<span id="L16334" class="LineNr">16334 </span> <span class="subxComment"># var vreg/ebx: (addr array byte) = lookup(var->register)</span> +<span id="L16335" class="LineNr">16335 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(esi+0x18) *(esi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L16336" class="LineNr">16336 </span> 89/<- %ebx 0/r32/eax +<span id="L16337" class="LineNr">16337 </span> <span class="subxComment"># var preg/ecx: (addr array byte) = lookup(prim-var->register)</span> +<span id="L16338" class="LineNr">16338 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(edi+0x18) *(edi+0x1c)) <span class="subxComment"># Var-register Var-register => eax</span> +<span id="L16339" class="LineNr">16339 </span> 89/<- %ecx 0/r32/eax +<span id="L16340" class="LineNr">16340 </span> <span class="subxComment"># if (vreg == preg) break</span> +<span id="L16341" class="LineNr">16341 </span> 39/compare %ecx 3/r32/ebx +<span id="L16342" class="LineNr">16342 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16343" class="LineNr">16343 </span><span class="Constant">$operand-matches-primitive?:var-register-no-match</span>: +<span id="L16344" class="LineNr">16344 </span> <span class="subxComment"># if either address is 0, return false</span> +<span id="L16345" class="LineNr">16345 </span> 81 7/subop/compare %ebx 0/imm32 +<span id="L16346" class="LineNr">16346 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 +<span id="L16347" class="LineNr">16347 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L16348" class="LineNr">16348 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 +<span id="L16349" class="LineNr">16349 </span> <span class="subxComment"># if prim-var->register is wildcard, it's a match</span> +<span id="L16350" class="LineNr">16350 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx <span class="Constant">"*"</span>) <span class="subxComment"># Any-register => eax</span> +<span id="L16351" class="LineNr">16351 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16352" class="LineNr">16352 </span> 75/jump-if-!= <span class="Constant">break</span>/disp8 +<span id="L16353" class="LineNr">16353 </span><span class="Constant">$operand-matches-primitive?:wildcard-no-match</span>: +<span id="L16354" class="LineNr">16354 </span> <span class="subxComment"># if string contents aren't equal, return false</span> +<span id="L16355" class="LineNr">16355 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %ecx %ebx) <span class="subxComment"># => eax</span> +<span id="L16356" class="LineNr">16356 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16357" class="LineNr">16357 </span> 74/jump-if-= $operand-matches-primitive?:return-false/disp8 +<span id="L16358" class="LineNr">16358 </span> } +<span id="L16359" class="LineNr">16359 </span> } +<span id="L16360" class="LineNr">16360 </span><span class="Constant">$operand-matches-primitive?:return-true</span>: +<span id="L16361" class="LineNr">16361 </span> b8/copy-to-eax 1/imm32/true +<span id="L16362" class="LineNr">16362 </span> eb/jump $operand-matches-primitive?:end/disp8 +<span id="L16363" class="LineNr">16363 </span><span class="Constant">$operand-matches-primitive?:return-false</span>: +<span id="L16364" class="LineNr">16364 </span> b8/copy-to-eax 0/imm32/false +<span id="L16365" class="LineNr">16365 </span><span class="Constant">$operand-matches-primitive?:end</span>: +<span id="L16366" class="LineNr">16366 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16367" class="LineNr">16367 </span> 5f/pop-to-edi +<span id="L16368" class="LineNr">16368 </span> 5e/pop-to-esi +<span id="L16369" class="LineNr">16369 </span> 5b/pop-to-ebx +<span id="L16370" class="LineNr">16370 </span> 5a/pop-to-edx +<span id="L16371" class="LineNr">16371 </span> 59/pop-to-ecx +<span id="L16372" class="LineNr">16372 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16373" class="LineNr">16373 </span> 89/<- %esp 5/r32/ebp +<span id="L16374" class="LineNr">16374 </span> 5d/pop-to-ebp +<span id="L16375" class="LineNr">16375 </span> c3/return +<span id="L16376" class="LineNr">16376 </span> +<span id="L16377" class="LineNr">16377 </span><span class="subxFunction">find-matching-function</span>: <span class="subxComment"># functions: (addr function), stmt: (addr stmt) -> result/eax: (addr function)</span> +<span id="L16378" class="LineNr">16378 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16379" class="LineNr">16379 </span> 55/push-ebp +<span id="L16380" class="LineNr">16380 </span> 89/<- %ebp 4/r32/esp +<span id="L16381" class="LineNr">16381 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16382" class="LineNr">16382 </span> 51/push-ecx +<span id="L16383" class="LineNr">16383 </span> <span class="subxComment"># var curr/ecx: (handle function) = functions</span> +<span id="L16384" class="LineNr">16384 </span> 8b/-> *(ebp+8) 1/r32/ecx +<span id="L16385" class="LineNr">16385 </span> { +<span id="L16386" class="LineNr">16386 </span> <span class="subxComment"># if (curr == null) break</span> +<span id="L16387" class="LineNr">16387 </span> 81 7/subop/compare %ecx 0/imm32 +<span id="L16388" class="LineNr">16388 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16389" class="LineNr">16389 </span><span class="CommentedCode">#? (write-buffered Stderr "iter\n")</span> +<span id="L16390" class="LineNr">16390 </span><span class="CommentedCode">#? (flush Stderr)</span> +<span id="L16391" class="LineNr">16391 </span> <span class="subxComment"># if match(stmt, curr) return curr</span> +<span id="L16392" class="LineNr">16392 </span> { +<span id="L16393" class="LineNr">16393 </span> (<a href='mu.subx.html#L16416'>mu-stmt-matches-function?</a> *(ebp+0xc) %ecx) <span class="subxComment"># => eax</span> +<span id="L16394" class="LineNr">16394 </span> 3d/compare-eax-and 0/imm32/false +<span id="L16395" class="LineNr">16395 </span> 74/jump-if-= <span class="Constant">break</span>/disp8 +<span id="L16396" class="LineNr">16396 </span> 89/<- %eax 1/r32/ecx +<span id="L16397" class="LineNr">16397 </span> eb/jump $find-matching-function:end/disp8 +<span id="L16398" class="LineNr">16398 </span> } +<span id="L16399" class="LineNr">16399 </span> <span class="subxComment"># curr = curr->next</span> +<span id="L16400" class="LineNr">16400 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(ecx+0x20) *(ecx+0x24)) <span class="subxComment"># Function-next Function-next => eax</span> +<span id="L16401" class="LineNr">16401 </span> 89/<- %ecx 0/r32/eax +<span id="L16402" class="LineNr">16402 </span> <span class="subxComment">#</span> +<span id="L16403" class="LineNr">16403 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L16404" class="LineNr">16404 </span> } +<span id="L16405" class="LineNr">16405 </span> <span class="subxComment"># return null</span> +<span id="L16406" class="LineNr">16406 </span> b8/copy-to-eax 0/imm32 +<span id="L16407" class="LineNr">16407 </span><span class="Constant">$find-matching-function:end</span>: +<span id="L16408" class="LineNr">16408 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16409" class="LineNr">16409 </span> 59/pop-to-ecx +<span id="L16410" class="LineNr">16410 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16411" class="LineNr">16411 </span> 89/<- %esp 5/r32/ebp +<span id="L16412" class="LineNr">16412 </span> 5d/pop-to-ebp +<span id="L16413" class="LineNr">16413 </span> c3/return +<span id="L16414" class="LineNr">16414 </span> +<span id="L16415" class="LineNr">16415 </span><span class="subxComment"># Just compare names; user-defined functions don't support overloading yet.</span> +<span id="L16416" class="LineNr">16416 </span><span class="subxFunction">mu-stmt-matches-function?</span>: <span class="subxComment"># stmt: (addr stmt1), function: (addr function) -> result/eax: boolean</span> +<span id="L16417" class="LineNr">16417 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16418" class="LineNr">16418 </span> 55/push-ebp +<span id="L16419" class="LineNr">16419 </span> 89/<- %ebp 4/r32/esp +<span id="L16420" class="LineNr">16420 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16421" class="LineNr">16421 </span> 51/push-ecx +<span id="L16422" class="LineNr">16422 </span> <span class="subxComment"># return function->name == stmt->operation</span> +<span id="L16423" class="LineNr">16423 </span> <span class="subxComment"># ecx = lookup(stmt->operation)</span> +<span id="L16424" class="LineNr">16424 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L16425" class="LineNr">16425 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *(eax+4) *(eax+8)) <span class="subxComment"># Stmt1-operation Stmt1-operation => eax</span> +<span id="L16426" class="LineNr">16426 </span> 89/<- %ecx 0/r32/eax +<span id="L16427" class="LineNr">16427 </span> <span class="subxComment"># eax = lookup(function->name)</span> +<span id="L16428" class="LineNr">16428 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L16429" class="LineNr">16429 </span> (<a href='../069allocate.subx.html#L256'>lookup</a> *eax *(eax+4)) <span class="subxComment"># Function-name Function-name => eax</span> +<span id="L16430" class="LineNr">16430 </span> (<a href='../054string-equal.subx.html#L15'>string-equal?</a> %eax %ecx) <span class="subxComment"># => eax</span> +<span id="L16431" class="LineNr">16431 </span><span class="Constant">$mu-stmt-matches-function?:end</span>: +<span id="L16432" class="LineNr">16432 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16433" class="LineNr">16433 </span> 59/pop-to-ecx +<span id="L16434" class="LineNr">16434 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16435" class="LineNr">16435 </span> 89/<- %esp 5/r32/ebp +<span id="L16436" class="LineNr">16436 </span> 5d/pop-to-ebp +<span id="L16437" class="LineNr">16437 </span> c3/return +<span id="L16438" class="LineNr">16438 </span> +<span id="L16439" class="LineNr">16439 </span><span class="subxFunction">subx-type-equal?</span>: <span class="subxComment"># a: (addr tree type-id), b: (addr tree type-id) -> result/eax: boolean</span> +<span id="L16440" class="LineNr">16440 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16441" class="LineNr">16441 </span> 55/push-ebp +<span id="L16442" class="LineNr">16442 </span> 89/<- %ebp 4/r32/esp +<span id="L16443" class="LineNr">16443 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16444" class="LineNr">16444 </span> 51/push-ecx +<span id="L16445" class="LineNr">16445 </span> <span class="subxComment"># var alit/ecx: boolean = is-literal-type?(a)</span> +<span id="L16446" class="LineNr">16446 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> *(ebp+8) 0) <span class="subxComment"># => eax</span> +<span id="L16447" class="LineNr">16447 </span> 89/<- %ecx 0/r32/eax +<span id="L16448" class="LineNr">16448 </span> <span class="subxComment"># var blit/eax: boolean = is-literal-type?(b)</span> +<span id="L16449" class="LineNr">16449 </span> (<a href='mu.subx.html#L16462'>is-simple-mu-type?</a> *(ebp+0xc) 0) <span class="subxComment"># => eax</span> +<span id="L16450" class="LineNr">16450 </span> <span class="subxComment"># return alit == blit</span> +<span id="L16451" class="LineNr">16451 </span> 39/compare %eax 1/r32/ecx +<span id="L16452" class="LineNr">16452 </span> 0f 94/set-byte-if-= %al +<span id="L16453" class="LineNr">16453 </span> 81 4/subop/and %eax 0xff/imm32 +<span id="L16454" class="LineNr">16454 </span><span class="Constant">$subx-type-equal?:end</span>: +<span id="L16455" class="LineNr">16455 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16456" class="LineNr">16456 </span> 59/pop-to-ecx +<span id="L16457" class="LineNr">16457 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16458" class="LineNr">16458 </span> 89/<- %esp 5/r32/ebp +<span id="L16459" class="LineNr">16459 </span> 5d/pop-to-ebp +<span id="L16460" class="LineNr">16460 </span> c3/return +<span id="L16461" class="LineNr">16461 </span> +<span id="L16462" class="LineNr">16462 </span><span class="subxFunction">is-simple-mu-type?</span>: <span class="subxComment"># a: (addr tree type-id), n: type-id -> result/eax: boolean</span> +<span id="L16463" class="LineNr">16463 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16464" class="LineNr">16464 </span> 55/push-ebp +<span id="L16465" class="LineNr">16465 </span> 89/<- %ebp 4/r32/esp +<span id="L16466" class="LineNr">16466 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L16467" class="LineNr">16467 </span> 51/push-ecx +<span id="L16468" class="LineNr">16468 </span> <span class="subxComment"># ecx = n</span> +<span id="L16469" class="LineNr">16469 </span> 8b/-> *(ebp+0xc) 1/r32/ecx +<span id="L16470" class="LineNr">16470 </span> <span class="subxComment"># return (a->value == n)</span> +<span id="L16471" class="LineNr">16471 </span> 8b/-> *(ebp+8) 0/r32/eax +<span id="L16472" class="LineNr">16472 </span> 39/compare *(eax+4) 1/r32/ecx <span class="subxComment"># Tree-value</span> +<span id="L16473" class="LineNr">16473 </span> 0f 94/set-byte-if-= %al +<span id="L16474" class="LineNr">16474 </span> 81 4/subop/and %eax 0xff/imm32 +<span id="L16475" class="LineNr">16475 </span><span class="Constant">$is-simple-mu-type?:end</span>: +<span id="L16476" class="LineNr">16476 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L16477" class="LineNr">16477 </span> 59/pop-to-ecx +<span id="L16478" class="LineNr">16478 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16479" class="LineNr">16479 </span> 89/<- %esp 5/r32/ebp +<span id="L16480" class="LineNr">16480 </span> 5d/pop-to-ebp +<span id="L16481" class="LineNr">16481 </span> c3/return +<span id="L16482" class="LineNr">16482 </span> +<span id="L16483" class="LineNr">16483 </span><span class="subxTest">test-emit-subx-stmt-primitive</span>: +<span id="L16484" class="LineNr">16484 </span> <span class="subxComment"># Primitive operation on a variable on the stack.</span> +<span id="L16485" class="LineNr">16485 </span> <span class="subxComment"># increment foo</span> +<span id="L16486" class="LineNr">16486 </span> <span class="subxComment"># =></span> +<span id="L16487" class="LineNr">16487 </span> <span class="subxComment"># ff 0/subop/increment *(ebp-8)</span> +<span id="L16488" class="LineNr">16488 </span> <span class="subxComment">#</span> +<span id="L16489" class="LineNr">16489 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L16490" class="LineNr">16490 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L16491" class="LineNr">16491 </span> <span class="subxComment"># type: int</span> +<span id="L16492" class="LineNr">16492 </span> <span class="subxComment"># stack-offset: -8</span> +<span id="L16493" class="LineNr">16493 </span> <span class="subxComment">#</span> +<span id="L16494" class="LineNr">16494 </span> <span class="subxComment"># There's a primitive with this info:</span> +<span id="L16495" class="LineNr">16495 </span> <span class="subxComment"># name: 'increment'</span> +<span id="L16496" class="LineNr">16496 </span> <span class="subxComment"># inouts: int/mem</span> +<span id="L16497" class="LineNr">16497 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16498" class="LineNr">16498 </span> <span class="subxComment">#</span> +<span id="L16499" class="LineNr">16499 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16500" class="LineNr">16500 </span> 55/push-ebp +<span id="L16501" class="LineNr">16501 </span> 89/<- %ebp 4/r32/esp +<span id="L16502" class="LineNr">16502 </span> <span class="subxComment"># setup</span> +<span id="L16503" class="LineNr">16503 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L16504" class="LineNr">16504 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L16505" class="LineNr">16505 </span> <span class="subxComment"># simulate allocated payloads starting with an initial fake alloc-id (0x11)</span> +<span id="L16506" class="LineNr">16506 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-type</span>: +<span id="L16507" class="LineNr">16507 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L16508" class="LineNr">16508 </span> 68/push 0/imm32/right:null +<span id="L16509" class="LineNr">16509 </span> 68/push 0/imm32/right:null +<span id="L16510" class="LineNr">16510 </span> 68/push 0/imm32/left:unused +<span id="L16511" class="LineNr">16511 </span> 68/push 1/imm32/value:int +<span id="L16512" class="LineNr">16512 </span> 68/push 1/imm32/is-atom?:true +<span id="L16513" class="LineNr">16513 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16514" class="LineNr">16514 </span> 89/<- %ecx 4/r32/esp +<span id="L16515" class="LineNr">16515 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-var</span>: +<span id="L16516" class="LineNr">16516 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(type)</span> +<span id="L16517" class="LineNr">16517 </span> 68/push 0/imm32/no-register +<span id="L16518" class="LineNr">16518 </span> 68/push 0/imm32/no-register +<span id="L16519" class="LineNr">16519 </span> 68/push -8/imm32/stack-offset +<span id="L16520" class="LineNr">16520 </span> 68/push 1/imm32/block-depth +<span id="L16521" class="LineNr">16521 </span> 51/push-ecx/type +<span id="L16522" class="LineNr">16522 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16523" class="LineNr">16523 </span> 68/push 0/imm32/name +<span id="L16524" class="LineNr">16524 </span> 68/push 0/imm32/name +<span id="L16525" class="LineNr">16525 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16526" class="LineNr">16526 </span> 89/<- %ecx 4/r32/esp +<span id="L16527" class="LineNr">16527 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-var-name</span>: +<span id="L16528" class="LineNr">16528 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L16529" class="LineNr">16529 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16530" class="LineNr">16530 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L16531" class="LineNr">16531 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt-var</span>: +<span id="L16532" class="LineNr">16532 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> +<span id="L16533" class="LineNr">16533 </span> 68/push 0/imm32/is-deref:false +<span id="L16534" class="LineNr">16534 </span> 68/push 0/imm32/next +<span id="L16535" class="LineNr">16535 </span> 68/push 0/imm32/next +<span id="L16536" class="LineNr">16536 </span> 51/push-ecx/var-foo +<span id="L16537" class="LineNr">16537 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16538" class="LineNr">16538 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16539" class="LineNr">16539 </span> 89/<- %ebx 4/r32/esp +<span id="L16540" class="LineNr">16540 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt</span>: +<span id="L16541" class="LineNr">16541 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L16542" class="LineNr">16542 </span> 68/push 0/imm32/no-outputs +<span id="L16543" class="LineNr">16543 </span> 68/push 0/imm32/no-outputs +<span id="L16544" class="LineNr">16544 </span> 53/push-ebx/inouts +<span id="L16545" class="LineNr">16545 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16546" class="LineNr">16546 </span> 68/push 0/imm32/operation +<span id="L16547" class="LineNr">16547 </span> 68/push 0/imm32/operation +<span id="L16548" class="LineNr">16548 </span> 68/push 1/imm32/tag +<span id="L16549" class="LineNr">16549 </span> 89/<- %esi 4/r32/esp +<span id="L16550" class="LineNr">16550 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-stmt-operation</span>: +<span id="L16551" class="LineNr">16551 </span> <span class="subxComment"># stmt->operation = "increment"</span> +<span id="L16552" class="LineNr">16552 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L16553" class="LineNr">16553 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L16554" class="LineNr">16554 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive</span>: +<span id="L16555" class="LineNr">16555 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> +<span id="L16556" class="LineNr">16556 </span> 68/push 0/imm32/next +<span id="L16557" class="LineNr">16557 </span> 68/push 0/imm32/next +<span id="L16558" class="LineNr">16558 </span> 68/push 0/imm32/output-is-write-only +<span id="L16559" class="LineNr">16559 </span> 68/push 0/imm32/no-disp32 +<span id="L16560" class="LineNr">16560 </span> 68/push 0/imm32/no-imm32 +<span id="L16561" class="LineNr">16561 </span> 68/push 0/imm32/no-r32 +<span id="L16562" class="LineNr">16562 </span> 68/push 1/imm32/rm32-is-first-inout +<span id="L16563" class="LineNr">16563 </span> 68/push 0/imm32/subx-name +<span id="L16564" class="LineNr">16564 </span> 68/push 0/imm32/subx-name +<span id="L16565" class="LineNr">16565 </span> 68/push 0/imm32/no-outputs +<span id="L16566" class="LineNr">16566 </span> 68/push 0/imm32/no-outputs +<span id="L16567" class="LineNr">16567 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> +<span id="L16568" class="LineNr">16568 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16569" class="LineNr">16569 </span> 68/push 0/imm32/name +<span id="L16570" class="LineNr">16570 </span> 68/push 0/imm32/name +<span id="L16571" class="LineNr">16571 </span> 89/<- %ebx 4/r32/esp +<span id="L16572" class="LineNr">16572 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive-name</span>: +<span id="L16573" class="LineNr">16573 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L16574" class="LineNr">16574 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> +<span id="L16575" class="LineNr">16575 </span><span class="Constant">$test-emit-subx-stmt-primitive:initialize-primitive-subx-name</span>: +<span id="L16576" class="LineNr">16576 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L16577" class="LineNr">16577 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> +<span id="L16578" class="LineNr">16578 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L16579" class="LineNr">16579 </span> <span class="subxComment"># convert</span> +<span id="L16580" class="LineNr">16580 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L16581" class="LineNr">16581 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L16582" class="LineNr">16582 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L16583" class="Folded">16583 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L16589" class="LineNr">16589 </span> <span class="subxComment"># check output</span> +<span id="L16590" class="LineNr">16590 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment *(ebp+0xfffffff8)"</span> <span class="Constant">"F - test-emit-subx-stmt-primitive"</span>) +<span id="L16591" class="LineNr">16591 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16592" class="LineNr">16592 </span> 89/<- %esp 5/r32/ebp +<span id="L16593" class="LineNr">16593 </span> 5d/pop-to-ebp +<span id="L16594" class="LineNr">16594 </span> c3/return +<span id="L16595" class="LineNr">16595 </span> +<span id="L16596" class="LineNr">16596 </span><span class="subxTest">test-emit-subx-stmt-primitive-register</span>: +<span id="L16597" class="LineNr">16597 </span> <span class="subxComment"># Primitive operation on a variable in a register.</span> +<span id="L16598" class="LineNr">16598 </span> <span class="subxComment"># foo <- increment</span> +<span id="L16599" class="LineNr">16599 </span> <span class="subxComment"># =></span> +<span id="L16600" class="LineNr">16600 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> +<span id="L16601" class="LineNr">16601 </span> <span class="subxComment">#</span> +<span id="L16602" class="LineNr">16602 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L16603" class="LineNr">16603 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L16604" class="LineNr">16604 </span> <span class="subxComment"># type: int</span> +<span id="L16605" class="LineNr">16605 </span> <span class="subxComment"># register: 'eax'</span> +<span id="L16606" class="LineNr">16606 </span> <span class="subxComment">#</span> +<span id="L16607" class="LineNr">16607 </span> <span class="subxComment"># There's a primitive with this info:</span> +<span id="L16608" class="LineNr">16608 </span> <span class="subxComment"># name: 'increment'</span> +<span id="L16609" class="LineNr">16609 </span> <span class="subxComment"># out: int/reg</span> +<span id="L16610" class="LineNr">16610 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16611" class="LineNr">16611 </span> <span class="subxComment">#</span> +<span id="L16612" class="LineNr">16612 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16613" class="LineNr">16613 </span> 55/push-ebp +<span id="L16614" class="LineNr">16614 </span> 89/<- %ebp 4/r32/esp +<span id="L16615" class="LineNr">16615 </span> <span class="subxComment"># setup</span> +<span id="L16616" class="LineNr">16616 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L16617" class="LineNr">16617 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L16618" class="LineNr">16618 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-type</span>: +<span id="L16619" class="LineNr">16619 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L16620" class="LineNr">16620 </span> 68/push 0/imm32/right:null +<span id="L16621" class="LineNr">16621 </span> 68/push 0/imm32/right:null +<span id="L16622" class="LineNr">16622 </span> 68/push 0/imm32/left:unused +<span id="L16623" class="LineNr">16623 </span> 68/push 1/imm32/value:int +<span id="L16624" class="LineNr">16624 </span> 68/push 1/imm32/is-atom?:true +<span id="L16625" class="LineNr">16625 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16626" class="LineNr">16626 </span> 89/<- %ecx 4/r32/esp +<span id="L16627" class="LineNr">16627 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var</span>: +<span id="L16628" class="LineNr">16628 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> +<span id="L16629" class="LineNr">16629 </span> 68/push 0/imm32/register +<span id="L16630" class="LineNr">16630 </span> 68/push 0/imm32/register +<span id="L16631" class="LineNr">16631 </span> 68/push 0/imm32/no-stack-offset +<span id="L16632" class="LineNr">16632 </span> 68/push 1/imm32/block-depth +<span id="L16633" class="LineNr">16633 </span> 51/push-ecx +<span id="L16634" class="LineNr">16634 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16635" class="LineNr">16635 </span> 68/push 0/imm32/name +<span id="L16636" class="LineNr">16636 </span> 68/push 0/imm32/name +<span id="L16637" class="LineNr">16637 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16638" class="LineNr">16638 </span> 89/<- %ecx 4/r32/esp +<span id="L16639" class="LineNr">16639 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-name</span>: +<span id="L16640" class="LineNr">16640 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L16641" class="LineNr">16641 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16642" class="LineNr">16642 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L16643" class="LineNr">16643 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-register</span>: +<span id="L16644" class="LineNr">16644 </span> <span class="subxComment"># var-foo->register = "eax"</span> +<span id="L16645" class="LineNr">16645 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L16646" class="LineNr">16646 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L16647" class="LineNr">16647 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt-var</span>: +<span id="L16648" class="LineNr">16648 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> +<span id="L16649" class="LineNr">16649 </span> 68/push 0/imm32/is-deref:false +<span id="L16650" class="LineNr">16650 </span> 68/push 0/imm32/next +<span id="L16651" class="LineNr">16651 </span> 68/push 0/imm32/next +<span id="L16652" class="LineNr">16652 </span> 51/push-ecx/var-foo +<span id="L16653" class="LineNr">16653 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16654" class="LineNr">16654 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16655" class="LineNr">16655 </span> 89/<- %ebx 4/r32/esp +<span id="L16656" class="LineNr">16656 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt</span>: +<span id="L16657" class="LineNr">16657 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L16658" class="LineNr">16658 </span> 53/push-ebx/outputs +<span id="L16659" class="LineNr">16659 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16660" class="LineNr">16660 </span> 68/push 0/imm32/no-inouts +<span id="L16661" class="LineNr">16661 </span> 68/push 0/imm32/no-inouts +<span id="L16662" class="LineNr">16662 </span> 68/push 0/imm32/operation +<span id="L16663" class="LineNr">16663 </span> 68/push 0/imm32/operation +<span id="L16664" class="LineNr">16664 </span> 68/push 1/imm32 +<span id="L16665" class="LineNr">16665 </span> 89/<- %esi 4/r32/esp +<span id="L16666" class="LineNr">16666 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-stmt-operation</span>: +<span id="L16667" class="LineNr">16667 </span> <span class="subxComment"># stmt->operation = "increment"</span> +<span id="L16668" class="LineNr">16668 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L16669" class="LineNr">16669 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L16670" class="LineNr">16670 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-var</span>: +<span id="L16671" class="LineNr">16671 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> +<span id="L16672" class="LineNr">16672 </span> 68/push 0/imm32/register +<span id="L16673" class="LineNr">16673 </span> 68/push 0/imm32/register +<span id="L16674" class="LineNr">16674 </span> 68/push 0/imm32/no-stack-offset +<span id="L16675" class="LineNr">16675 </span> 68/push 1/imm32/block-depth +<span id="L16676" class="LineNr">16676 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> +<span id="L16677" class="LineNr">16677 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16678" class="LineNr">16678 </span> 68/push 0/imm32/name +<span id="L16679" class="LineNr">16679 </span> 68/push 0/imm32/name +<span id="L16680" class="LineNr">16680 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16681" class="LineNr">16681 </span> 89/<- %ebx 4/r32/esp +<span id="L16682" class="LineNr">16682 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-var-name</span>: +<span id="L16683" class="LineNr">16683 </span> <span class="subxComment"># formal-var->name = "dummy"</span> +<span id="L16684" class="LineNr">16684 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16685" class="LineNr">16685 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) +<span id="L16686" class="LineNr">16686 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-formal-register</span>: +<span id="L16687" class="LineNr">16687 </span> <span class="subxComment"># formal-var->register = "*"</span> +<span id="L16688" class="LineNr">16688 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L16689" class="LineNr">16689 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> +<span id="L16690" class="LineNr">16690 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-var-list</span>: +<span id="L16691" class="LineNr">16691 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list var)</span> +<span id="L16692" class="LineNr">16692 </span> 68/push 0/imm32/next +<span id="L16693" class="LineNr">16693 </span> 68/push 0/imm32/next +<span id="L16694" class="LineNr">16694 </span> 53/push-ebx/formal-var +<span id="L16695" class="LineNr">16695 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16696" class="LineNr">16696 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16697" class="LineNr">16697 </span> 89/<- %ebx 4/r32/esp +<span id="L16698" class="LineNr">16698 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive</span>: +<span id="L16699" class="LineNr">16699 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> +<span id="L16700" class="LineNr">16700 </span> 68/push 0/imm32/next +<span id="L16701" class="LineNr">16701 </span> 68/push 0/imm32/next +<span id="L16702" class="LineNr">16702 </span> 68/push 0/imm32/output-is-write-only +<span id="L16703" class="LineNr">16703 </span> 68/push 0/imm32/no-disp32 +<span id="L16704" class="LineNr">16704 </span> 68/push 0/imm32/no-imm32 +<span id="L16705" class="LineNr">16705 </span> 68/push 0/imm32/no-r32 +<span id="L16706" class="LineNr">16706 </span> 68/push 3/imm32/rm32-is-first-output +<span id="L16707" class="LineNr">16707 </span> 68/push 0/imm32/subx-name +<span id="L16708" class="LineNr">16708 </span> 68/push 0/imm32/subx-name +<span id="L16709" class="LineNr">16709 </span> 53/push-ebx/outputs +<span id="L16710" class="LineNr">16710 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16711" class="LineNr">16711 </span> 68/push 0/imm32/no-inouts +<span id="L16712" class="LineNr">16712 </span> 68/push 0/imm32/no-inouts +<span id="L16713" class="LineNr">16713 </span> 68/push 0/imm32/name +<span id="L16714" class="LineNr">16714 </span> 68/push 0/imm32/name +<span id="L16715" class="LineNr">16715 </span> 89/<- %ebx 4/r32/esp +<span id="L16716" class="LineNr">16716 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive-name</span>: +<span id="L16717" class="LineNr">16717 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L16718" class="LineNr">16718 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> +<span id="L16719" class="LineNr">16719 </span><span class="Constant">$test-emit-subx-stmt-primitive-register:initialize-primitive-subx-name</span>: +<span id="L16720" class="LineNr">16720 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L16721" class="LineNr">16721 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> +<span id="L16722" class="LineNr">16722 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L16723" class="LineNr">16723 </span> <span class="subxComment"># convert</span> +<span id="L16724" class="LineNr">16724 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L16725" class="LineNr">16725 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L16726" class="LineNr">16726 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L16727" class="Folded">16727 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L16733" class="LineNr">16733 </span> <span class="subxComment"># check output</span> +<span id="L16734" class="LineNr">16734 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-primitive-register"</span>) +<span id="L16735" class="LineNr">16735 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16736" class="LineNr">16736 </span> 89/<- %esp 5/r32/ebp +<span id="L16737" class="LineNr">16737 </span> 5d/pop-to-ebp +<span id="L16738" class="LineNr">16738 </span> c3/return +<span id="L16739" class="LineNr">16739 </span> +<span id="L16740" class="LineNr">16740 </span><span class="subxTest">test-emit-subx-stmt-select-primitive</span>: +<span id="L16741" class="LineNr">16741 </span> <span class="subxComment"># Select the right primitive between overloads.</span> +<span id="L16742" class="LineNr">16742 </span> <span class="subxComment"># foo <- increment</span> +<span id="L16743" class="LineNr">16743 </span> <span class="subxComment"># =></span> +<span id="L16744" class="LineNr">16744 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> +<span id="L16745" class="LineNr">16745 </span> <span class="subxComment">#</span> +<span id="L16746" class="LineNr">16746 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L16747" class="LineNr">16747 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L16748" class="LineNr">16748 </span> <span class="subxComment"># type: int</span> +<span id="L16749" class="LineNr">16749 </span> <span class="subxComment"># register: 'eax'</span> +<span id="L16750" class="LineNr">16750 </span> <span class="subxComment">#</span> +<span id="L16751" class="LineNr">16751 </span> <span class="subxComment"># There's two primitives, as follows:</span> +<span id="L16752" class="LineNr">16752 </span> <span class="subxComment"># - name: 'increment'</span> +<span id="L16753" class="LineNr">16753 </span> <span class="subxComment"># out: int/reg</span> +<span id="L16754" class="LineNr">16754 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16755" class="LineNr">16755 </span> <span class="subxComment"># - name: 'increment'</span> +<span id="L16756" class="LineNr">16756 </span> <span class="subxComment"># inout: int/mem</span> +<span id="L16757" class="LineNr">16757 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16758" class="LineNr">16758 </span> <span class="subxComment">#</span> +<span id="L16759" class="LineNr">16759 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16760" class="LineNr">16760 </span> 55/push-ebp +<span id="L16761" class="LineNr">16761 </span> 89/<- %ebp 4/r32/esp +<span id="L16762" class="LineNr">16762 </span> <span class="subxComment"># setup</span> +<span id="L16763" class="LineNr">16763 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L16764" class="LineNr">16764 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L16765" class="LineNr">16765 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-type</span>: +<span id="L16766" class="LineNr">16766 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L16767" class="LineNr">16767 </span> 68/push 0/imm32/right:null +<span id="L16768" class="LineNr">16768 </span> 68/push 0/imm32/right:null +<span id="L16769" class="LineNr">16769 </span> 68/push 0/imm32/left:unused +<span id="L16770" class="LineNr">16770 </span> 68/push 1/imm32/value:int +<span id="L16771" class="LineNr">16771 </span> 68/push 1/imm32/is-atom?:true +<span id="L16772" class="LineNr">16772 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16773" class="LineNr">16773 </span> 89/<- %ecx 4/r32/esp +<span id="L16774" class="LineNr">16774 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var</span>: +<span id="L16775" class="LineNr">16775 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> +<span id="L16776" class="LineNr">16776 </span> 68/push 0/imm32/register +<span id="L16777" class="LineNr">16777 </span> 68/push 0/imm32/register +<span id="L16778" class="LineNr">16778 </span> 68/push 0/imm32/no-stack-offset +<span id="L16779" class="LineNr">16779 </span> 68/push 1/imm32/block-depth +<span id="L16780" class="LineNr">16780 </span> 51/push-ecx +<span id="L16781" class="LineNr">16781 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16782" class="LineNr">16782 </span> 68/push 0/imm32/name +<span id="L16783" class="LineNr">16783 </span> 68/push 0/imm32/name +<span id="L16784" class="LineNr">16784 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16785" class="LineNr">16785 </span> 89/<- %ecx 4/r32/esp +<span id="L16786" class="LineNr">16786 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-name</span>: +<span id="L16787" class="LineNr">16787 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L16788" class="LineNr">16788 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16789" class="LineNr">16789 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L16790" class="LineNr">16790 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-register</span>: +<span id="L16791" class="LineNr">16791 </span> <span class="subxComment"># var-foo->register = "eax"</span> +<span id="L16792" class="LineNr">16792 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L16793" class="LineNr">16793 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L16794" class="LineNr">16794 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt-var</span>: +<span id="L16795" class="LineNr">16795 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> +<span id="L16796" class="LineNr">16796 </span> 68/push 0/imm32/is-deref:false +<span id="L16797" class="LineNr">16797 </span> 68/push 0/imm32/next +<span id="L16798" class="LineNr">16798 </span> 68/push 0/imm32/next +<span id="L16799" class="LineNr">16799 </span> 51/push-ecx/var-foo +<span id="L16800" class="LineNr">16800 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16801" class="LineNr">16801 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16802" class="LineNr">16802 </span> 89/<- %ebx 4/r32/esp +<span id="L16803" class="LineNr">16803 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt</span>: +<span id="L16804" class="LineNr">16804 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L16805" class="LineNr">16805 </span> 53/push-ebx/outputs +<span id="L16806" class="LineNr">16806 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16807" class="LineNr">16807 </span> 68/push 0/imm32/no-inouts +<span id="L16808" class="LineNr">16808 </span> 68/push 0/imm32/no-inouts +<span id="L16809" class="LineNr">16809 </span> 68/push 0/imm32/operation +<span id="L16810" class="LineNr">16810 </span> 68/push 0/imm32/operation +<span id="L16811" class="LineNr">16811 </span> 68/push 1/imm32 +<span id="L16812" class="LineNr">16812 </span> 89/<- %esi 4/r32/esp +<span id="L16813" class="LineNr">16813 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-stmt-operation</span>: +<span id="L16814" class="LineNr">16814 </span> <span class="subxComment"># stmt->operation = "increment"</span> +<span id="L16815" class="LineNr">16815 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L16816" class="LineNr">16816 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L16817" class="LineNr">16817 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-var</span>: +<span id="L16818" class="LineNr">16818 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> +<span id="L16819" class="LineNr">16819 </span> 68/push 0/imm32/register +<span id="L16820" class="LineNr">16820 </span> 68/push 0/imm32/register +<span id="L16821" class="LineNr">16821 </span> 68/push 0/imm32/no-stack-offset +<span id="L16822" class="LineNr">16822 </span> 68/push 1/imm32/block-depth +<span id="L16823" class="LineNr">16823 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> +<span id="L16824" class="LineNr">16824 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16825" class="LineNr">16825 </span> 68/push 0/imm32/name +<span id="L16826" class="LineNr">16826 </span> 68/push 0/imm32/name +<span id="L16827" class="LineNr">16827 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16828" class="LineNr">16828 </span> 89/<- %ebx 4/r32/esp +<span id="L16829" class="LineNr">16829 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-var-name</span>: +<span id="L16830" class="LineNr">16830 </span> <span class="subxComment"># formal-var->name = "dummy"</span> +<span id="L16831" class="LineNr">16831 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16832" class="LineNr">16832 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) +<span id="L16833" class="LineNr">16833 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-formal-register</span>: +<span id="L16834" class="LineNr">16834 </span> <span class="subxComment"># formal-var->register = "*"</span> +<span id="L16835" class="LineNr">16835 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L16836" class="LineNr">16836 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> +<span id="L16837" class="LineNr">16837 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-var-list</span>: +<span id="L16838" class="LineNr">16838 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list var)</span> +<span id="L16839" class="LineNr">16839 </span> 68/push 0/imm32/next +<span id="L16840" class="LineNr">16840 </span> 68/push 0/imm32/next +<span id="L16841" class="LineNr">16841 </span> 53/push-ebx/formal-var +<span id="L16842" class="LineNr">16842 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16843" class="LineNr">16843 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16844" class="LineNr">16844 </span> 89/<- %ebx 4/r32/esp +<span id="L16845" class="LineNr">16845 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2</span>: +<span id="L16846" class="LineNr">16846 </span> <span class="subxComment"># var primitive2/edi: (payload primitive)</span> +<span id="L16847" class="LineNr">16847 </span> 68/push 0/imm32/next +<span id="L16848" class="LineNr">16848 </span> 68/push 0/imm32/next +<span id="L16849" class="LineNr">16849 </span> 68/push 0/imm32/output-is-write-only +<span id="L16850" class="LineNr">16850 </span> 68/push 0/imm32/no-disp32 +<span id="L16851" class="LineNr">16851 </span> 68/push 0/imm32/no-imm32 +<span id="L16852" class="LineNr">16852 </span> 68/push 0/imm32/no-r32 +<span id="L16853" class="LineNr">16853 </span> 68/push 3/imm32/rm32-is-first-output +<span id="L16854" class="LineNr">16854 </span> 68/push 0/imm32/subx-name +<span id="L16855" class="LineNr">16855 </span> 68/push 0/imm32/subx-name +<span id="L16856" class="LineNr">16856 </span> 53/push-ebx/outputs +<span id="L16857" class="LineNr">16857 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16858" class="LineNr">16858 </span> 68/push 0/imm32/no-inouts +<span id="L16859" class="LineNr">16859 </span> 68/push 0/imm32/no-inouts +<span id="L16860" class="LineNr">16860 </span> 68/push 0/imm32/name +<span id="L16861" class="LineNr">16861 </span> 68/push 0/imm32/name +<span id="L16862" class="LineNr">16862 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16863" class="LineNr">16863 </span> 89/<- %edi 4/r32/esp +<span id="L16864" class="LineNr">16864 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2-name</span>: +<span id="L16865" class="LineNr">16865 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L16866" class="LineNr">16866 </span> 8d/copy-address *(edi+4) 0/r32/eax <span class="subxComment"># Primitive-name + 4</span> +<span id="L16867" class="LineNr">16867 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L16868" class="LineNr">16868 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive2-subx-name</span>: +<span id="L16869" class="LineNr">16869 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L16870" class="LineNr">16870 </span> 8d/copy-address *(edi+0x1c) 0/r32/eax <span class="subxComment"># Primitive-subx-name + 4</span> +<span id="L16871" class="LineNr">16871 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L16872" class="LineNr">16872 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive</span>: +<span id="L16873" class="LineNr">16873 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> +<span id="L16874" class="LineNr">16874 </span> 57/push-edi +<span id="L16875" class="LineNr">16875 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16876" class="LineNr">16876 </span> 68/push 0/imm32/output-is-write-only +<span id="L16877" class="LineNr">16877 </span> 68/push 0/imm32/no-disp32 +<span id="L16878" class="LineNr">16878 </span> 68/push 0/imm32/no-imm32 +<span id="L16879" class="LineNr">16879 </span> 68/push 0/imm32/no-r32 +<span id="L16880" class="LineNr">16880 </span> 68/push 1/imm32/rm32-is-first-inout +<span id="L16881" class="LineNr">16881 </span> 68/push 0/imm32/subx-name +<span id="L16882" class="LineNr">16882 </span> 68/push 0/imm32/subx-name +<span id="L16883" class="LineNr">16883 </span> 68/push 0/imm32/no-outputs +<span id="L16884" class="LineNr">16884 </span> 68/push 0/imm32/no-outputs +<span id="L16885" class="LineNr">16885 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> +<span id="L16886" class="LineNr">16886 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16887" class="LineNr">16887 </span> 68/push 0/imm32/name +<span id="L16888" class="LineNr">16888 </span> 68/push 0/imm32/name +<span id="L16889" class="LineNr">16889 </span> 89/<- %ebx 4/r32/esp +<span id="L16890" class="LineNr">16890 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive-name</span>: +<span id="L16891" class="LineNr">16891 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L16892" class="LineNr">16892 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> +<span id="L16893" class="LineNr">16893 </span><span class="Constant">$test-emit-subx-stmt-select-primitive:initialize-primitive-subx-name</span>: +<span id="L16894" class="LineNr">16894 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L16895" class="LineNr">16895 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> +<span id="L16896" class="LineNr">16896 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L16897" class="LineNr">16897 </span> <span class="subxComment"># convert</span> +<span id="L16898" class="LineNr">16898 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L16899" class="LineNr">16899 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L16900" class="LineNr">16900 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L16901" class="Folded">16901 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L16907" class="LineNr">16907 </span> <span class="subxComment"># check output</span> +<span id="L16908" class="LineNr">16908 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-select-primitive"</span>) +<span id="L16909" class="LineNr">16909 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L16910" class="LineNr">16910 </span> 89/<- %esp 5/r32/ebp +<span id="L16911" class="LineNr">16911 </span> 5d/pop-to-ebp +<span id="L16912" class="LineNr">16912 </span> c3/return +<span id="L16913" class="LineNr">16913 </span> +<span id="L16914" class="LineNr">16914 </span><span class="subxTest">test-emit-subx-stmt-select-primitive-2</span>: +<span id="L16915" class="LineNr">16915 </span> <span class="subxComment"># Select the right primitive between overloads.</span> +<span id="L16916" class="LineNr">16916 </span> <span class="subxComment"># increment foo</span> +<span id="L16917" class="LineNr">16917 </span> <span class="subxComment"># =></span> +<span id="L16918" class="LineNr">16918 </span> <span class="subxComment"># ff 0/subop/increment %eax # sub-optimal, but should suffice</span> +<span id="L16919" class="LineNr">16919 </span> <span class="subxComment">#</span> +<span id="L16920" class="LineNr">16920 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L16921" class="LineNr">16921 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L16922" class="LineNr">16922 </span> <span class="subxComment"># type: int</span> +<span id="L16923" class="LineNr">16923 </span> <span class="subxComment"># register: 'eax'</span> +<span id="L16924" class="LineNr">16924 </span> <span class="subxComment">#</span> +<span id="L16925" class="LineNr">16925 </span> <span class="subxComment"># There's two primitives, as follows:</span> +<span id="L16926" class="LineNr">16926 </span> <span class="subxComment"># - name: 'increment'</span> +<span id="L16927" class="LineNr">16927 </span> <span class="subxComment"># out: int/reg</span> +<span id="L16928" class="LineNr">16928 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16929" class="LineNr">16929 </span> <span class="subxComment"># - name: 'increment'</span> +<span id="L16930" class="LineNr">16930 </span> <span class="subxComment"># inout: int/mem</span> +<span id="L16931" class="LineNr">16931 </span> <span class="subxComment"># value: 'ff 0/subop/increment'</span> +<span id="L16932" class="LineNr">16932 </span> <span class="subxComment">#</span> +<span id="L16933" class="LineNr">16933 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L16934" class="LineNr">16934 </span> 55/push-ebp +<span id="L16935" class="LineNr">16935 </span> 89/<- %ebp 4/r32/esp +<span id="L16936" class="LineNr">16936 </span> <span class="subxComment"># setup</span> +<span id="L16937" class="LineNr">16937 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L16938" class="LineNr">16938 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L16939" class="LineNr">16939 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-type</span>: +<span id="L16940" class="LineNr">16940 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L16941" class="LineNr">16941 </span> 68/push 0/imm32/right:null +<span id="L16942" class="LineNr">16942 </span> 68/push 0/imm32/right:null +<span id="L16943" class="LineNr">16943 </span> 68/push 0/imm32/left:unused +<span id="L16944" class="LineNr">16944 </span> 68/push 1/imm32/value:int +<span id="L16945" class="LineNr">16945 </span> 68/push 1/imm32/is-atom?:true +<span id="L16946" class="LineNr">16946 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16947" class="LineNr">16947 </span> 89/<- %ecx 4/r32/esp +<span id="L16948" class="LineNr">16948 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var</span>: +<span id="L16949" class="LineNr">16949 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> +<span id="L16950" class="LineNr">16950 </span> 68/push 0/imm32/register +<span id="L16951" class="LineNr">16951 </span> 68/push 0/imm32/register +<span id="L16952" class="LineNr">16952 </span> 68/push 0/imm32/no-stack-offset +<span id="L16953" class="LineNr">16953 </span> 68/push 1/imm32/block-depth +<span id="L16954" class="LineNr">16954 </span> 51/push-ecx +<span id="L16955" class="LineNr">16955 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16956" class="LineNr">16956 </span> 68/push 0/imm32/name +<span id="L16957" class="LineNr">16957 </span> 68/push 0/imm32/name +<span id="L16958" class="LineNr">16958 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16959" class="LineNr">16959 </span> 89/<- %ecx 4/r32/esp +<span id="L16960" class="LineNr">16960 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-name</span>: +<span id="L16961" class="LineNr">16961 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L16962" class="LineNr">16962 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L16963" class="LineNr">16963 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L16964" class="LineNr">16964 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-register</span>: +<span id="L16965" class="LineNr">16965 </span> <span class="subxComment"># var-foo->register = "eax"</span> +<span id="L16966" class="LineNr">16966 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L16967" class="LineNr">16967 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L16968" class="LineNr">16968 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt-var</span>: +<span id="L16969" class="LineNr">16969 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> +<span id="L16970" class="LineNr">16970 </span> 68/push 0/imm32/is-deref:false +<span id="L16971" class="LineNr">16971 </span> 68/push 0/imm32/next +<span id="L16972" class="LineNr">16972 </span> 68/push 0/imm32/next +<span id="L16973" class="LineNr">16973 </span> 51/push-ecx/var-foo +<span id="L16974" class="LineNr">16974 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16975" class="LineNr">16975 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L16976" class="LineNr">16976 </span> 89/<- %ebx 4/r32/esp +<span id="L16977" class="LineNr">16977 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt</span>: +<span id="L16978" class="LineNr">16978 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L16979" class="LineNr">16979 </span> 68/push 0/imm32/no-outputs +<span id="L16980" class="LineNr">16980 </span> 68/push 0/imm32/no-outputs +<span id="L16981" class="LineNr">16981 </span> 53/push-ebx/inouts +<span id="L16982" class="LineNr">16982 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16983" class="LineNr">16983 </span> 68/push 0/imm32/operation +<span id="L16984" class="LineNr">16984 </span> 68/push 0/imm32/operation +<span id="L16985" class="LineNr">16985 </span> 68/push 1/imm32 +<span id="L16986" class="LineNr">16986 </span> 89/<- %esi 4/r32/esp +<span id="L16987" class="LineNr">16987 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-stmt-operation</span>: +<span id="L16988" class="LineNr">16988 </span> <span class="subxComment"># stmt->operation = "increment"</span> +<span id="L16989" class="LineNr">16989 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L16990" class="LineNr">16990 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L16991" class="LineNr">16991 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-var</span>: +<span id="L16992" class="LineNr">16992 </span> <span class="subxComment"># var formal-var/ebx: (payload var)</span> +<span id="L16993" class="LineNr">16993 </span> 68/push 0/imm32/register +<span id="L16994" class="LineNr">16994 </span> 68/push 0/imm32/register +<span id="L16995" class="LineNr">16995 </span> 68/push 0/imm32/no-stack-offset +<span id="L16996" class="LineNr">16996 </span> 68/push 1/imm32/block-depth +<span id="L16997" class="LineNr">16997 </span> ff 6/subop/push *(ecx+0x10) <span class="subxComment"># Var-type + payload alloc id + handle alloc id</span> +<span id="L16998" class="LineNr">16998 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L16999" class="LineNr">16999 </span> 68/push 0/imm32/name +<span id="L17000" class="LineNr">17000 </span> 68/push 0/imm32/name +<span id="L17001" class="LineNr">17001 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17002" class="LineNr">17002 </span> 89/<- %ebx 4/r32/esp +<span id="L17003" class="LineNr">17003 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-var-name</span>: +<span id="L17004" class="LineNr">17004 </span> <span class="subxComment"># formal-var->name = "dummy"</span> +<span id="L17005" class="LineNr">17005 </span> 8d/copy-address *(ebx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17006" class="LineNr">17006 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"dummy"</span> %eax) +<span id="L17007" class="LineNr">17007 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-formal-register</span>: +<span id="L17008" class="LineNr">17008 </span> <span class="subxComment"># formal-var->register = "*"</span> +<span id="L17009" class="LineNr">17009 </span> 8d/copy-address *(ebx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17010" class="LineNr">17010 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"*"</span> %eax) <span class="subxComment"># Any-register</span> +<span id="L17011" class="LineNr">17011 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-var-list</span>: +<span id="L17012" class="LineNr">17012 </span> <span class="subxComment"># var formal-outputs/ebx: (payload list stmt-var)</span> +<span id="L17013" class="LineNr">17013 </span> 68/push 0/imm32/next +<span id="L17014" class="LineNr">17014 </span> 68/push 0/imm32/next +<span id="L17015" class="LineNr">17015 </span> 53/push-ebx/formal-var +<span id="L17016" class="LineNr">17016 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17017" class="LineNr">17017 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17018" class="LineNr">17018 </span> 89/<- %ebx 4/r32/esp +<span id="L17019" class="LineNr">17019 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2</span>: +<span id="L17020" class="LineNr">17020 </span> <span class="subxComment"># var primitive2/edi: (payload primitive)</span> +<span id="L17021" class="LineNr">17021 </span> 68/push 0/imm32/next +<span id="L17022" class="LineNr">17022 </span> 68/push 0/imm32/next +<span id="L17023" class="LineNr">17023 </span> 68/push 0/imm32/output-is-write-only +<span id="L17024" class="LineNr">17024 </span> 68/push 0/imm32/no-disp32 +<span id="L17025" class="LineNr">17025 </span> 68/push 0/imm32/no-imm32 +<span id="L17026" class="LineNr">17026 </span> 68/push 0/imm32/no-r32 +<span id="L17027" class="LineNr">17027 </span> 68/push 3/imm32/rm32-is-first-output +<span id="L17028" class="LineNr">17028 </span> 68/push 0/imm32/subx-name +<span id="L17029" class="LineNr">17029 </span> 68/push 0/imm32/subx-name +<span id="L17030" class="LineNr">17030 </span> 53/push-ebx/outputs +<span id="L17031" class="LineNr">17031 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17032" class="LineNr">17032 </span> 68/push 0/imm32/no-inouts +<span id="L17033" class="LineNr">17033 </span> 68/push 0/imm32/no-inouts +<span id="L17034" class="LineNr">17034 </span> 68/push 0/imm32/name +<span id="L17035" class="LineNr">17035 </span> 68/push 0/imm32/name +<span id="L17036" class="LineNr">17036 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17037" class="LineNr">17037 </span> 89/<- %edi 4/r32/esp +<span id="L17038" class="LineNr">17038 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2-name</span>: +<span id="L17039" class="LineNr">17039 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L17040" class="LineNr">17040 </span> 8d/copy-address *(edi+4) 0/r32/eax <span class="subxComment"># Primitive-name + 4</span> +<span id="L17041" class="LineNr">17041 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L17042" class="LineNr">17042 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive2-subx-name</span>: +<span id="L17043" class="LineNr">17043 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L17044" class="LineNr">17044 </span> 8d/copy-address *(edi+0x1c) 0/r32/eax <span class="subxComment"># Primitive-subx-name + 4</span> +<span id="L17045" class="LineNr">17045 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L17046" class="LineNr">17046 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive</span>: +<span id="L17047" class="LineNr">17047 </span> <span class="subxComment"># var primitives/ebx: (addr primitive)</span> +<span id="L17048" class="LineNr">17048 </span> 57/push-edi +<span id="L17049" class="LineNr">17049 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17050" class="LineNr">17050 </span> 68/push 0/imm32/output-is-write-only +<span id="L17051" class="LineNr">17051 </span> 68/push 0/imm32/no-disp32 +<span id="L17052" class="LineNr">17052 </span> 68/push 0/imm32/no-imm32 +<span id="L17053" class="LineNr">17053 </span> 68/push 0/imm32/no-r32 +<span id="L17054" class="LineNr">17054 </span> 68/push 1/imm32/rm32-is-first-inout +<span id="L17055" class="LineNr">17055 </span> 68/push 0/imm32/subx-name +<span id="L17056" class="LineNr">17056 </span> 68/push 0/imm32/subx-name +<span id="L17057" class="LineNr">17057 </span> 68/push 0/imm32/no-outputs +<span id="L17058" class="LineNr">17058 </span> 68/push 0/imm32/no-outputs +<span id="L17059" class="LineNr">17059 </span> 53/push-ebx/inouts <span class="subxComment"># hack: reuse stmt-var from call stmt as (list var) in function declaration</span> +<span id="L17060" class="LineNr">17060 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17061" class="LineNr">17061 </span> 68/push 0/imm32/name +<span id="L17062" class="LineNr">17062 </span> 68/push 0/imm32/name +<span id="L17063" class="LineNr">17063 </span> 89/<- %ebx 4/r32/esp +<span id="L17064" class="LineNr">17064 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive-name</span>: +<span id="L17065" class="LineNr">17065 </span> <span class="subxComment"># primitives->name = "increment"</span> +<span id="L17066" class="LineNr">17066 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %ebx) <span class="subxComment"># Primitive-name</span> +<span id="L17067" class="LineNr">17067 </span><span class="Constant">$test-emit-subx-stmt-select-primitive-2:initialize-primitive-subx-name</span>: +<span id="L17068" class="LineNr">17068 </span> <span class="subxComment"># primitives->subx-name = "ff 0/subop/increment"</span> +<span id="L17069" class="LineNr">17069 </span> 8d/copy-address *(ebx+0x18) 0/r32/eax <span class="subxComment"># Primitive-subx-name</span> +<span id="L17070" class="LineNr">17070 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ff 0/subop/increment"</span> %eax) +<span id="L17071" class="LineNr">17071 </span> <span class="subxComment"># convert</span> +<span id="L17072" class="LineNr">17072 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17073" class="LineNr">17073 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17074" class="LineNr">17074 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17075" class="Folded">17075 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17081" class="LineNr">17081 </span> <span class="subxComment"># check output</span> +<span id="L17082" class="LineNr">17082 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"ff 0/subop/increment %eax"</span> <span class="Constant">"F - test-emit-subx-stmt-select-primitive-2"</span>) +<span id="L17083" class="LineNr">17083 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17084" class="LineNr">17084 </span> 89/<- %esp 5/r32/ebp +<span id="L17085" class="LineNr">17085 </span> 5d/pop-to-ebp +<span id="L17086" class="LineNr">17086 </span> c3/return +<span id="L17087" class="LineNr">17087 </span> +<span id="L17088" class="LineNr">17088 </span><span class="subxTest">test-increment-register</span>: +<span id="L17089" class="LineNr">17089 </span> <span class="subxComment"># Select the right register between overloads.</span> +<span id="L17090" class="LineNr">17090 </span> <span class="subxComment"># foo <- increment</span> +<span id="L17091" class="LineNr">17091 </span> <span class="subxComment"># =></span> +<span id="L17092" class="LineNr">17092 </span> <span class="subxComment"># 50/increment-eax</span> +<span id="L17093" class="LineNr">17093 </span> <span class="subxComment">#</span> +<span id="L17094" class="LineNr">17094 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L17095" class="LineNr">17095 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L17096" class="LineNr">17096 </span> <span class="subxComment"># type: int</span> +<span id="L17097" class="LineNr">17097 </span> <span class="subxComment"># register: 'eax'</span> +<span id="L17098" class="LineNr">17098 </span> <span class="subxComment">#</span> +<span id="L17099" class="LineNr">17099 </span> <span class="subxComment"># Primitives are the global definitions.</span> +<span id="L17100" class="LineNr">17100 </span> <span class="subxComment">#</span> +<span id="L17101" class="LineNr">17101 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17102" class="LineNr">17102 </span> 55/push-ebp +<span id="L17103" class="LineNr">17103 </span> 89/<- %ebp 4/r32/esp +<span id="L17104" class="LineNr">17104 </span> <span class="subxComment"># setup</span> +<span id="L17105" class="LineNr">17105 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17106" class="LineNr">17106 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17107" class="LineNr">17107 </span><span class="Constant">$test-increment-register:initialize-type</span>: +<span id="L17108" class="LineNr">17108 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17109" class="LineNr">17109 </span> 68/push 0/imm32/right:null +<span id="L17110" class="LineNr">17110 </span> 68/push 0/imm32/right:null +<span id="L17111" class="LineNr">17111 </span> 68/push 0/imm32/left:unused +<span id="L17112" class="LineNr">17112 </span> 68/push 1/imm32/value:int +<span id="L17113" class="LineNr">17113 </span> 68/push 1/imm32/is-atom?:true +<span id="L17114" class="LineNr">17114 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17115" class="LineNr">17115 </span> 89/<- %ecx 4/r32/esp +<span id="L17116" class="LineNr">17116 </span><span class="Constant">$test-increment-register:initialize-var</span>: +<span id="L17117" class="LineNr">17117 </span> <span class="subxComment"># var var-foo/ecx: (payload var)</span> +<span id="L17118" class="LineNr">17118 </span> 68/push 0/imm32/register +<span id="L17119" class="LineNr">17119 </span> 68/push 0/imm32/register +<span id="L17120" class="LineNr">17120 </span> 68/push 0/imm32/no-stack-offset +<span id="L17121" class="LineNr">17121 </span> 68/push 1/imm32/block-depth +<span id="L17122" class="LineNr">17122 </span> 51/push-ecx +<span id="L17123" class="LineNr">17123 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17124" class="LineNr">17124 </span> 68/push 0/imm32/name +<span id="L17125" class="LineNr">17125 </span> 68/push 0/imm32/name +<span id="L17126" class="LineNr">17126 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17127" class="LineNr">17127 </span> 89/<- %ecx 4/r32/esp +<span id="L17128" class="LineNr">17128 </span><span class="Constant">$test-increment-register:initialize-var-name</span>: +<span id="L17129" class="LineNr">17129 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L17130" class="LineNr">17130 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17131" class="LineNr">17131 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L17132" class="LineNr">17132 </span><span class="Constant">$test-increment-register:initialize-var-register</span>: +<span id="L17133" class="LineNr">17133 </span> <span class="subxComment"># var-foo->register = "eax"</span> +<span id="L17134" class="LineNr">17134 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17135" class="LineNr">17135 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L17136" class="LineNr">17136 </span><span class="Constant">$test-increment-register:initialize-stmt-var</span>: +<span id="L17137" class="LineNr">17137 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var)</span> +<span id="L17138" class="LineNr">17138 </span> 68/push 0/imm32/is-deref:false +<span id="L17139" class="LineNr">17139 </span> 68/push 0/imm32/next +<span id="L17140" class="LineNr">17140 </span> 68/push 0/imm32/next +<span id="L17141" class="LineNr">17141 </span> 51/push-ecx/var-foo +<span id="L17142" class="LineNr">17142 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17143" class="LineNr">17143 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17144" class="LineNr">17144 </span> 89/<- %ebx 4/r32/esp +<span id="L17145" class="LineNr">17145 </span><span class="Constant">$test-increment-register:initialize-stmt</span>: +<span id="L17146" class="LineNr">17146 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17147" class="LineNr">17147 </span> 53/push-ebx/outputs +<span id="L17148" class="LineNr">17148 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17149" class="LineNr">17149 </span> 68/push 0/imm32/no-inouts +<span id="L17150" class="LineNr">17150 </span> 68/push 0/imm32/no-inouts +<span id="L17151" class="LineNr">17151 </span> 68/push 0/imm32/operation +<span id="L17152" class="LineNr">17152 </span> 68/push 0/imm32/operation +<span id="L17153" class="LineNr">17153 </span> 68/push 1/imm32 +<span id="L17154" class="LineNr">17154 </span> 89/<- %esi 4/r32/esp +<span id="L17155" class="LineNr">17155 </span><span class="Constant">$test-increment-register:initialize-stmt-operation</span>: +<span id="L17156" class="LineNr">17156 </span> <span class="subxComment"># stmt->operation = "increment"</span> +<span id="L17157" class="LineNr">17157 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17158" class="LineNr">17158 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"increment"</span> %eax) +<span id="L17159" class="LineNr">17159 </span> <span class="subxComment"># convert</span> +<span id="L17160" class="LineNr">17160 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17161" class="LineNr">17161 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17162" class="LineNr">17162 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17163" class="Folded">17163 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17169" class="LineNr">17169 </span> <span class="subxComment"># check output</span> +<span id="L17170" class="LineNr">17170 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"40/increment-eax"</span> <span class="Constant">"F - test-increment-register"</span>) +<span id="L17171" class="LineNr">17171 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17172" class="LineNr">17172 </span> 89/<- %esp 5/r32/ebp +<span id="L17173" class="LineNr">17173 </span> 5d/pop-to-ebp +<span id="L17174" class="LineNr">17174 </span> c3/return +<span id="L17175" class="LineNr">17175 </span> +<span id="L17176" class="LineNr">17176 </span><span class="subxTest">test-add-reg-to-reg</span>: +<span id="L17177" class="LineNr">17177 </span> <span class="subxComment"># var1/reg <- add var2/reg</span> +<span id="L17178" class="LineNr">17178 </span> <span class="subxComment"># =></span> +<span id="L17179" class="LineNr">17179 </span> <span class="subxComment"># 01/add-to %var1 var2</span> +<span id="L17180" class="LineNr">17180 </span> <span class="subxComment">#</span> +<span id="L17181" class="LineNr">17181 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17182" class="LineNr">17182 </span> 55/push-ebp +<span id="L17183" class="LineNr">17183 </span> 89/<- %ebp 4/r32/esp +<span id="L17184" class="LineNr">17184 </span> <span class="subxComment"># setup</span> +<span id="L17185" class="LineNr">17185 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17186" class="LineNr">17186 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17187" class="LineNr">17187 </span><span class="Constant">$test-add-reg-to-reg:initialize-type</span>: +<span id="L17188" class="LineNr">17188 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17189" class="LineNr">17189 </span> 68/push 0/imm32/right:null +<span id="L17190" class="LineNr">17190 </span> 68/push 0/imm32/right:null +<span id="L17191" class="LineNr">17191 </span> 68/push 0/imm32/left:unused +<span id="L17192" class="LineNr">17192 </span> 68/push 1/imm32/value:int +<span id="L17193" class="LineNr">17193 </span> 68/push 1/imm32/is-atom?:true +<span id="L17194" class="LineNr">17194 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17195" class="LineNr">17195 </span> 89/<- %ecx 4/r32/esp +<span id="L17196" class="LineNr">17196 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1</span>: +<span id="L17197" class="LineNr">17197 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17198" class="LineNr">17198 </span> 68/push 0/imm32/register +<span id="L17199" class="LineNr">17199 </span> 68/push 0/imm32/register +<span id="L17200" class="LineNr">17200 </span> 68/push 0/imm32/no-stack-offset +<span id="L17201" class="LineNr">17201 </span> 68/push 1/imm32/block-depth +<span id="L17202" class="LineNr">17202 </span> 51/push-ecx +<span id="L17203" class="LineNr">17203 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17204" class="LineNr">17204 </span> 68/push 0/imm32/name +<span id="L17205" class="LineNr">17205 </span> 68/push 0/imm32/name +<span id="L17206" class="LineNr">17206 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17207" class="LineNr">17207 </span> 89/<- %ecx 4/r32/esp +<span id="L17208" class="LineNr">17208 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1-name</span>: +<span id="L17209" class="LineNr">17209 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L17210" class="LineNr">17210 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17211" class="LineNr">17211 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17212" class="LineNr">17212 </span><span class="Constant">$test-add-reg-to-reg:initialize-var1-register</span>: +<span id="L17213" class="LineNr">17213 </span> <span class="subxComment"># var1->register = "eax"</span> +<span id="L17214" class="LineNr">17214 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17215" class="LineNr">17215 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L17216" class="LineNr">17216 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2</span>: +<span id="L17217" class="LineNr">17217 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L17218" class="LineNr">17218 </span> 68/push 0/imm32/register +<span id="L17219" class="LineNr">17219 </span> 68/push 0/imm32/register +<span id="L17220" class="LineNr">17220 </span> 68/push 0/imm32/no-stack-offset +<span id="L17221" class="LineNr">17221 </span> 68/push 1/imm32/block-depth +<span id="L17222" class="LineNr">17222 </span> ff 6/subop/push *(ecx+0x10) +<span id="L17223" class="LineNr">17223 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17224" class="LineNr">17224 </span> 68/push 0/imm32/name +<span id="L17225" class="LineNr">17225 </span> 68/push 0/imm32/name +<span id="L17226" class="LineNr">17226 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17227" class="LineNr">17227 </span> 89/<- %edx 4/r32/esp +<span id="L17228" class="LineNr">17228 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2-name</span>: +<span id="L17229" class="LineNr">17229 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L17230" class="LineNr">17230 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17231" class="LineNr">17231 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L17232" class="LineNr">17232 </span><span class="Constant">$test-add-reg-to-reg:initialize-var2-register</span>: +<span id="L17233" class="LineNr">17233 </span> <span class="subxComment"># var2->register = "ecx"</span> +<span id="L17234" class="LineNr">17234 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17235" class="LineNr">17235 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) +<span id="L17236" class="LineNr">17236 </span><span class="Constant">$test-add-reg-to-reg:initialize-inouts</span>: +<span id="L17237" class="LineNr">17237 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L17238" class="LineNr">17238 </span> 68/push 0/imm32/is-deref:false +<span id="L17239" class="LineNr">17239 </span> 68/push 0/imm32/next +<span id="L17240" class="LineNr">17240 </span> 68/push 0/imm32/next +<span id="L17241" class="LineNr">17241 </span> 52/push-edx/var2 +<span id="L17242" class="LineNr">17242 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17243" class="LineNr">17243 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17244" class="LineNr">17244 </span> 89/<- %esi 4/r32/esp +<span id="L17245" class="LineNr">17245 </span><span class="Constant">$test-add-reg-to-reg:initialize-outputs</span>: +<span id="L17246" class="LineNr">17246 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [var1]</span> +<span id="L17247" class="LineNr">17247 </span> 68/push 0/imm32/is-deref:false +<span id="L17248" class="LineNr">17248 </span> 68/push 0/imm32/next +<span id="L17249" class="LineNr">17249 </span> 68/push 0/imm32/next +<span id="L17250" class="LineNr">17250 </span> 51/push-ecx/var1 +<span id="L17251" class="LineNr">17251 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17252" class="LineNr">17252 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17253" class="LineNr">17253 </span> 89/<- %edi 4/r32/esp +<span id="L17254" class="LineNr">17254 </span><span class="Constant">$test-add-reg-to-reg:initialize-stmt</span>: +<span id="L17255" class="LineNr">17255 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17256" class="LineNr">17256 </span> 68/push 0/imm32/next +<span id="L17257" class="LineNr">17257 </span> 68/push 0/imm32/next +<span id="L17258" class="LineNr">17258 </span> 57/push-edi/outputs +<span id="L17259" class="LineNr">17259 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17260" class="LineNr">17260 </span> 56/push-esi/inouts +<span id="L17261" class="LineNr">17261 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17262" class="LineNr">17262 </span> 68/push 0/imm32/operation +<span id="L17263" class="LineNr">17263 </span> 68/push 0/imm32/operation +<span id="L17264" class="LineNr">17264 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17265" class="LineNr">17265 </span> 89/<- %esi 4/r32/esp +<span id="L17266" class="LineNr">17266 </span><span class="Constant">$test-add-reg-to-reg:initialize-stmt-operation</span>: +<span id="L17267" class="LineNr">17267 </span> <span class="subxComment"># stmt->operation = "add"</span> +<span id="L17268" class="LineNr">17268 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17269" class="LineNr">17269 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) +<span id="L17270" class="LineNr">17270 </span> <span class="subxComment"># convert</span> +<span id="L17271" class="LineNr">17271 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17272" class="LineNr">17272 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17273" class="LineNr">17273 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17274" class="Folded">17274 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17280" class="LineNr">17280 </span> <span class="subxComment"># check output</span> +<span id="L17281" class="LineNr">17281 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"01/add-to %eax 0x00000001/r32"</span> <span class="Constant">"F - test-add-reg-to-reg"</span>) +<span id="L17282" class="LineNr">17282 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17283" class="LineNr">17283 </span> 89/<- %esp 5/r32/ebp +<span id="L17284" class="LineNr">17284 </span> 5d/pop-to-ebp +<span id="L17285" class="LineNr">17285 </span> c3/return +<span id="L17286" class="LineNr">17286 </span> +<span id="L17287" class="LineNr">17287 </span><span class="subxTest">test-add-reg-to-mem</span>: +<span id="L17288" class="LineNr">17288 </span> <span class="subxComment"># add-to var1 var2/reg</span> +<span id="L17289" class="LineNr">17289 </span> <span class="subxComment"># =></span> +<span id="L17290" class="LineNr">17290 </span> <span class="subxComment"># 01/add-to *(ebp+__) var2</span> +<span id="L17291" class="LineNr">17291 </span> <span class="subxComment">#</span> +<span id="L17292" class="LineNr">17292 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17293" class="LineNr">17293 </span> 55/push-ebp +<span id="L17294" class="LineNr">17294 </span> 89/<- %ebp 4/r32/esp +<span id="L17295" class="LineNr">17295 </span> <span class="subxComment"># setup</span> +<span id="L17296" class="LineNr">17296 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17297" class="LineNr">17297 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17298" class="LineNr">17298 </span><span class="Constant">$test-add-reg-to-mem:initialize-type</span>: +<span id="L17299" class="LineNr">17299 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17300" class="LineNr">17300 </span> 68/push 0/imm32/right:null +<span id="L17301" class="LineNr">17301 </span> 68/push 0/imm32/right:null +<span id="L17302" class="LineNr">17302 </span> 68/push 0/imm32/left:unused +<span id="L17303" class="LineNr">17303 </span> 68/push 1/imm32/value:int +<span id="L17304" class="LineNr">17304 </span> 68/push 1/imm32/is-atom?:true +<span id="L17305" class="LineNr">17305 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17306" class="LineNr">17306 </span> 89/<- %ecx 4/r32/esp +<span id="L17307" class="LineNr">17307 </span><span class="Constant">$test-add-reg-to-mem:initialize-var1</span>: +<span id="L17308" class="LineNr">17308 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17309" class="LineNr">17309 </span> 68/push 0/imm32/register +<span id="L17310" class="LineNr">17310 </span> 68/push 0/imm32/register +<span id="L17311" class="LineNr">17311 </span> 68/push 8/imm32/stack-offset +<span id="L17312" class="LineNr">17312 </span> 68/push 1/imm32/block-depth +<span id="L17313" class="LineNr">17313 </span> 51/push-ecx +<span id="L17314" class="LineNr">17314 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17315" class="LineNr">17315 </span> 68/push 0/imm32/name +<span id="L17316" class="LineNr">17316 </span> 68/push 0/imm32/name +<span id="L17317" class="LineNr">17317 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17318" class="LineNr">17318 </span> 89/<- %ecx 4/r32/esp +<span id="L17319" class="LineNr">17319 </span><span class="Constant">$test-add-reg-to-mem:initialize-var1-name</span>: +<span id="L17320" class="LineNr">17320 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L17321" class="LineNr">17321 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17322" class="LineNr">17322 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17323" class="LineNr">17323 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2</span>: +<span id="L17324" class="LineNr">17324 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L17325" class="LineNr">17325 </span> 68/push 0/imm32/register +<span id="L17326" class="LineNr">17326 </span> 68/push 0/imm32/register +<span id="L17327" class="LineNr">17327 </span> 68/push 0/imm32/no-stack-offset +<span id="L17328" class="LineNr">17328 </span> 68/push 1/imm32/block-depth +<span id="L17329" class="LineNr">17329 </span> ff 6/subop/push *(ecx+0x10) +<span id="L17330" class="LineNr">17330 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17331" class="LineNr">17331 </span> 68/push 0/imm32/name +<span id="L17332" class="LineNr">17332 </span> 68/push 0/imm32/name +<span id="L17333" class="LineNr">17333 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17334" class="LineNr">17334 </span> 89/<- %edx 4/r32/esp +<span id="L17335" class="LineNr">17335 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2-name</span>: +<span id="L17336" class="LineNr">17336 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L17337" class="LineNr">17337 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17338" class="LineNr">17338 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L17339" class="LineNr">17339 </span><span class="Constant">$test-add-reg-to-mem:initialize-var2-register</span>: +<span id="L17340" class="LineNr">17340 </span> <span class="subxComment"># var2->register = "ecx"</span> +<span id="L17341" class="LineNr">17341 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17342" class="LineNr">17342 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) +<span id="L17343" class="LineNr">17343 </span><span class="Constant">$test-add-reg-to-mem:initialize-inouts</span>: +<span id="L17344" class="LineNr">17344 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L17345" class="LineNr">17345 </span> 68/push 0/imm32/is-deref:false +<span id="L17346" class="LineNr">17346 </span> 68/push 0/imm32/next +<span id="L17347" class="LineNr">17347 </span> 68/push 0/imm32/next +<span id="L17348" class="LineNr">17348 </span> 52/push-edx/var2 +<span id="L17349" class="LineNr">17349 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17350" class="LineNr">17350 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17351" class="LineNr">17351 </span> 89/<- %esi 4/r32/esp +<span id="L17352" class="LineNr">17352 </span> <span class="subxComment"># inouts = [var1, var2]</span> +<span id="L17353" class="LineNr">17353 </span> 68/push 0/imm32/is-deref:false +<span id="L17354" class="LineNr">17354 </span> 56/push-esi/next +<span id="L17355" class="LineNr">17355 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17356" class="LineNr">17356 </span> 51/push-ecx/var1 +<span id="L17357" class="LineNr">17357 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17358" class="LineNr">17358 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17359" class="LineNr">17359 </span> 89/<- %esi 4/r32/esp +<span id="L17360" class="LineNr">17360 </span><span class="Constant">$test-add-reg-to-mem:initialize-stmt</span>: +<span id="L17361" class="LineNr">17361 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17362" class="LineNr">17362 </span> 68/push 0/imm32/next +<span id="L17363" class="LineNr">17363 </span> 68/push 0/imm32/next +<span id="L17364" class="LineNr">17364 </span> 68/push 0/imm32/outputs +<span id="L17365" class="LineNr">17365 </span> 68/push 0/imm32/outputs +<span id="L17366" class="LineNr">17366 </span> 56/push-esi/inouts +<span id="L17367" class="LineNr">17367 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17368" class="LineNr">17368 </span> 68/push 0/imm32/operation +<span id="L17369" class="LineNr">17369 </span> 68/push 0/imm32/operation +<span id="L17370" class="LineNr">17370 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17371" class="LineNr">17371 </span> 89/<- %esi 4/r32/esp +<span id="L17372" class="LineNr">17372 </span><span class="Constant">$test-add-reg-to-mem:initialize-stmt-operation</span>: +<span id="L17373" class="LineNr">17373 </span> <span class="subxComment"># stmt->operation = "add-to"</span> +<span id="L17374" class="LineNr">17374 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17375" class="LineNr">17375 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add-to"</span> %eax) +<span id="L17376" class="LineNr">17376 </span> <span class="subxComment"># convert</span> +<span id="L17377" class="LineNr">17377 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17378" class="LineNr">17378 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17379" class="LineNr">17379 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17380" class="Folded">17380 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17386" class="LineNr">17386 </span> <span class="subxComment"># check output</span> +<span id="L17387" class="LineNr">17387 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"01/add-to *(ebp+0x00000008) 0x00000001/r32"</span> <span class="Constant">"F - test-add-reg-to-mem"</span>) +<span id="L17388" class="LineNr">17388 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17389" class="LineNr">17389 </span> 89/<- %esp 5/r32/ebp +<span id="L17390" class="LineNr">17390 </span> 5d/pop-to-ebp +<span id="L17391" class="LineNr">17391 </span> c3/return +<span id="L17392" class="LineNr">17392 </span> +<span id="L17393" class="LineNr">17393 </span><span class="subxTest">test-add-mem-to-reg</span>: +<span id="L17394" class="LineNr">17394 </span> <span class="subxComment"># var1/reg <- add var2</span> +<span id="L17395" class="LineNr">17395 </span> <span class="subxComment"># =></span> +<span id="L17396" class="LineNr">17396 </span> <span class="subxComment"># 03/add *(ebp+__) var1</span> +<span id="L17397" class="LineNr">17397 </span> <span class="subxComment">#</span> +<span id="L17398" class="LineNr">17398 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17399" class="LineNr">17399 </span> 55/push-ebp +<span id="L17400" class="LineNr">17400 </span> 89/<- %ebp 4/r32/esp +<span id="L17401" class="LineNr">17401 </span> <span class="subxComment"># setup</span> +<span id="L17402" class="LineNr">17402 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17403" class="LineNr">17403 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17404" class="LineNr">17404 </span><span class="Constant">$test-add-mem-to-reg:initialize-type</span>: +<span id="L17405" class="LineNr">17405 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17406" class="LineNr">17406 </span> 68/push 0/imm32/right:null +<span id="L17407" class="LineNr">17407 </span> 68/push 0/imm32/right:null +<span id="L17408" class="LineNr">17408 </span> 68/push 0/imm32/left:unused +<span id="L17409" class="LineNr">17409 </span> 68/push 1/imm32/value:int +<span id="L17410" class="LineNr">17410 </span> 68/push 1/imm32/is-atom?:true +<span id="L17411" class="LineNr">17411 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17412" class="LineNr">17412 </span> 89/<- %ecx 4/r32/esp +<span id="L17413" class="LineNr">17413 </span><span class="Constant">$test-add-mem-to-reg:initialize-var</span>: +<span id="L17414" class="LineNr">17414 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17415" class="LineNr">17415 </span> 68/push 0/imm32/register +<span id="L17416" class="LineNr">17416 </span> 68/push 0/imm32/register +<span id="L17417" class="LineNr">17417 </span> 68/push 0/imm32/no-stack-offset +<span id="L17418" class="LineNr">17418 </span> 68/push 1/imm32/block-depth +<span id="L17419" class="LineNr">17419 </span> 51/push-ecx +<span id="L17420" class="LineNr">17420 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17421" class="LineNr">17421 </span> 68/push 0/imm32/name +<span id="L17422" class="LineNr">17422 </span> 68/push 0/imm32/name +<span id="L17423" class="LineNr">17423 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17424" class="LineNr">17424 </span> 89/<- %ecx 4/r32/esp +<span id="L17425" class="LineNr">17425 </span><span class="Constant">$test-add-mem-to-reg:initialize-var-name</span>: +<span id="L17426" class="LineNr">17426 </span> <span class="subxComment"># var1->name = "foo"</span> +<span id="L17427" class="LineNr">17427 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17428" class="LineNr">17428 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17429" class="LineNr">17429 </span><span class="Constant">$test-add-mem-to-reg:initialize-var-register</span>: +<span id="L17430" class="LineNr">17430 </span> <span class="subxComment"># var1->register = "eax"</span> +<span id="L17431" class="LineNr">17431 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17432" class="LineNr">17432 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L17433" class="LineNr">17433 </span><span class="Constant">$test-add-mem-to-reg:initialize-var2</span>: +<span id="L17434" class="LineNr">17434 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L17435" class="LineNr">17435 </span> 68/push 0/imm32/register +<span id="L17436" class="LineNr">17436 </span> 68/push 0/imm32/register +<span id="L17437" class="LineNr">17437 </span> 68/push 8/imm32/stack-offset +<span id="L17438" class="LineNr">17438 </span> 68/push 1/imm32/block-depth +<span id="L17439" class="LineNr">17439 </span> ff 6/subop/push *(ecx+0x10) +<span id="L17440" class="LineNr">17440 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17441" class="LineNr">17441 </span> 68/push 0/imm32/name +<span id="L17442" class="LineNr">17442 </span> 68/push 0/imm32/name +<span id="L17443" class="LineNr">17443 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17444" class="LineNr">17444 </span> 89/<- %edx 4/r32/esp +<span id="L17445" class="LineNr">17445 </span><span class="Constant">$test-add-mem-to-reg:initialize-var2-name</span>: +<span id="L17446" class="LineNr">17446 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L17447" class="LineNr">17447 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17448" class="LineNr">17448 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L17449" class="LineNr">17449 </span><span class="Constant">$test-add-mem-to-reg:initialize-inouts</span>: +<span id="L17450" class="LineNr">17450 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L17451" class="LineNr">17451 </span> 68/push 0/imm32/is-deref:false +<span id="L17452" class="LineNr">17452 </span> 68/push 0/imm32/next +<span id="L17453" class="LineNr">17453 </span> 68/push 0/imm32/next +<span id="L17454" class="LineNr">17454 </span> 52/push-edx/var2 +<span id="L17455" class="LineNr">17455 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17456" class="LineNr">17456 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17457" class="LineNr">17457 </span> 89/<- %esi 4/r32/esp +<span id="L17458" class="LineNr">17458 </span><span class="Constant">$test-add-mem-to-reg:initialize-outputs</span>: +<span id="L17459" class="LineNr">17459 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [var1]</span> +<span id="L17460" class="LineNr">17460 </span> 68/push 0/imm32/is-deref:false +<span id="L17461" class="LineNr">17461 </span> 68/push 0/imm32/next +<span id="L17462" class="LineNr">17462 </span> 68/push 0/imm32/next +<span id="L17463" class="LineNr">17463 </span> 51/push-ecx/var1 +<span id="L17464" class="LineNr">17464 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17465" class="LineNr">17465 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17466" class="LineNr">17466 </span> 89/<- %edi 4/r32/esp +<span id="L17467" class="LineNr">17467 </span><span class="Constant">$test-add-mem-to-reg:initialize-stmt</span>: +<span id="L17468" class="LineNr">17468 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17469" class="LineNr">17469 </span> 68/push 0/imm32/next +<span id="L17470" class="LineNr">17470 </span> 68/push 0/imm32/next +<span id="L17471" class="LineNr">17471 </span> 57/push-edi/outputs +<span id="L17472" class="LineNr">17472 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17473" class="LineNr">17473 </span> 56/push-esi/inouts +<span id="L17474" class="LineNr">17474 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17475" class="LineNr">17475 </span> 68/push 0/imm32/operation +<span id="L17476" class="LineNr">17476 </span> 68/push 0/imm32/operation +<span id="L17477" class="LineNr">17477 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17478" class="LineNr">17478 </span> 89/<- %esi 4/r32/esp +<span id="L17479" class="LineNr">17479 </span><span class="Constant">$test-add-mem-to-reg:initialize-stmt-operation</span>: +<span id="L17480" class="LineNr">17480 </span> <span class="subxComment"># stmt->operation = "add"</span> +<span id="L17481" class="LineNr">17481 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17482" class="LineNr">17482 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) +<span id="L17483" class="LineNr">17483 </span> <span class="subxComment"># convert</span> +<span id="L17484" class="LineNr">17484 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17485" class="LineNr">17485 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17486" class="LineNr">17486 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17487" class="Folded">17487 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17493" class="LineNr">17493 </span> <span class="subxComment"># check output</span> +<span id="L17494" class="LineNr">17494 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"03/add *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-add-mem-to-reg"</span>) +<span id="L17495" class="LineNr">17495 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17496" class="LineNr">17496 </span> 89/<- %esp 5/r32/ebp +<span id="L17497" class="LineNr">17497 </span> 5d/pop-to-ebp +<span id="L17498" class="LineNr">17498 </span> c3/return +<span id="L17499" class="LineNr">17499 </span> +<span id="L17500" class="LineNr">17500 </span><span class="subxTest">test-add-literal-to-eax</span>: +<span id="L17501" class="LineNr">17501 </span> <span class="subxComment"># var1/eax <- add 0x34</span> +<span id="L17502" class="LineNr">17502 </span> <span class="subxComment"># =></span> +<span id="L17503" class="LineNr">17503 </span> <span class="subxComment"># 05/add-to-eax 0x34/imm32</span> +<span id="L17504" class="LineNr">17504 </span> <span class="subxComment">#</span> +<span id="L17505" class="LineNr">17505 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17506" class="LineNr">17506 </span> 55/push-ebp +<span id="L17507" class="LineNr">17507 </span> 89/<- %ebp 4/r32/esp +<span id="L17508" class="LineNr">17508 </span> <span class="subxComment"># setup</span> +<span id="L17509" class="LineNr">17509 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17510" class="LineNr">17510 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17511" class="LineNr">17511 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-type</span>: +<span id="L17512" class="LineNr">17512 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> <span id="L17513" class="LineNr">17513 </span> 68/push 0/imm32/right:null -<span id="L17514" class="LineNr">17514 </span> 68/push 0/imm32/left:unused -<span id="L17515" class="LineNr">17515 </span> 68/push 0/imm32/value:literal -<span id="L17516" class="LineNr">17516 </span> 68/push 1/imm32/is-atom?:true -<span id="L17517" class="LineNr">17517 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17518" class="LineNr">17518 </span> 89/<- %edx 4/r32/esp -<span id="L17519" class="LineNr">17519 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal</span>: -<span id="L17520" class="LineNr">17520 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L17521" class="LineNr">17521 </span> 68/push 0/imm32/register +<span id="L17514" class="LineNr">17514 </span> 68/push 0/imm32/right:null +<span id="L17515" class="LineNr">17515 </span> 68/push 0/imm32/left:unused +<span id="L17516" class="LineNr">17516 </span> 68/push 1/imm32/value:int +<span id="L17517" class="LineNr">17517 </span> 68/push 1/imm32/is-atom?:true +<span id="L17518" class="LineNr">17518 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17519" class="LineNr">17519 </span> 89/<- %ecx 4/r32/esp +<span id="L17520" class="LineNr">17520 </span><span class="Constant">$test-add-literal-to-eax:initialize-var</span>: +<span id="L17521" class="LineNr">17521 </span> <span class="subxComment"># var v/ecx: (payload var)</span> <span id="L17522" class="LineNr">17522 </span> 68/push 0/imm32/register -<span id="L17523" class="LineNr">17523 </span> 68/push 0/imm32/no-stack-offset -<span id="L17524" class="LineNr">17524 </span> 68/push 1/imm32/block-depth -<span id="L17525" class="LineNr">17525 </span> 52/push-edx -<span id="L17526" class="LineNr">17526 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17527" class="LineNr">17527 </span> 68/push 0/imm32/name +<span id="L17523" class="LineNr">17523 </span> 68/push 0/imm32/register +<span id="L17524" class="LineNr">17524 </span> 68/push 0/imm32/no-stack-offset +<span id="L17525" class="LineNr">17525 </span> 68/push 1/imm32/block-depth +<span id="L17526" class="LineNr">17526 </span> 51/push-ecx +<span id="L17527" class="LineNr">17527 </span> 68/push 0x11/imm32/alloc-id:fake <span id="L17528" class="LineNr">17528 </span> 68/push 0/imm32/name -<span id="L17529" class="LineNr">17529 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17530" class="LineNr">17530 </span> 89/<- %edx 4/r32/esp -<span id="L17531" class="LineNr">17531 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal-value</span>: -<span id="L17532" class="LineNr">17532 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L17533" class="LineNr">17533 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17534" class="LineNr">17534 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L17535" class="LineNr">17535 </span><span class="Constant">$test-add-literal-to-eax:initialize-inouts</span>: -<span id="L17536" class="LineNr">17536 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L17537" class="LineNr">17537 </span> 68/push 0/imm32/is-deref:false -<span id="L17538" class="LineNr">17538 </span> 68/push 0/imm32/next -<span id="L17539" class="LineNr">17539 </span> 68/push 0/imm32/next -<span id="L17540" class="LineNr">17540 </span> 52/push-edx/l -<span id="L17541" class="LineNr">17541 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17542" class="LineNr">17542 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17543" class="LineNr">17543 </span> 89/<- %esi 4/r32/esp -<span id="L17544" class="LineNr">17544 </span><span class="Constant">$test-add-literal-to-eax:initialize-outputs</span>: -<span id="L17545" class="LineNr">17545 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [v]</span> -<span id="L17546" class="LineNr">17546 </span> 68/push 0/imm32/is-deref:false -<span id="L17547" class="LineNr">17547 </span> 68/push 0/imm32/next -<span id="L17548" class="LineNr">17548 </span> 68/push 0/imm32/next -<span id="L17549" class="LineNr">17549 </span> 51/push-ecx/v -<span id="L17550" class="LineNr">17550 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17551" class="LineNr">17551 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17552" class="LineNr">17552 </span> 89/<- %edi 4/r32/esp -<span id="L17553" class="LineNr">17553 </span><span class="Constant">$test-add-literal-to-eax:initialize-stmt</span>: -<span id="L17554" class="LineNr">17554 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17555" class="LineNr">17555 </span> 68/push 0/imm32/next -<span id="L17556" class="LineNr">17556 </span> 68/push 0/imm32/next -<span id="L17557" class="LineNr">17557 </span> 57/push-edi/outputs -<span id="L17558" class="LineNr">17558 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17559" class="LineNr">17559 </span> 56/push-esi/inouts -<span id="L17560" class="LineNr">17560 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17561" class="LineNr">17561 </span> 68/push 0/imm32/operation -<span id="L17562" class="LineNr">17562 </span> 68/push 0/imm32/operation -<span id="L17563" class="LineNr">17563 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17564" class="LineNr">17564 </span> 89/<- %esi 4/r32/esp -<span id="L17565" class="LineNr">17565 </span><span class="Constant">$test-add-literal-to-eax:initialize-stmt-operation</span>: -<span id="L17566" class="LineNr">17566 </span> <span class="subxComment"># stmt->operation = "add"</span> -<span id="L17567" class="LineNr">17567 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17568" class="LineNr">17568 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) -<span id="L17569" class="LineNr">17569 </span> <span class="subxComment"># convert</span> -<span id="L17570" class="LineNr">17570 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17571" class="LineNr">17571 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17572" class="LineNr">17572 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17573" class="Folded">17573 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17579" class="LineNr">17579 </span> <span class="subxComment"># check output</span> -<span id="L17580" class="LineNr">17580 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"05/add-to-eax 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-eax"</span>) -<span id="L17581" class="LineNr">17581 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17582" class="LineNr">17582 </span> 89/<- %esp 5/r32/ebp -<span id="L17583" class="LineNr">17583 </span> 5d/pop-to-ebp -<span id="L17584" class="LineNr">17584 </span> c3/return -<span id="L17585" class="LineNr">17585 </span> -<span id="L17586" class="LineNr">17586 </span><span class="subxTest">test-add-literal-to-reg</span>: -<span id="L17587" class="LineNr">17587 </span> <span class="subxComment"># var1/ecx <- add 0x34</span> -<span id="L17588" class="LineNr">17588 </span> <span class="subxComment"># =></span> -<span id="L17589" class="LineNr">17589 </span> <span class="subxComment"># 81 0/subop/add %ecx 0x34/imm32</span> -<span id="L17590" class="LineNr">17590 </span> <span class="subxComment">#</span> -<span id="L17591" class="LineNr">17591 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17592" class="LineNr">17592 </span> 55/push-ebp -<span id="L17593" class="LineNr">17593 </span> 89/<- %ebp 4/r32/esp -<span id="L17594" class="LineNr">17594 </span> <span class="subxComment"># setup</span> -<span id="L17595" class="LineNr">17595 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17596" class="LineNr">17596 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17597" class="LineNr">17597 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-type</span>: -<span id="L17598" class="LineNr">17598 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17599" class="LineNr">17599 </span> 68/push 0/imm32/right:null -<span id="L17600" class="LineNr">17600 </span> 68/push 0/imm32/right:null -<span id="L17601" class="LineNr">17601 </span> 68/push 0/imm32/left:unused -<span id="L17602" class="LineNr">17602 </span> 68/push 1/imm32/value:int -<span id="L17603" class="LineNr">17603 </span> 68/push 1/imm32/is-atom?:true -<span id="L17604" class="LineNr">17604 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17605" class="LineNr">17605 </span> 89/<- %ecx 4/r32/esp -<span id="L17606" class="LineNr">17606 </span><span class="Constant">$test-add-literal-to-reg:initialize-var</span>: -<span id="L17607" class="LineNr">17607 </span> <span class="subxComment"># var v/ecx: (payload var)</span> -<span id="L17608" class="LineNr">17608 </span> 68/push 0/imm32/register -<span id="L17609" class="LineNr">17609 </span> 68/push 0/imm32/register -<span id="L17610" class="LineNr">17610 </span> 68/push 0/imm32/no-stack-offset -<span id="L17611" class="LineNr">17611 </span> 68/push 1/imm32/block-depth -<span id="L17612" class="LineNr">17612 </span> 51/push-ecx -<span id="L17613" class="LineNr">17613 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17614" class="LineNr">17614 </span> 68/push 0/imm32/name -<span id="L17615" class="LineNr">17615 </span> 68/push 0/imm32/name -<span id="L17616" class="LineNr">17616 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17617" class="LineNr">17617 </span> 89/<- %ecx 4/r32/esp -<span id="L17618" class="LineNr">17618 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-name</span>: -<span id="L17619" class="LineNr">17619 </span> <span class="subxComment"># v->name = "v"</span> -<span id="L17620" class="LineNr">17620 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17621" class="LineNr">17621 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"v"</span> %eax) -<span id="L17622" class="LineNr">17622 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-register</span>: -<span id="L17623" class="LineNr">17623 </span> <span class="subxComment"># v->register = "ecx"</span> -<span id="L17624" class="LineNr">17624 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17625" class="LineNr">17625 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) -<span id="L17626" class="LineNr">17626 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal-type</span>: -<span id="L17627" class="LineNr">17627 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L17628" class="LineNr">17628 </span> 68/push 0/imm32/right:null +<span id="L17529" class="LineNr">17529 </span> 68/push 0/imm32/name +<span id="L17530" class="LineNr">17530 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17531" class="LineNr">17531 </span> 89/<- %ecx 4/r32/esp +<span id="L17532" class="LineNr">17532 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-name</span>: +<span id="L17533" class="LineNr">17533 </span> <span class="subxComment"># v->name = "v"</span> +<span id="L17534" class="LineNr">17534 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17535" class="LineNr">17535 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"v"</span> %eax) +<span id="L17536" class="LineNr">17536 </span><span class="Constant">$test-add-literal-to-eax:initialize-var-register</span>: +<span id="L17537" class="LineNr">17537 </span> <span class="subxComment"># v->register = "eax"</span> +<span id="L17538" class="LineNr">17538 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17539" class="LineNr">17539 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L17540" class="LineNr">17540 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal-type</span>: +<span id="L17541" class="LineNr">17541 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L17542" class="LineNr">17542 </span> 68/push 0/imm32/right:null +<span id="L17543" class="LineNr">17543 </span> 68/push 0/imm32/right:null +<span id="L17544" class="LineNr">17544 </span> 68/push 0/imm32/left:unused +<span id="L17545" class="LineNr">17545 </span> 68/push 0/imm32/value:literal +<span id="L17546" class="LineNr">17546 </span> 68/push 1/imm32/is-atom?:true +<span id="L17547" class="LineNr">17547 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17548" class="LineNr">17548 </span> 89/<- %edx 4/r32/esp +<span id="L17549" class="LineNr">17549 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal</span>: +<span id="L17550" class="LineNr">17550 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L17551" class="LineNr">17551 </span> 68/push 0/imm32/register +<span id="L17552" class="LineNr">17552 </span> 68/push 0/imm32/register +<span id="L17553" class="LineNr">17553 </span> 68/push 0/imm32/no-stack-offset +<span id="L17554" class="LineNr">17554 </span> 68/push 1/imm32/block-depth +<span id="L17555" class="LineNr">17555 </span> 52/push-edx +<span id="L17556" class="LineNr">17556 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17557" class="LineNr">17557 </span> 68/push 0/imm32/name +<span id="L17558" class="LineNr">17558 </span> 68/push 0/imm32/name +<span id="L17559" class="LineNr">17559 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17560" class="LineNr">17560 </span> 89/<- %edx 4/r32/esp +<span id="L17561" class="LineNr">17561 </span><span class="Constant">$test-add-literal-to-eax:initialize-literal-value</span>: +<span id="L17562" class="LineNr">17562 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L17563" class="LineNr">17563 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17564" class="LineNr">17564 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L17565" class="LineNr">17565 </span><span class="Constant">$test-add-literal-to-eax:initialize-inouts</span>: +<span id="L17566" class="LineNr">17566 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L17567" class="LineNr">17567 </span> 68/push 0/imm32/is-deref:false +<span id="L17568" class="LineNr">17568 </span> 68/push 0/imm32/next +<span id="L17569" class="LineNr">17569 </span> 68/push 0/imm32/next +<span id="L17570" class="LineNr">17570 </span> 52/push-edx/l +<span id="L17571" class="LineNr">17571 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17572" class="LineNr">17572 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17573" class="LineNr">17573 </span> 89/<- %esi 4/r32/esp +<span id="L17574" class="LineNr">17574 </span><span class="Constant">$test-add-literal-to-eax:initialize-outputs</span>: +<span id="L17575" class="LineNr">17575 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [v]</span> +<span id="L17576" class="LineNr">17576 </span> 68/push 0/imm32/is-deref:false +<span id="L17577" class="LineNr">17577 </span> 68/push 0/imm32/next +<span id="L17578" class="LineNr">17578 </span> 68/push 0/imm32/next +<span id="L17579" class="LineNr">17579 </span> 51/push-ecx/v +<span id="L17580" class="LineNr">17580 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17581" class="LineNr">17581 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17582" class="LineNr">17582 </span> 89/<- %edi 4/r32/esp +<span id="L17583" class="LineNr">17583 </span><span class="Constant">$test-add-literal-to-eax:initialize-stmt</span>: +<span id="L17584" class="LineNr">17584 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17585" class="LineNr">17585 </span> 68/push 0/imm32/next +<span id="L17586" class="LineNr">17586 </span> 68/push 0/imm32/next +<span id="L17587" class="LineNr">17587 </span> 57/push-edi/outputs +<span id="L17588" class="LineNr">17588 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17589" class="LineNr">17589 </span> 56/push-esi/inouts +<span id="L17590" class="LineNr">17590 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17591" class="LineNr">17591 </span> 68/push 0/imm32/operation +<span id="L17592" class="LineNr">17592 </span> 68/push 0/imm32/operation +<span id="L17593" class="LineNr">17593 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17594" class="LineNr">17594 </span> 89/<- %esi 4/r32/esp +<span id="L17595" class="LineNr">17595 </span><span class="Constant">$test-add-literal-to-eax:initialize-stmt-operation</span>: +<span id="L17596" class="LineNr">17596 </span> <span class="subxComment"># stmt->operation = "add"</span> +<span id="L17597" class="LineNr">17597 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17598" class="LineNr">17598 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) +<span id="L17599" class="LineNr">17599 </span> <span class="subxComment"># convert</span> +<span id="L17600" class="LineNr">17600 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17601" class="LineNr">17601 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17602" class="LineNr">17602 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17603" class="Folded">17603 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17609" class="LineNr">17609 </span> <span class="subxComment"># check output</span> +<span id="L17610" class="LineNr">17610 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"05/add-to-eax 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-eax"</span>) +<span id="L17611" class="LineNr">17611 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17612" class="LineNr">17612 </span> 89/<- %esp 5/r32/ebp +<span id="L17613" class="LineNr">17613 </span> 5d/pop-to-ebp +<span id="L17614" class="LineNr">17614 </span> c3/return +<span id="L17615" class="LineNr">17615 </span> +<span id="L17616" class="LineNr">17616 </span><span class="subxTest">test-add-literal-to-reg</span>: +<span id="L17617" class="LineNr">17617 </span> <span class="subxComment"># var1/ecx <- add 0x34</span> +<span id="L17618" class="LineNr">17618 </span> <span class="subxComment"># =></span> +<span id="L17619" class="LineNr">17619 </span> <span class="subxComment"># 81 0/subop/add %ecx 0x34/imm32</span> +<span id="L17620" class="LineNr">17620 </span> <span class="subxComment">#</span> +<span id="L17621" class="LineNr">17621 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17622" class="LineNr">17622 </span> 55/push-ebp +<span id="L17623" class="LineNr">17623 </span> 89/<- %ebp 4/r32/esp +<span id="L17624" class="LineNr">17624 </span> <span class="subxComment"># setup</span> +<span id="L17625" class="LineNr">17625 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17626" class="LineNr">17626 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17627" class="LineNr">17627 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-type</span>: +<span id="L17628" class="LineNr">17628 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> <span id="L17629" class="LineNr">17629 </span> 68/push 0/imm32/right:null -<span id="L17630" class="LineNr">17630 </span> 68/push 0/imm32/left:unused -<span id="L17631" class="LineNr">17631 </span> 68/push 0/imm32/value:literal -<span id="L17632" class="LineNr">17632 </span> 68/push 1/imm32/is-atom?:true -<span id="L17633" class="LineNr">17633 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17634" class="LineNr">17634 </span> 89/<- %edx 4/r32/esp -<span id="L17635" class="LineNr">17635 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal</span>: -<span id="L17636" class="LineNr">17636 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L17637" class="LineNr">17637 </span> 68/push 0/imm32/register +<span id="L17630" class="LineNr">17630 </span> 68/push 0/imm32/right:null +<span id="L17631" class="LineNr">17631 </span> 68/push 0/imm32/left:unused +<span id="L17632" class="LineNr">17632 </span> 68/push 1/imm32/value:int +<span id="L17633" class="LineNr">17633 </span> 68/push 1/imm32/is-atom?:true +<span id="L17634" class="LineNr">17634 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17635" class="LineNr">17635 </span> 89/<- %ecx 4/r32/esp +<span id="L17636" class="LineNr">17636 </span><span class="Constant">$test-add-literal-to-reg:initialize-var</span>: +<span id="L17637" class="LineNr">17637 </span> <span class="subxComment"># var v/ecx: (payload var)</span> <span id="L17638" class="LineNr">17638 </span> 68/push 0/imm32/register -<span id="L17639" class="LineNr">17639 </span> 68/push 0/imm32/no-stack-offset -<span id="L17640" class="LineNr">17640 </span> 68/push 1/imm32/block-depth -<span id="L17641" class="LineNr">17641 </span> 52/push-edx -<span id="L17642" class="LineNr">17642 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17643" class="LineNr">17643 </span> 68/push 0/imm32/name +<span id="L17639" class="LineNr">17639 </span> 68/push 0/imm32/register +<span id="L17640" class="LineNr">17640 </span> 68/push 0/imm32/no-stack-offset +<span id="L17641" class="LineNr">17641 </span> 68/push 1/imm32/block-depth +<span id="L17642" class="LineNr">17642 </span> 51/push-ecx +<span id="L17643" class="LineNr">17643 </span> 68/push 0x11/imm32/alloc-id:fake <span id="L17644" class="LineNr">17644 </span> 68/push 0/imm32/name -<span id="L17645" class="LineNr">17645 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17646" class="LineNr">17646 </span> 89/<- %edx 4/r32/esp -<span id="L17647" class="LineNr">17647 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal-value</span>: -<span id="L17648" class="LineNr">17648 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L17649" class="LineNr">17649 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17650" class="LineNr">17650 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L17651" class="LineNr">17651 </span><span class="Constant">$test-add-literal-to-reg:initialize-inouts</span>: -<span id="L17652" class="LineNr">17652 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L17653" class="LineNr">17653 </span> 68/push 0/imm32/is-deref:false -<span id="L17654" class="LineNr">17654 </span> 68/push 0/imm32/next -<span id="L17655" class="LineNr">17655 </span> 68/push 0/imm32/next -<span id="L17656" class="LineNr">17656 </span> 52/push-edx/l -<span id="L17657" class="LineNr">17657 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17658" class="LineNr">17658 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17659" class="LineNr">17659 </span> 89/<- %esi 4/r32/esp -<span id="L17660" class="LineNr">17660 </span><span class="Constant">$test-add-literal-to-reg:initialize-outputs</span>: -<span id="L17661" class="LineNr">17661 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [v]</span> -<span id="L17662" class="LineNr">17662 </span> 68/push 0/imm32/is-deref:false -<span id="L17663" class="LineNr">17663 </span> 68/push 0/imm32/next -<span id="L17664" class="LineNr">17664 </span> 68/push 0/imm32/next -<span id="L17665" class="LineNr">17665 </span> 51/push-ecx/v -<span id="L17666" class="LineNr">17666 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17667" class="LineNr">17667 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17668" class="LineNr">17668 </span> 89/<- %edi 4/r32/esp -<span id="L17669" class="LineNr">17669 </span><span class="Constant">$test-add-literal-to-reg:initialize-stmt</span>: -<span id="L17670" class="LineNr">17670 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17671" class="LineNr">17671 </span> 68/push 0/imm32/next -<span id="L17672" class="LineNr">17672 </span> 68/push 0/imm32/next -<span id="L17673" class="LineNr">17673 </span> 57/push-edi/outputs -<span id="L17674" class="LineNr">17674 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17675" class="LineNr">17675 </span> 56/push-esi/inouts -<span id="L17676" class="LineNr">17676 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17677" class="LineNr">17677 </span> 68/push 0/imm32/operation -<span id="L17678" class="LineNr">17678 </span> 68/push 0/imm32/operation -<span id="L17679" class="LineNr">17679 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17680" class="LineNr">17680 </span> 89/<- %esi 4/r32/esp -<span id="L17681" class="LineNr">17681 </span><span class="Constant">$test-add-literal-to-reg:initialize-stmt-operation</span>: -<span id="L17682" class="LineNr">17682 </span> <span class="subxComment"># stmt->operation = "add"</span> -<span id="L17683" class="LineNr">17683 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17684" class="LineNr">17684 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) -<span id="L17685" class="LineNr">17685 </span> <span class="subxComment"># convert</span> -<span id="L17686" class="LineNr">17686 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17687" class="LineNr">17687 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17688" class="LineNr">17688 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17689" class="Folded">17689 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17695" class="LineNr">17695 </span> <span class="subxComment"># check output</span> -<span id="L17696" class="LineNr">17696 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 0/subop/add %ecx 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-reg"</span>) -<span id="L17697" class="LineNr">17697 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17698" class="LineNr">17698 </span> 89/<- %esp 5/r32/ebp -<span id="L17699" class="LineNr">17699 </span> 5d/pop-to-ebp -<span id="L17700" class="LineNr">17700 </span> c3/return -<span id="L17701" class="LineNr">17701 </span> -<span id="L17702" class="LineNr">17702 </span><span class="subxTest">test-add-literal-to-mem</span>: -<span id="L17703" class="LineNr">17703 </span> <span class="subxComment"># add-to var1, 0x34</span> -<span id="L17704" class="LineNr">17704 </span> <span class="subxComment"># =></span> -<span id="L17705" class="LineNr">17705 </span> <span class="subxComment"># 81 0/subop/add %eax 0x34/imm32</span> -<span id="L17706" class="LineNr">17706 </span> <span class="subxComment">#</span> -<span id="L17707" class="LineNr">17707 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17708" class="LineNr">17708 </span> 55/push-ebp -<span id="L17709" class="LineNr">17709 </span> 89/<- %ebp 4/r32/esp -<span id="L17710" class="LineNr">17710 </span> <span class="subxComment"># setup</span> -<span id="L17711" class="LineNr">17711 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17712" class="LineNr">17712 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17713" class="LineNr">17713 </span><span class="Constant">$test-add-literal-to-mem:initialize-type</span>: -<span id="L17714" class="LineNr">17714 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17715" class="LineNr">17715 </span> 68/push 0/imm32/right:null -<span id="L17716" class="LineNr">17716 </span> 68/push 0/imm32/right:null -<span id="L17717" class="LineNr">17717 </span> 68/push 0/imm32/left:unused -<span id="L17718" class="LineNr">17718 </span> 68/push 1/imm32/value:int -<span id="L17719" class="LineNr">17719 </span> 68/push 1/imm32/is-atom?:true -<span id="L17720" class="LineNr">17720 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17721" class="LineNr">17721 </span> 89/<- %ecx 4/r32/esp -<span id="L17722" class="LineNr">17722 </span><span class="Constant">$test-add-literal-to-mem:initialize-var1</span>: -<span id="L17723" class="LineNr">17723 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17724" class="LineNr">17724 </span> 68/push 0/imm32/register -<span id="L17725" class="LineNr">17725 </span> 68/push 0/imm32/register -<span id="L17726" class="LineNr">17726 </span> 68/push 8/imm32/stack-offset -<span id="L17727" class="LineNr">17727 </span> 68/push 1/imm32/block-depth -<span id="L17728" class="LineNr">17728 </span> 51/push-ecx -<span id="L17729" class="LineNr">17729 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17730" class="LineNr">17730 </span> 68/push 0/imm32/name -<span id="L17731" class="LineNr">17731 </span> 68/push 0/imm32/name -<span id="L17732" class="LineNr">17732 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17733" class="LineNr">17733 </span> 89/<- %ecx 4/r32/esp -<span id="L17734" class="LineNr">17734 </span><span class="Constant">$test-add-literal-to-mem:initialize-var1-name</span>: -<span id="L17735" class="LineNr">17735 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L17736" class="LineNr">17736 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17737" class="LineNr">17737 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17738" class="LineNr">17738 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal-type</span>: -<span id="L17739" class="LineNr">17739 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L17740" class="LineNr">17740 </span> 68/push 0/imm32/right:null -<span id="L17741" class="LineNr">17741 </span> 68/push 0/imm32/right:null -<span id="L17742" class="LineNr">17742 </span> 68/push 0/imm32/left:unused -<span id="L17743" class="LineNr">17743 </span> 68/push 0/imm32/value:literal -<span id="L17744" class="LineNr">17744 </span> 68/push 1/imm32/is-atom?:true -<span id="L17745" class="LineNr">17745 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17746" class="LineNr">17746 </span> 89/<- %edx 4/r32/esp -<span id="L17747" class="LineNr">17747 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal</span>: -<span id="L17748" class="LineNr">17748 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L17749" class="LineNr">17749 </span> 68/push 0/imm32/register -<span id="L17750" class="LineNr">17750 </span> 68/push 0/imm32/register -<span id="L17751" class="LineNr">17751 </span> 68/push 0/imm32/no-stack-offset -<span id="L17752" class="LineNr">17752 </span> 68/push 1/imm32/block-depth -<span id="L17753" class="LineNr">17753 </span> 52/push-edx -<span id="L17754" class="LineNr">17754 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17755" class="LineNr">17755 </span> 68/push 0/imm32/name -<span id="L17756" class="LineNr">17756 </span> 68/push 0/imm32/name -<span id="L17757" class="LineNr">17757 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17758" class="LineNr">17758 </span> 89/<- %edx 4/r32/esp -<span id="L17759" class="LineNr">17759 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal-value</span>: -<span id="L17760" class="LineNr">17760 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L17761" class="LineNr">17761 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17762" class="LineNr">17762 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L17763" class="LineNr">17763 </span><span class="Constant">$test-add-literal-to-mem:initialize-inouts</span>: -<span id="L17764" class="LineNr">17764 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L17765" class="LineNr">17765 </span> 68/push 0/imm32/is-deref:false -<span id="L17766" class="LineNr">17766 </span> 68/push 0/imm32/next -<span id="L17767" class="LineNr">17767 </span> 68/push 0/imm32/next -<span id="L17768" class="LineNr">17768 </span> 52/push-edx/l -<span id="L17769" class="LineNr">17769 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17770" class="LineNr">17770 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17771" class="LineNr">17771 </span> 89/<- %esi 4/r32/esp -<span id="L17772" class="LineNr">17772 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> -<span id="L17773" class="LineNr">17773 </span> 68/push 0/imm32/is-deref:false -<span id="L17774" class="LineNr">17774 </span> 56/push-esi/next -<span id="L17775" class="LineNr">17775 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17776" class="LineNr">17776 </span> 51/push-ecx/var1 -<span id="L17777" class="LineNr">17777 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17778" class="LineNr">17778 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17779" class="LineNr">17779 </span> 89/<- %esi 4/r32/esp -<span id="L17780" class="LineNr">17780 </span><span class="Constant">$test-add-literal-to-mem:initialize-stmt</span>: -<span id="L17781" class="LineNr">17781 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17782" class="LineNr">17782 </span> 68/push 0/imm32/next -<span id="L17783" class="LineNr">17783 </span> 68/push 0/imm32/next -<span id="L17784" class="LineNr">17784 </span> 68/push 0/imm32/outputs -<span id="L17785" class="LineNr">17785 </span> 68/push 0/imm32/outputs -<span id="L17786" class="LineNr">17786 </span> 56/push-esi/inouts -<span id="L17787" class="LineNr">17787 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17788" class="LineNr">17788 </span> 68/push 0/imm32/operation -<span id="L17789" class="LineNr">17789 </span> 68/push 0/imm32/operation -<span id="L17790" class="LineNr">17790 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17791" class="LineNr">17791 </span> 89/<- %esi 4/r32/esp -<span id="L17792" class="LineNr">17792 </span><span class="Constant">$test-add-literal-to-mem:initialize-stmt-operation</span>: -<span id="L17793" class="LineNr">17793 </span> <span class="subxComment"># stmt->operation = "add-to"</span> -<span id="L17794" class="LineNr">17794 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17795" class="LineNr">17795 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add-to"</span> %eax) -<span id="L17796" class="LineNr">17796 </span> <span class="subxComment"># convert</span> -<span id="L17797" class="LineNr">17797 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17798" class="LineNr">17798 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17799" class="LineNr">17799 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17800" class="Folded">17800 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17806" class="LineNr">17806 </span> <span class="subxComment"># check output</span> -<span id="L17807" class="LineNr">17807 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 0/subop/add *(ebp+0x00000008) 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-mem"</span>) -<span id="L17808" class="LineNr">17808 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17809" class="LineNr">17809 </span> 89/<- %esp 5/r32/ebp -<span id="L17810" class="LineNr">17810 </span> 5d/pop-to-ebp -<span id="L17811" class="LineNr">17811 </span> c3/return -<span id="L17812" class="LineNr">17812 </span> -<span id="L17813" class="LineNr">17813 </span><span class="subxTest">test-compare-reg-with-reg</span>: -<span id="L17814" class="LineNr">17814 </span> <span class="subxComment"># compare var1/ecx, var2/eax</span> -<span id="L17815" class="LineNr">17815 </span> <span class="subxComment"># =></span> -<span id="L17816" class="LineNr">17816 </span> <span class="subxComment"># 39/compare %ecx 0/r32/eax</span> -<span id="L17817" class="LineNr">17817 </span> <span class="subxComment">#</span> -<span id="L17818" class="LineNr">17818 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17819" class="LineNr">17819 </span> 55/push-ebp -<span id="L17820" class="LineNr">17820 </span> 89/<- %ebp 4/r32/esp -<span id="L17821" class="LineNr">17821 </span> <span class="subxComment"># setup</span> -<span id="L17822" class="LineNr">17822 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17823" class="LineNr">17823 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17824" class="LineNr">17824 </span><span class="Constant">$test-compare-reg-with-reg:initialize-type</span>: -<span id="L17825" class="LineNr">17825 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17826" class="LineNr">17826 </span> 68/push 0/imm32/right:null -<span id="L17827" class="LineNr">17827 </span> 68/push 0/imm32/right:null -<span id="L17828" class="LineNr">17828 </span> 68/push 0/imm32/left:unused -<span id="L17829" class="LineNr">17829 </span> 68/push 1/imm32/value:int -<span id="L17830" class="LineNr">17830 </span> 68/push 1/imm32/is-atom?:true -<span id="L17831" class="LineNr">17831 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17832" class="LineNr">17832 </span> 89/<- %ecx 4/r32/esp -<span id="L17833" class="LineNr">17833 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1</span>: -<span id="L17834" class="LineNr">17834 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17835" class="LineNr">17835 </span> 68/push 0/imm32/register -<span id="L17836" class="LineNr">17836 </span> 68/push 0/imm32/register -<span id="L17837" class="LineNr">17837 </span> 68/push 0/imm32/no-stack-offset -<span id="L17838" class="LineNr">17838 </span> 68/push 1/imm32/block-depth -<span id="L17839" class="LineNr">17839 </span> 51/push-ecx -<span id="L17840" class="LineNr">17840 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17841" class="LineNr">17841 </span> 68/push 0/imm32/name -<span id="L17842" class="LineNr">17842 </span> 68/push 0/imm32/name -<span id="L17843" class="LineNr">17843 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17844" class="LineNr">17844 </span> 89/<- %ecx 4/r32/esp -<span id="L17845" class="LineNr">17845 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1-name</span>: -<span id="L17846" class="LineNr">17846 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L17847" class="LineNr">17847 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17848" class="LineNr">17848 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17849" class="LineNr">17849 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1-register</span>: -<span id="L17850" class="LineNr">17850 </span> <span class="subxComment"># var1->register = "ecx"</span> -<span id="L17851" class="LineNr">17851 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17852" class="LineNr">17852 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) -<span id="L17853" class="LineNr">17853 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2</span>: -<span id="L17854" class="LineNr">17854 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L17855" class="LineNr">17855 </span> 68/push 0/imm32/register -<span id="L17856" class="LineNr">17856 </span> 68/push 0/imm32/register -<span id="L17857" class="LineNr">17857 </span> 68/push 0/imm32/no-stack-offset -<span id="L17858" class="LineNr">17858 </span> 68/push 1/imm32/block-depth -<span id="L17859" class="LineNr">17859 </span> ff 6/subop/push *(ecx+0x10) -<span id="L17860" class="LineNr">17860 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17861" class="LineNr">17861 </span> 68/push 0/imm32/name -<span id="L17862" class="LineNr">17862 </span> 68/push 0/imm32/name -<span id="L17863" class="LineNr">17863 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17864" class="LineNr">17864 </span> 89/<- %edx 4/r32/esp -<span id="L17865" class="LineNr">17865 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2-name</span>: -<span id="L17866" class="LineNr">17866 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L17867" class="LineNr">17867 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17868" class="LineNr">17868 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L17869" class="LineNr">17869 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2-register</span>: -<span id="L17870" class="LineNr">17870 </span> <span class="subxComment"># var2->register = "eax"</span> -<span id="L17871" class="LineNr">17871 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17872" class="LineNr">17872 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17873" class="LineNr">17873 </span><span class="Constant">$test-compare-reg-with-reg:initialize-inouts</span>: -<span id="L17874" class="LineNr">17874 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L17875" class="LineNr">17875 </span> 68/push 0/imm32/is-deref:false -<span id="L17876" class="LineNr">17876 </span> 68/push 0/imm32/next -<span id="L17877" class="LineNr">17877 </span> 68/push 0/imm32/next -<span id="L17878" class="LineNr">17878 </span> 52/push-edx/var2 -<span id="L17879" class="LineNr">17879 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17880" class="LineNr">17880 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17881" class="LineNr">17881 </span> 89/<- %esi 4/r32/esp -<span id="L17882" class="LineNr">17882 </span> <span class="subxComment"># inouts = [var1, var2]</span> -<span id="L17883" class="LineNr">17883 </span> 68/push 0/imm32/is-deref:false -<span id="L17884" class="LineNr">17884 </span> 56/push-esi/next -<span id="L17885" class="LineNr">17885 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17886" class="LineNr">17886 </span> 51/push-ecx/var1 -<span id="L17887" class="LineNr">17887 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17888" class="LineNr">17888 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17889" class="LineNr">17889 </span> 89/<- %esi 4/r32/esp -<span id="L17890" class="LineNr">17890 </span><span class="Constant">$test-compare-reg-with-reg:initialize-stmt</span>: -<span id="L17891" class="LineNr">17891 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17892" class="LineNr">17892 </span> 68/push 0/imm32/next -<span id="L17893" class="LineNr">17893 </span> 68/push 0/imm32/next -<span id="L17894" class="LineNr">17894 </span> 68/push 0/imm32/outputs -<span id="L17895" class="LineNr">17895 </span> 68/push 0/imm32/outputs -<span id="L17896" class="LineNr">17896 </span> 56/push-esi/inouts -<span id="L17897" class="LineNr">17897 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17898" class="LineNr">17898 </span> 68/push 0/imm32/operation -<span id="L17899" class="LineNr">17899 </span> 68/push 0/imm32/operation -<span id="L17900" class="LineNr">17900 </span> 68/push 1/imm32/tag:stmt1 -<span id="L17901" class="LineNr">17901 </span> 89/<- %esi 4/r32/esp -<span id="L17902" class="LineNr">17902 </span><span class="Constant">$test-compare-reg-with-reg:initialize-stmt-operation</span>: -<span id="L17903" class="LineNr">17903 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L17904" class="LineNr">17904 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L17905" class="LineNr">17905 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L17906" class="LineNr">17906 </span> <span class="subxComment"># convert</span> -<span id="L17907" class="LineNr">17907 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L17908" class="LineNr">17908 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L17909" class="LineNr">17909 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L17910" class="Folded">17910 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L17916" class="LineNr">17916 </span> <span class="subxComment"># check output</span> -<span id="L17917" class="LineNr">17917 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"39/compare-> %ecx 0x00000000/r32"</span> <span class="Constant">"F - test-compare-reg-with-reg"</span>) -<span id="L17918" class="LineNr">17918 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L17919" class="LineNr">17919 </span> 89/<- %esp 5/r32/ebp -<span id="L17920" class="LineNr">17920 </span> 5d/pop-to-ebp -<span id="L17921" class="LineNr">17921 </span> c3/return -<span id="L17922" class="LineNr">17922 </span> -<span id="L17923" class="LineNr">17923 </span><span class="subxTest">test-compare-mem-with-reg</span>: -<span id="L17924" class="LineNr">17924 </span> <span class="subxComment"># compare var1, var2/eax</span> -<span id="L17925" class="LineNr">17925 </span> <span class="subxComment"># =></span> -<span id="L17926" class="LineNr">17926 </span> <span class="subxComment"># 39/compare *(ebp+___) 0/r32/eax</span> -<span id="L17927" class="LineNr">17927 </span> <span class="subxComment">#</span> -<span id="L17928" class="LineNr">17928 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L17929" class="LineNr">17929 </span> 55/push-ebp -<span id="L17930" class="LineNr">17930 </span> 89/<- %ebp 4/r32/esp -<span id="L17931" class="LineNr">17931 </span> <span class="subxComment"># setup</span> -<span id="L17932" class="LineNr">17932 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L17933" class="LineNr">17933 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L17934" class="LineNr">17934 </span><span class="Constant">$test-compare-mem-with-reg:initialize-type</span>: -<span id="L17935" class="LineNr">17935 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L17936" class="LineNr">17936 </span> 68/push 0/imm32/right:null -<span id="L17937" class="LineNr">17937 </span> 68/push 0/imm32/right:null -<span id="L17938" class="LineNr">17938 </span> 68/push 0/imm32/left:unused -<span id="L17939" class="LineNr">17939 </span> 68/push 1/imm32/value:int -<span id="L17940" class="LineNr">17940 </span> 68/push 1/imm32/is-atom?:true -<span id="L17941" class="LineNr">17941 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17942" class="LineNr">17942 </span> 89/<- %ecx 4/r32/esp -<span id="L17943" class="LineNr">17943 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var1</span>: -<span id="L17944" class="LineNr">17944 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L17945" class="LineNr">17945 </span> 68/push 0/imm32/register -<span id="L17946" class="LineNr">17946 </span> 68/push 0/imm32/register -<span id="L17947" class="LineNr">17947 </span> 68/push 8/imm32/stack-offset -<span id="L17948" class="LineNr">17948 </span> 68/push 1/imm32/block-depth -<span id="L17949" class="LineNr">17949 </span> 51/push-ecx -<span id="L17950" class="LineNr">17950 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17951" class="LineNr">17951 </span> 68/push 0/imm32/name -<span id="L17952" class="LineNr">17952 </span> 68/push 0/imm32/name -<span id="L17953" class="LineNr">17953 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17954" class="LineNr">17954 </span> 89/<- %ecx 4/r32/esp -<span id="L17955" class="LineNr">17955 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var1-name</span>: -<span id="L17956" class="LineNr">17956 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L17957" class="LineNr">17957 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17958" class="LineNr">17958 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L17959" class="LineNr">17959 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2</span>: -<span id="L17960" class="LineNr">17960 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L17961" class="LineNr">17961 </span> 68/push 0/imm32/register -<span id="L17962" class="LineNr">17962 </span> 68/push 0/imm32/register -<span id="L17963" class="LineNr">17963 </span> 68/push 0/imm32/no-stack-offset -<span id="L17964" class="LineNr">17964 </span> 68/push 1/imm32/block-depth -<span id="L17965" class="LineNr">17965 </span> ff 6/subop/push *(ecx+0x10) -<span id="L17966" class="LineNr">17966 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17967" class="LineNr">17967 </span> 68/push 0/imm32/name -<span id="L17968" class="LineNr">17968 </span> 68/push 0/imm32/name -<span id="L17969" class="LineNr">17969 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17970" class="LineNr">17970 </span> 89/<- %edx 4/r32/esp -<span id="L17971" class="LineNr">17971 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2-name</span>: -<span id="L17972" class="LineNr">17972 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L17973" class="LineNr">17973 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L17974" class="LineNr">17974 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L17975" class="LineNr">17975 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2-register</span>: -<span id="L17976" class="LineNr">17976 </span> <span class="subxComment"># var2->register = "eax"</span> -<span id="L17977" class="LineNr">17977 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L17978" class="LineNr">17978 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L17979" class="LineNr">17979 </span><span class="Constant">$test-compare-mem-with-reg:initialize-inouts</span>: -<span id="L17980" class="LineNr">17980 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L17981" class="LineNr">17981 </span> 68/push 0/imm32/is-deref:false -<span id="L17982" class="LineNr">17982 </span> 68/push 0/imm32/next -<span id="L17983" class="LineNr">17983 </span> 68/push 0/imm32/next -<span id="L17984" class="LineNr">17984 </span> 52/push-edx/var2 -<span id="L17985" class="LineNr">17985 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17986" class="LineNr">17986 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17987" class="LineNr">17987 </span> 89/<- %esi 4/r32/esp -<span id="L17988" class="LineNr">17988 </span> <span class="subxComment"># inouts = [var1, var2]</span> -<span id="L17989" class="LineNr">17989 </span> 68/push 0/imm32/is-deref:false -<span id="L17990" class="LineNr">17990 </span> 56/push-esi/next -<span id="L17991" class="LineNr">17991 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17992" class="LineNr">17992 </span> 51/push-ecx/var1 -<span id="L17993" class="LineNr">17993 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L17994" class="LineNr">17994 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L17995" class="LineNr">17995 </span> 89/<- %esi 4/r32/esp -<span id="L17996" class="LineNr">17996 </span><span class="Constant">$test-compare-mem-with-reg:initialize-stmt</span>: -<span id="L17997" class="LineNr">17997 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L17998" class="LineNr">17998 </span> 68/push 0/imm32/next -<span id="L17999" class="LineNr">17999 </span> 68/push 0/imm32/next -<span id="L18000" class="LineNr">18000 </span> 68/push 0/imm32/outputs -<span id="L18001" class="LineNr">18001 </span> 68/push 0/imm32/outputs -<span id="L18002" class="LineNr">18002 </span> 56/push-esi/inouts -<span id="L18003" class="LineNr">18003 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18004" class="LineNr">18004 </span> 68/push 0/imm32/operation -<span id="L18005" class="LineNr">18005 </span> 68/push 0/imm32/operation -<span id="L18006" class="LineNr">18006 </span> 68/push 1/imm32/tag:stmt1 -<span id="L18007" class="LineNr">18007 </span> 89/<- %esi 4/r32/esp -<span id="L18008" class="LineNr">18008 </span><span class="Constant">$test-compare-mem-with-reg:initialize-stmt-operation</span>: -<span id="L18009" class="LineNr">18009 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L18010" class="LineNr">18010 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18011" class="LineNr">18011 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L18012" class="LineNr">18012 </span> <span class="subxComment"># convert</span> -<span id="L18013" class="LineNr">18013 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18014" class="LineNr">18014 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18015" class="LineNr">18015 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18016" class="Folded">18016 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18022" class="LineNr">18022 </span> <span class="subxComment"># check output</span> -<span id="L18023" class="LineNr">18023 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"39/compare-> *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-compare-mem-with-reg"</span>) -<span id="L18024" class="LineNr">18024 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18025" class="LineNr">18025 </span> 89/<- %esp 5/r32/ebp -<span id="L18026" class="LineNr">18026 </span> 5d/pop-to-ebp -<span id="L18027" class="LineNr">18027 </span> c3/return -<span id="L18028" class="LineNr">18028 </span> -<span id="L18029" class="LineNr">18029 </span><span class="subxTest">test-compare-reg-with-mem</span>: -<span id="L18030" class="LineNr">18030 </span> <span class="subxComment"># compare var1/eax, var2</span> -<span id="L18031" class="LineNr">18031 </span> <span class="subxComment"># =></span> -<span id="L18032" class="LineNr">18032 </span> <span class="subxComment"># 3b/compare<- *(ebp+___) 0/r32/eax</span> -<span id="L18033" class="LineNr">18033 </span> <span class="subxComment">#</span> -<span id="L18034" class="LineNr">18034 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18035" class="LineNr">18035 </span> 55/push-ebp -<span id="L18036" class="LineNr">18036 </span> 89/<- %ebp 4/r32/esp -<span id="L18037" class="LineNr">18037 </span> <span class="subxComment"># setup</span> -<span id="L18038" class="LineNr">18038 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18039" class="LineNr">18039 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18040" class="LineNr">18040 </span><span class="Constant">$test-compare-reg-with-mem:initialize-type</span>: -<span id="L18041" class="LineNr">18041 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18042" class="LineNr">18042 </span> 68/push 0/imm32/right:null -<span id="L18043" class="LineNr">18043 </span> 68/push 0/imm32/right:null -<span id="L18044" class="LineNr">18044 </span> 68/push 0/imm32/left:unused -<span id="L18045" class="LineNr">18045 </span> 68/push 1/imm32/value:int -<span id="L18046" class="LineNr">18046 </span> 68/push 1/imm32/is-atom?:true -<span id="L18047" class="LineNr">18047 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18048" class="LineNr">18048 </span> 89/<- %ecx 4/r32/esp -<span id="L18049" class="LineNr">18049 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1</span>: -<span id="L18050" class="LineNr">18050 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L18051" class="LineNr">18051 </span> 68/push 0/imm32/register -<span id="L18052" class="LineNr">18052 </span> 68/push 0/imm32/register -<span id="L18053" class="LineNr">18053 </span> 68/push 0/imm32/no-stack-offset -<span id="L18054" class="LineNr">18054 </span> 68/push 1/imm32/block-depth -<span id="L18055" class="LineNr">18055 </span> 51/push-ecx -<span id="L18056" class="LineNr">18056 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18057" class="LineNr">18057 </span> 68/push 0/imm32/name -<span id="L18058" class="LineNr">18058 </span> 68/push 0/imm32/name -<span id="L18059" class="LineNr">18059 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18060" class="LineNr">18060 </span> 89/<- %ecx 4/r32/esp -<span id="L18061" class="LineNr">18061 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1-name</span>: -<span id="L18062" class="LineNr">18062 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L18063" class="LineNr">18063 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18064" class="LineNr">18064 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L18065" class="LineNr">18065 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1-register</span>: -<span id="L18066" class="LineNr">18066 </span> <span class="subxComment"># var1->register = "eax"</span> -<span id="L18067" class="LineNr">18067 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L18068" class="LineNr">18068 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L18069" class="LineNr">18069 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var2</span>: -<span id="L18070" class="LineNr">18070 </span> <span class="subxComment"># var var2/edx: (payload var)</span> -<span id="L18071" class="LineNr">18071 </span> 68/push 0/imm32/register -<span id="L18072" class="LineNr">18072 </span> 68/push 0/imm32/register -<span id="L18073" class="LineNr">18073 </span> 68/push 8/imm32/stack-offset -<span id="L18074" class="LineNr">18074 </span> 68/push 1/imm32/block-depth -<span id="L18075" class="LineNr">18075 </span> ff 6/subop/push *(ecx+0x10) -<span id="L18076" class="LineNr">18076 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18077" class="LineNr">18077 </span> 68/push 0/imm32/name -<span id="L18078" class="LineNr">18078 </span> 68/push 0/imm32/name -<span id="L18079" class="LineNr">18079 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18080" class="LineNr">18080 </span> 89/<- %edx 4/r32/esp -<span id="L18081" class="LineNr">18081 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var2-name</span>: -<span id="L18082" class="LineNr">18082 </span> <span class="subxComment"># var2->name = "var2"</span> -<span id="L18083" class="LineNr">18083 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18084" class="LineNr">18084 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) -<span id="L18085" class="LineNr">18085 </span><span class="Constant">$test-compare-reg-with-mem:initialize-inouts</span>: -<span id="L18086" class="LineNr">18086 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> -<span id="L18087" class="LineNr">18087 </span> 68/push 0/imm32/is-deref:false -<span id="L18088" class="LineNr">18088 </span> 68/push 0/imm32/next -<span id="L18089" class="LineNr">18089 </span> 68/push 0/imm32/next -<span id="L18090" class="LineNr">18090 </span> 52/push-edx/var2 -<span id="L18091" class="LineNr">18091 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18092" class="LineNr">18092 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18093" class="LineNr">18093 </span> 89/<- %esi 4/r32/esp -<span id="L18094" class="LineNr">18094 </span> <span class="subxComment"># inouts = [var1, var2]</span> -<span id="L18095" class="LineNr">18095 </span> 68/push 0/imm32/is-deref:false -<span id="L18096" class="LineNr">18096 </span> 56/push-esi/next -<span id="L18097" class="LineNr">18097 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18098" class="LineNr">18098 </span> 51/push-ecx/var1 -<span id="L18099" class="LineNr">18099 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18100" class="LineNr">18100 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18101" class="LineNr">18101 </span> 89/<- %esi 4/r32/esp -<span id="L18102" class="LineNr">18102 </span><span class="Constant">$test-compare-reg-with-mem:initialize-stmt</span>: -<span id="L18103" class="LineNr">18103 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18104" class="LineNr">18104 </span> 68/push 0/imm32/next -<span id="L18105" class="LineNr">18105 </span> 68/push 0/imm32/next -<span id="L18106" class="LineNr">18106 </span> 68/push 0/imm32/outputs -<span id="L18107" class="LineNr">18107 </span> 68/push 0/imm32/outputs -<span id="L18108" class="LineNr">18108 </span> 56/push-esi/inouts -<span id="L18109" class="LineNr">18109 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18110" class="LineNr">18110 </span> 68/push 0/imm32/operation -<span id="L18111" class="LineNr">18111 </span> 68/push 0/imm32/operation -<span id="L18112" class="LineNr">18112 </span> 68/push 1/imm32/tag:stmt1 -<span id="L18113" class="LineNr">18113 </span> 89/<- %esi 4/r32/esp -<span id="L18114" class="LineNr">18114 </span><span class="Constant">$test-compare-reg-with-mem:initialize-stmt-operation</span>: -<span id="L18115" class="LineNr">18115 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L18116" class="LineNr">18116 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18117" class="LineNr">18117 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L18118" class="LineNr">18118 </span> <span class="subxComment"># convert</span> -<span id="L18119" class="LineNr">18119 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18120" class="LineNr">18120 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18121" class="LineNr">18121 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18122" class="Folded">18122 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18128" class="LineNr">18128 </span> <span class="subxComment"># check output</span> -<span id="L18129" class="LineNr">18129 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"3b/compare<- *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-compare-reg-with-mem"</span>) -<span id="L18130" class="LineNr">18130 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18131" class="LineNr">18131 </span> 89/<- %esp 5/r32/ebp -<span id="L18132" class="LineNr">18132 </span> 5d/pop-to-ebp -<span id="L18133" class="LineNr">18133 </span> c3/return -<span id="L18134" class="LineNr">18134 </span> -<span id="L18135" class="LineNr">18135 </span><span class="subxTest">test-compare-mem-with-literal</span>: -<span id="L18136" class="LineNr">18136 </span> <span class="subxComment"># compare var1, 0x34</span> -<span id="L18137" class="LineNr">18137 </span> <span class="subxComment"># =></span> -<span id="L18138" class="LineNr">18138 </span> <span class="subxComment"># 81 7/subop/compare *(ebp+___) 0x34/imm32</span> -<span id="L18139" class="LineNr">18139 </span> <span class="subxComment">#</span> -<span id="L18140" class="LineNr">18140 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18141" class="LineNr">18141 </span> 55/push-ebp -<span id="L18142" class="LineNr">18142 </span> 89/<- %ebp 4/r32/esp -<span id="L18143" class="LineNr">18143 </span> <span class="subxComment"># setup</span> -<span id="L18144" class="LineNr">18144 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18145" class="LineNr">18145 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18146" class="LineNr">18146 </span><span class="Constant">$test-compare-mem-with-literal:initialize-type</span>: -<span id="L18147" class="LineNr">18147 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18148" class="LineNr">18148 </span> 68/push 0/imm32/right:null -<span id="L18149" class="LineNr">18149 </span> 68/push 0/imm32/right:null -<span id="L18150" class="LineNr">18150 </span> 68/push 0/imm32/left:unused -<span id="L18151" class="LineNr">18151 </span> 68/push 1/imm32/value:int -<span id="L18152" class="LineNr">18152 </span> 68/push 1/imm32/is-atom?:true -<span id="L18153" class="LineNr">18153 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18154" class="LineNr">18154 </span> 89/<- %ecx 4/r32/esp -<span id="L18155" class="LineNr">18155 </span><span class="Constant">$test-compare-mem-with-literal:initialize-var1</span>: -<span id="L18156" class="LineNr">18156 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L18157" class="LineNr">18157 </span> 68/push 0/imm32/register -<span id="L18158" class="LineNr">18158 </span> 68/push 0/imm32/register -<span id="L18159" class="LineNr">18159 </span> 68/push 8/imm32/stack-offset -<span id="L18160" class="LineNr">18160 </span> 68/push 1/imm32/block-depth -<span id="L18161" class="LineNr">18161 </span> 51/push-ecx -<span id="L18162" class="LineNr">18162 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18163" class="LineNr">18163 </span> 68/push 0/imm32/name -<span id="L18164" class="LineNr">18164 </span> 68/push 0/imm32/name -<span id="L18165" class="LineNr">18165 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18166" class="LineNr">18166 </span> 89/<- %ecx 4/r32/esp -<span id="L18167" class="LineNr">18167 </span><span class="Constant">$test-compare-mem-with-literal:initialize-var1-name</span>: -<span id="L18168" class="LineNr">18168 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L18169" class="LineNr">18169 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18170" class="LineNr">18170 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L18171" class="LineNr">18171 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal-type</span>: -<span id="L18172" class="LineNr">18172 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L18173" class="LineNr">18173 </span> 68/push 0/imm32/right:null -<span id="L18174" class="LineNr">18174 </span> 68/push 0/imm32/right:null -<span id="L18175" class="LineNr">18175 </span> 68/push 0/imm32/left:unused -<span id="L18176" class="LineNr">18176 </span> 68/push 0/imm32/value:literal -<span id="L18177" class="LineNr">18177 </span> 68/push 1/imm32/is-atom?:true -<span id="L18178" class="LineNr">18178 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18179" class="LineNr">18179 </span> 89/<- %edx 4/r32/esp -<span id="L18180" class="LineNr">18180 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal</span>: -<span id="L18181" class="LineNr">18181 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L18182" class="LineNr">18182 </span> 68/push 0/imm32/register -<span id="L18183" class="LineNr">18183 </span> 68/push 0/imm32/register -<span id="L18184" class="LineNr">18184 </span> 68/push 0/imm32/no-stack-offset -<span id="L18185" class="LineNr">18185 </span> 68/push 1/imm32/block-depth -<span id="L18186" class="LineNr">18186 </span> 52/push-edx -<span id="L18187" class="LineNr">18187 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18188" class="LineNr">18188 </span> 68/push 0/imm32/name -<span id="L18189" class="LineNr">18189 </span> 68/push 0/imm32/name -<span id="L18190" class="LineNr">18190 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18191" class="LineNr">18191 </span> 89/<- %edx 4/r32/esp -<span id="L18192" class="LineNr">18192 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal-value</span>: -<span id="L18193" class="LineNr">18193 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L18194" class="LineNr">18194 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18195" class="LineNr">18195 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L18196" class="LineNr">18196 </span><span class="Constant">$test-compare-mem-with-literal:initialize-inouts</span>: -<span id="L18197" class="LineNr">18197 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L18198" class="LineNr">18198 </span> 68/push 0/imm32/is-deref:false -<span id="L18199" class="LineNr">18199 </span> 68/push 0/imm32/next -<span id="L18200" class="LineNr">18200 </span> 68/push 0/imm32/next -<span id="L18201" class="LineNr">18201 </span> 52/push-edx/l -<span id="L18202" class="LineNr">18202 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18203" class="LineNr">18203 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18204" class="LineNr">18204 </span> 89/<- %esi 4/r32/esp -<span id="L18205" class="LineNr">18205 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> -<span id="L18206" class="LineNr">18206 </span> 68/push 0/imm32/is-deref:false -<span id="L18207" class="LineNr">18207 </span> 56/push-esi/next -<span id="L18208" class="LineNr">18208 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18209" class="LineNr">18209 </span> 51/push-ecx/var1 -<span id="L18210" class="LineNr">18210 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18211" class="LineNr">18211 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18212" class="LineNr">18212 </span> 89/<- %esi 4/r32/esp -<span id="L18213" class="LineNr">18213 </span><span class="Constant">$test-compare-mem-with-literal:initialize-stmt</span>: -<span id="L18214" class="LineNr">18214 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18215" class="LineNr">18215 </span> 68/push 0/imm32/next -<span id="L18216" class="LineNr">18216 </span> 68/push 0/imm32/next -<span id="L18217" class="LineNr">18217 </span> 68/push 0/imm32/outputs -<span id="L18218" class="LineNr">18218 </span> 68/push 0/imm32/outputs -<span id="L18219" class="LineNr">18219 </span> 56/push-esi/inouts -<span id="L18220" class="LineNr">18220 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18221" class="LineNr">18221 </span> 68/push 0/imm32/operation -<span id="L18222" class="LineNr">18222 </span> 68/push 0/imm32/operation -<span id="L18223" class="LineNr">18223 </span> 68/push 1/imm32/tag:stmt1 -<span id="L18224" class="LineNr">18224 </span> 89/<- %esi 4/r32/esp -<span id="L18225" class="LineNr">18225 </span><span class="Constant">$test-compare-mem-with-literal:initialize-stmt-operation</span>: -<span id="L18226" class="LineNr">18226 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L18227" class="LineNr">18227 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18228" class="LineNr">18228 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L18229" class="LineNr">18229 </span> <span class="subxComment"># convert</span> -<span id="L18230" class="LineNr">18230 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18231" class="LineNr">18231 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18232" class="LineNr">18232 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18233" class="Folded">18233 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18239" class="LineNr">18239 </span> <span class="subxComment"># check output</span> -<span id="L18240" class="LineNr">18240 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 7/subop/compare *(ebp+0x00000008) 0x34/imm32"</span> <span class="Constant">"F - test-compare-mem-with-literal"</span>) -<span id="L18241" class="LineNr">18241 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18242" class="LineNr">18242 </span> 89/<- %esp 5/r32/ebp -<span id="L18243" class="LineNr">18243 </span> 5d/pop-to-ebp -<span id="L18244" class="LineNr">18244 </span> c3/return -<span id="L18245" class="LineNr">18245 </span> -<span id="L18246" class="LineNr">18246 </span><span class="subxTest">test-compare-eax-with-literal</span>: -<span id="L18247" class="LineNr">18247 </span> <span class="subxComment"># compare var1/eax 0x34</span> -<span id="L18248" class="LineNr">18248 </span> <span class="subxComment"># =></span> -<span id="L18249" class="LineNr">18249 </span> <span class="subxComment"># 3d/compare-eax-with 0x34/imm32</span> -<span id="L18250" class="LineNr">18250 </span> <span class="subxComment">#</span> -<span id="L18251" class="LineNr">18251 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18252" class="LineNr">18252 </span> 55/push-ebp -<span id="L18253" class="LineNr">18253 </span> 89/<- %ebp 4/r32/esp -<span id="L18254" class="LineNr">18254 </span> <span class="subxComment"># setup</span> -<span id="L18255" class="LineNr">18255 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18256" class="LineNr">18256 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18257" class="LineNr">18257 </span><span class="Constant">$test-compare-eax-with-literal:initialize-type</span>: -<span id="L18258" class="LineNr">18258 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18259" class="LineNr">18259 </span> 68/push 0/imm32/right:null -<span id="L18260" class="LineNr">18260 </span> 68/push 0/imm32/right:null -<span id="L18261" class="LineNr">18261 </span> 68/push 0/imm32/left:unused -<span id="L18262" class="LineNr">18262 </span> 68/push 1/imm32/value:int -<span id="L18263" class="LineNr">18263 </span> 68/push 1/imm32/is-atom?:true -<span id="L18264" class="LineNr">18264 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18265" class="LineNr">18265 </span> 89/<- %ecx 4/r32/esp -<span id="L18266" class="LineNr">18266 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1</span>: -<span id="L18267" class="LineNr">18267 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L18268" class="LineNr">18268 </span> 68/push 0/imm32/register -<span id="L18269" class="LineNr">18269 </span> 68/push 0/imm32/register -<span id="L18270" class="LineNr">18270 </span> 68/push 0/imm32/no-stack-offset -<span id="L18271" class="LineNr">18271 </span> 68/push 1/imm32/block-depth -<span id="L18272" class="LineNr">18272 </span> 51/push-ecx -<span id="L18273" class="LineNr">18273 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18274" class="LineNr">18274 </span> 68/push 0/imm32/name -<span id="L18275" class="LineNr">18275 </span> 68/push 0/imm32/name -<span id="L18276" class="LineNr">18276 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18277" class="LineNr">18277 </span> 89/<- %ecx 4/r32/esp -<span id="L18278" class="LineNr">18278 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1-name</span>: -<span id="L18279" class="LineNr">18279 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L18280" class="LineNr">18280 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18281" class="LineNr">18281 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L18282" class="LineNr">18282 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1-register</span>: -<span id="L18283" class="LineNr">18283 </span> <span class="subxComment"># v->register = "eax"</span> -<span id="L18284" class="LineNr">18284 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L18285" class="LineNr">18285 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) -<span id="L18286" class="LineNr">18286 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal-type</span>: -<span id="L18287" class="LineNr">18287 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L18288" class="LineNr">18288 </span> 68/push 0/imm32/right:null +<span id="L17645" class="LineNr">17645 </span> 68/push 0/imm32/name +<span id="L17646" class="LineNr">17646 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17647" class="LineNr">17647 </span> 89/<- %ecx 4/r32/esp +<span id="L17648" class="LineNr">17648 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-name</span>: +<span id="L17649" class="LineNr">17649 </span> <span class="subxComment"># v->name = "v"</span> +<span id="L17650" class="LineNr">17650 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17651" class="LineNr">17651 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"v"</span> %eax) +<span id="L17652" class="LineNr">17652 </span><span class="Constant">$test-add-literal-to-reg:initialize-var-register</span>: +<span id="L17653" class="LineNr">17653 </span> <span class="subxComment"># v->register = "ecx"</span> +<span id="L17654" class="LineNr">17654 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17655" class="LineNr">17655 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) +<span id="L17656" class="LineNr">17656 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal-type</span>: +<span id="L17657" class="LineNr">17657 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L17658" class="LineNr">17658 </span> 68/push 0/imm32/right:null +<span id="L17659" class="LineNr">17659 </span> 68/push 0/imm32/right:null +<span id="L17660" class="LineNr">17660 </span> 68/push 0/imm32/left:unused +<span id="L17661" class="LineNr">17661 </span> 68/push 0/imm32/value:literal +<span id="L17662" class="LineNr">17662 </span> 68/push 1/imm32/is-atom?:true +<span id="L17663" class="LineNr">17663 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17664" class="LineNr">17664 </span> 89/<- %edx 4/r32/esp +<span id="L17665" class="LineNr">17665 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal</span>: +<span id="L17666" class="LineNr">17666 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L17667" class="LineNr">17667 </span> 68/push 0/imm32/register +<span id="L17668" class="LineNr">17668 </span> 68/push 0/imm32/register +<span id="L17669" class="LineNr">17669 </span> 68/push 0/imm32/no-stack-offset +<span id="L17670" class="LineNr">17670 </span> 68/push 1/imm32/block-depth +<span id="L17671" class="LineNr">17671 </span> 52/push-edx +<span id="L17672" class="LineNr">17672 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17673" class="LineNr">17673 </span> 68/push 0/imm32/name +<span id="L17674" class="LineNr">17674 </span> 68/push 0/imm32/name +<span id="L17675" class="LineNr">17675 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17676" class="LineNr">17676 </span> 89/<- %edx 4/r32/esp +<span id="L17677" class="LineNr">17677 </span><span class="Constant">$test-add-literal-to-reg:initialize-literal-value</span>: +<span id="L17678" class="LineNr">17678 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L17679" class="LineNr">17679 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17680" class="LineNr">17680 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L17681" class="LineNr">17681 </span><span class="Constant">$test-add-literal-to-reg:initialize-inouts</span>: +<span id="L17682" class="LineNr">17682 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L17683" class="LineNr">17683 </span> 68/push 0/imm32/is-deref:false +<span id="L17684" class="LineNr">17684 </span> 68/push 0/imm32/next +<span id="L17685" class="LineNr">17685 </span> 68/push 0/imm32/next +<span id="L17686" class="LineNr">17686 </span> 52/push-edx/l +<span id="L17687" class="LineNr">17687 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17688" class="LineNr">17688 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17689" class="LineNr">17689 </span> 89/<- %esi 4/r32/esp +<span id="L17690" class="LineNr">17690 </span><span class="Constant">$test-add-literal-to-reg:initialize-outputs</span>: +<span id="L17691" class="LineNr">17691 </span> <span class="subxComment"># var outputs/edi: (payload stmt-var) = [v]</span> +<span id="L17692" class="LineNr">17692 </span> 68/push 0/imm32/is-deref:false +<span id="L17693" class="LineNr">17693 </span> 68/push 0/imm32/next +<span id="L17694" class="LineNr">17694 </span> 68/push 0/imm32/next +<span id="L17695" class="LineNr">17695 </span> 51/push-ecx/v +<span id="L17696" class="LineNr">17696 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17697" class="LineNr">17697 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17698" class="LineNr">17698 </span> 89/<- %edi 4/r32/esp +<span id="L17699" class="LineNr">17699 </span><span class="Constant">$test-add-literal-to-reg:initialize-stmt</span>: +<span id="L17700" class="LineNr">17700 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17701" class="LineNr">17701 </span> 68/push 0/imm32/next +<span id="L17702" class="LineNr">17702 </span> 68/push 0/imm32/next +<span id="L17703" class="LineNr">17703 </span> 57/push-edi/outputs +<span id="L17704" class="LineNr">17704 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17705" class="LineNr">17705 </span> 56/push-esi/inouts +<span id="L17706" class="LineNr">17706 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17707" class="LineNr">17707 </span> 68/push 0/imm32/operation +<span id="L17708" class="LineNr">17708 </span> 68/push 0/imm32/operation +<span id="L17709" class="LineNr">17709 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17710" class="LineNr">17710 </span> 89/<- %esi 4/r32/esp +<span id="L17711" class="LineNr">17711 </span><span class="Constant">$test-add-literal-to-reg:initialize-stmt-operation</span>: +<span id="L17712" class="LineNr">17712 </span> <span class="subxComment"># stmt->operation = "add"</span> +<span id="L17713" class="LineNr">17713 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17714" class="LineNr">17714 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add"</span> %eax) +<span id="L17715" class="LineNr">17715 </span> <span class="subxComment"># convert</span> +<span id="L17716" class="LineNr">17716 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17717" class="LineNr">17717 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17718" class="LineNr">17718 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17719" class="Folded">17719 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17725" class="LineNr">17725 </span> <span class="subxComment"># check output</span> +<span id="L17726" class="LineNr">17726 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 0/subop/add %ecx 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-reg"</span>) +<span id="L17727" class="LineNr">17727 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17728" class="LineNr">17728 </span> 89/<- %esp 5/r32/ebp +<span id="L17729" class="LineNr">17729 </span> 5d/pop-to-ebp +<span id="L17730" class="LineNr">17730 </span> c3/return +<span id="L17731" class="LineNr">17731 </span> +<span id="L17732" class="LineNr">17732 </span><span class="subxTest">test-add-literal-to-mem</span>: +<span id="L17733" class="LineNr">17733 </span> <span class="subxComment"># add-to var1, 0x34</span> +<span id="L17734" class="LineNr">17734 </span> <span class="subxComment"># =></span> +<span id="L17735" class="LineNr">17735 </span> <span class="subxComment"># 81 0/subop/add %eax 0x34/imm32</span> +<span id="L17736" class="LineNr">17736 </span> <span class="subxComment">#</span> +<span id="L17737" class="LineNr">17737 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17738" class="LineNr">17738 </span> 55/push-ebp +<span id="L17739" class="LineNr">17739 </span> 89/<- %ebp 4/r32/esp +<span id="L17740" class="LineNr">17740 </span> <span class="subxComment"># setup</span> +<span id="L17741" class="LineNr">17741 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17742" class="LineNr">17742 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17743" class="LineNr">17743 </span><span class="Constant">$test-add-literal-to-mem:initialize-type</span>: +<span id="L17744" class="LineNr">17744 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17745" class="LineNr">17745 </span> 68/push 0/imm32/right:null +<span id="L17746" class="LineNr">17746 </span> 68/push 0/imm32/right:null +<span id="L17747" class="LineNr">17747 </span> 68/push 0/imm32/left:unused +<span id="L17748" class="LineNr">17748 </span> 68/push 1/imm32/value:int +<span id="L17749" class="LineNr">17749 </span> 68/push 1/imm32/is-atom?:true +<span id="L17750" class="LineNr">17750 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17751" class="LineNr">17751 </span> 89/<- %ecx 4/r32/esp +<span id="L17752" class="LineNr">17752 </span><span class="Constant">$test-add-literal-to-mem:initialize-var1</span>: +<span id="L17753" class="LineNr">17753 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17754" class="LineNr">17754 </span> 68/push 0/imm32/register +<span id="L17755" class="LineNr">17755 </span> 68/push 0/imm32/register +<span id="L17756" class="LineNr">17756 </span> 68/push 8/imm32/stack-offset +<span id="L17757" class="LineNr">17757 </span> 68/push 1/imm32/block-depth +<span id="L17758" class="LineNr">17758 </span> 51/push-ecx +<span id="L17759" class="LineNr">17759 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17760" class="LineNr">17760 </span> 68/push 0/imm32/name +<span id="L17761" class="LineNr">17761 </span> 68/push 0/imm32/name +<span id="L17762" class="LineNr">17762 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17763" class="LineNr">17763 </span> 89/<- %ecx 4/r32/esp +<span id="L17764" class="LineNr">17764 </span><span class="Constant">$test-add-literal-to-mem:initialize-var1-name</span>: +<span id="L17765" class="LineNr">17765 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L17766" class="LineNr">17766 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17767" class="LineNr">17767 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17768" class="LineNr">17768 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal-type</span>: +<span id="L17769" class="LineNr">17769 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L17770" class="LineNr">17770 </span> 68/push 0/imm32/right:null +<span id="L17771" class="LineNr">17771 </span> 68/push 0/imm32/right:null +<span id="L17772" class="LineNr">17772 </span> 68/push 0/imm32/left:unused +<span id="L17773" class="LineNr">17773 </span> 68/push 0/imm32/value:literal +<span id="L17774" class="LineNr">17774 </span> 68/push 1/imm32/is-atom?:true +<span id="L17775" class="LineNr">17775 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17776" class="LineNr">17776 </span> 89/<- %edx 4/r32/esp +<span id="L17777" class="LineNr">17777 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal</span>: +<span id="L17778" class="LineNr">17778 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L17779" class="LineNr">17779 </span> 68/push 0/imm32/register +<span id="L17780" class="LineNr">17780 </span> 68/push 0/imm32/register +<span id="L17781" class="LineNr">17781 </span> 68/push 0/imm32/no-stack-offset +<span id="L17782" class="LineNr">17782 </span> 68/push 1/imm32/block-depth +<span id="L17783" class="LineNr">17783 </span> 52/push-edx +<span id="L17784" class="LineNr">17784 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17785" class="LineNr">17785 </span> 68/push 0/imm32/name +<span id="L17786" class="LineNr">17786 </span> 68/push 0/imm32/name +<span id="L17787" class="LineNr">17787 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17788" class="LineNr">17788 </span> 89/<- %edx 4/r32/esp +<span id="L17789" class="LineNr">17789 </span><span class="Constant">$test-add-literal-to-mem:initialize-literal-value</span>: +<span id="L17790" class="LineNr">17790 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L17791" class="LineNr">17791 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17792" class="LineNr">17792 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L17793" class="LineNr">17793 </span><span class="Constant">$test-add-literal-to-mem:initialize-inouts</span>: +<span id="L17794" class="LineNr">17794 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L17795" class="LineNr">17795 </span> 68/push 0/imm32/is-deref:false +<span id="L17796" class="LineNr">17796 </span> 68/push 0/imm32/next +<span id="L17797" class="LineNr">17797 </span> 68/push 0/imm32/next +<span id="L17798" class="LineNr">17798 </span> 52/push-edx/l +<span id="L17799" class="LineNr">17799 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17800" class="LineNr">17800 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17801" class="LineNr">17801 </span> 89/<- %esi 4/r32/esp +<span id="L17802" class="LineNr">17802 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> +<span id="L17803" class="LineNr">17803 </span> 68/push 0/imm32/is-deref:false +<span id="L17804" class="LineNr">17804 </span> 56/push-esi/next +<span id="L17805" class="LineNr">17805 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17806" class="LineNr">17806 </span> 51/push-ecx/var1 +<span id="L17807" class="LineNr">17807 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17808" class="LineNr">17808 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17809" class="LineNr">17809 </span> 89/<- %esi 4/r32/esp +<span id="L17810" class="LineNr">17810 </span><span class="Constant">$test-add-literal-to-mem:initialize-stmt</span>: +<span id="L17811" class="LineNr">17811 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17812" class="LineNr">17812 </span> 68/push 0/imm32/next +<span id="L17813" class="LineNr">17813 </span> 68/push 0/imm32/next +<span id="L17814" class="LineNr">17814 </span> 68/push 0/imm32/outputs +<span id="L17815" class="LineNr">17815 </span> 68/push 0/imm32/outputs +<span id="L17816" class="LineNr">17816 </span> 56/push-esi/inouts +<span id="L17817" class="LineNr">17817 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17818" class="LineNr">17818 </span> 68/push 0/imm32/operation +<span id="L17819" class="LineNr">17819 </span> 68/push 0/imm32/operation +<span id="L17820" class="LineNr">17820 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17821" class="LineNr">17821 </span> 89/<- %esi 4/r32/esp +<span id="L17822" class="LineNr">17822 </span><span class="Constant">$test-add-literal-to-mem:initialize-stmt-operation</span>: +<span id="L17823" class="LineNr">17823 </span> <span class="subxComment"># stmt->operation = "add-to"</span> +<span id="L17824" class="LineNr">17824 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17825" class="LineNr">17825 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"add-to"</span> %eax) +<span id="L17826" class="LineNr">17826 </span> <span class="subxComment"># convert</span> +<span id="L17827" class="LineNr">17827 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17828" class="LineNr">17828 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17829" class="LineNr">17829 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17830" class="Folded">17830 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17836" class="LineNr">17836 </span> <span class="subxComment"># check output</span> +<span id="L17837" class="LineNr">17837 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 0/subop/add *(ebp+0x00000008) 0x34/imm32"</span> <span class="Constant">"F - test-add-literal-to-mem"</span>) +<span id="L17838" class="LineNr">17838 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17839" class="LineNr">17839 </span> 89/<- %esp 5/r32/ebp +<span id="L17840" class="LineNr">17840 </span> 5d/pop-to-ebp +<span id="L17841" class="LineNr">17841 </span> c3/return +<span id="L17842" class="LineNr">17842 </span> +<span id="L17843" class="LineNr">17843 </span><span class="subxTest">test-compare-reg-with-reg</span>: +<span id="L17844" class="LineNr">17844 </span> <span class="subxComment"># compare var1/ecx, var2/eax</span> +<span id="L17845" class="LineNr">17845 </span> <span class="subxComment"># =></span> +<span id="L17846" class="LineNr">17846 </span> <span class="subxComment"># 39/compare %ecx 0/r32/eax</span> +<span id="L17847" class="LineNr">17847 </span> <span class="subxComment">#</span> +<span id="L17848" class="LineNr">17848 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17849" class="LineNr">17849 </span> 55/push-ebp +<span id="L17850" class="LineNr">17850 </span> 89/<- %ebp 4/r32/esp +<span id="L17851" class="LineNr">17851 </span> <span class="subxComment"># setup</span> +<span id="L17852" class="LineNr">17852 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17853" class="LineNr">17853 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17854" class="LineNr">17854 </span><span class="Constant">$test-compare-reg-with-reg:initialize-type</span>: +<span id="L17855" class="LineNr">17855 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17856" class="LineNr">17856 </span> 68/push 0/imm32/right:null +<span id="L17857" class="LineNr">17857 </span> 68/push 0/imm32/right:null +<span id="L17858" class="LineNr">17858 </span> 68/push 0/imm32/left:unused +<span id="L17859" class="LineNr">17859 </span> 68/push 1/imm32/value:int +<span id="L17860" class="LineNr">17860 </span> 68/push 1/imm32/is-atom?:true +<span id="L17861" class="LineNr">17861 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17862" class="LineNr">17862 </span> 89/<- %ecx 4/r32/esp +<span id="L17863" class="LineNr">17863 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1</span>: +<span id="L17864" class="LineNr">17864 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17865" class="LineNr">17865 </span> 68/push 0/imm32/register +<span id="L17866" class="LineNr">17866 </span> 68/push 0/imm32/register +<span id="L17867" class="LineNr">17867 </span> 68/push 0/imm32/no-stack-offset +<span id="L17868" class="LineNr">17868 </span> 68/push 1/imm32/block-depth +<span id="L17869" class="LineNr">17869 </span> 51/push-ecx +<span id="L17870" class="LineNr">17870 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17871" class="LineNr">17871 </span> 68/push 0/imm32/name +<span id="L17872" class="LineNr">17872 </span> 68/push 0/imm32/name +<span id="L17873" class="LineNr">17873 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17874" class="LineNr">17874 </span> 89/<- %ecx 4/r32/esp +<span id="L17875" class="LineNr">17875 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1-name</span>: +<span id="L17876" class="LineNr">17876 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L17877" class="LineNr">17877 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17878" class="LineNr">17878 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17879" class="LineNr">17879 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var1-register</span>: +<span id="L17880" class="LineNr">17880 </span> <span class="subxComment"># var1->register = "ecx"</span> +<span id="L17881" class="LineNr">17881 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17882" class="LineNr">17882 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) +<span id="L17883" class="LineNr">17883 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2</span>: +<span id="L17884" class="LineNr">17884 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L17885" class="LineNr">17885 </span> 68/push 0/imm32/register +<span id="L17886" class="LineNr">17886 </span> 68/push 0/imm32/register +<span id="L17887" class="LineNr">17887 </span> 68/push 0/imm32/no-stack-offset +<span id="L17888" class="LineNr">17888 </span> 68/push 1/imm32/block-depth +<span id="L17889" class="LineNr">17889 </span> ff 6/subop/push *(ecx+0x10) +<span id="L17890" class="LineNr">17890 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17891" class="LineNr">17891 </span> 68/push 0/imm32/name +<span id="L17892" class="LineNr">17892 </span> 68/push 0/imm32/name +<span id="L17893" class="LineNr">17893 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17894" class="LineNr">17894 </span> 89/<- %edx 4/r32/esp +<span id="L17895" class="LineNr">17895 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2-name</span>: +<span id="L17896" class="LineNr">17896 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L17897" class="LineNr">17897 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17898" class="LineNr">17898 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L17899" class="LineNr">17899 </span><span class="Constant">$test-compare-reg-with-reg:initialize-var2-register</span>: +<span id="L17900" class="LineNr">17900 </span> <span class="subxComment"># var2->register = "eax"</span> +<span id="L17901" class="LineNr">17901 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L17902" class="LineNr">17902 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L17903" class="LineNr">17903 </span><span class="Constant">$test-compare-reg-with-reg:initialize-inouts</span>: +<span id="L17904" class="LineNr">17904 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L17905" class="LineNr">17905 </span> 68/push 0/imm32/is-deref:false +<span id="L17906" class="LineNr">17906 </span> 68/push 0/imm32/next +<span id="L17907" class="LineNr">17907 </span> 68/push 0/imm32/next +<span id="L17908" class="LineNr">17908 </span> 52/push-edx/var2 +<span id="L17909" class="LineNr">17909 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17910" class="LineNr">17910 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17911" class="LineNr">17911 </span> 89/<- %esi 4/r32/esp +<span id="L17912" class="LineNr">17912 </span> <span class="subxComment"># inouts = [var1, var2]</span> +<span id="L17913" class="LineNr">17913 </span> 68/push 0/imm32/is-deref:false +<span id="L17914" class="LineNr">17914 </span> 56/push-esi/next +<span id="L17915" class="LineNr">17915 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17916" class="LineNr">17916 </span> 51/push-ecx/var1 +<span id="L17917" class="LineNr">17917 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17918" class="LineNr">17918 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17919" class="LineNr">17919 </span> 89/<- %esi 4/r32/esp +<span id="L17920" class="LineNr">17920 </span><span class="Constant">$test-compare-reg-with-reg:initialize-stmt</span>: +<span id="L17921" class="LineNr">17921 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L17922" class="LineNr">17922 </span> 68/push 0/imm32/next +<span id="L17923" class="LineNr">17923 </span> 68/push 0/imm32/next +<span id="L17924" class="LineNr">17924 </span> 68/push 0/imm32/outputs +<span id="L17925" class="LineNr">17925 </span> 68/push 0/imm32/outputs +<span id="L17926" class="LineNr">17926 </span> 56/push-esi/inouts +<span id="L17927" class="LineNr">17927 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17928" class="LineNr">17928 </span> 68/push 0/imm32/operation +<span id="L17929" class="LineNr">17929 </span> 68/push 0/imm32/operation +<span id="L17930" class="LineNr">17930 </span> 68/push 1/imm32/tag:stmt1 +<span id="L17931" class="LineNr">17931 </span> 89/<- %esi 4/r32/esp +<span id="L17932" class="LineNr">17932 </span><span class="Constant">$test-compare-reg-with-reg:initialize-stmt-operation</span>: +<span id="L17933" class="LineNr">17933 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L17934" class="LineNr">17934 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L17935" class="LineNr">17935 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L17936" class="LineNr">17936 </span> <span class="subxComment"># convert</span> +<span id="L17937" class="LineNr">17937 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L17938" class="LineNr">17938 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L17939" class="LineNr">17939 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L17940" class="Folded">17940 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L17946" class="LineNr">17946 </span> <span class="subxComment"># check output</span> +<span id="L17947" class="LineNr">17947 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"39/compare-> %ecx 0x00000000/r32"</span> <span class="Constant">"F - test-compare-reg-with-reg"</span>) +<span id="L17948" class="LineNr">17948 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L17949" class="LineNr">17949 </span> 89/<- %esp 5/r32/ebp +<span id="L17950" class="LineNr">17950 </span> 5d/pop-to-ebp +<span id="L17951" class="LineNr">17951 </span> c3/return +<span id="L17952" class="LineNr">17952 </span> +<span id="L17953" class="LineNr">17953 </span><span class="subxTest">test-compare-mem-with-reg</span>: +<span id="L17954" class="LineNr">17954 </span> <span class="subxComment"># compare var1, var2/eax</span> +<span id="L17955" class="LineNr">17955 </span> <span class="subxComment"># =></span> +<span id="L17956" class="LineNr">17956 </span> <span class="subxComment"># 39/compare *(ebp+___) 0/r32/eax</span> +<span id="L17957" class="LineNr">17957 </span> <span class="subxComment">#</span> +<span id="L17958" class="LineNr">17958 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L17959" class="LineNr">17959 </span> 55/push-ebp +<span id="L17960" class="LineNr">17960 </span> 89/<- %ebp 4/r32/esp +<span id="L17961" class="LineNr">17961 </span> <span class="subxComment"># setup</span> +<span id="L17962" class="LineNr">17962 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L17963" class="LineNr">17963 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L17964" class="LineNr">17964 </span><span class="Constant">$test-compare-mem-with-reg:initialize-type</span>: +<span id="L17965" class="LineNr">17965 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L17966" class="LineNr">17966 </span> 68/push 0/imm32/right:null +<span id="L17967" class="LineNr">17967 </span> 68/push 0/imm32/right:null +<span id="L17968" class="LineNr">17968 </span> 68/push 0/imm32/left:unused +<span id="L17969" class="LineNr">17969 </span> 68/push 1/imm32/value:int +<span id="L17970" class="LineNr">17970 </span> 68/push 1/imm32/is-atom?:true +<span id="L17971" class="LineNr">17971 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17972" class="LineNr">17972 </span> 89/<- %ecx 4/r32/esp +<span id="L17973" class="LineNr">17973 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var1</span>: +<span id="L17974" class="LineNr">17974 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L17975" class="LineNr">17975 </span> 68/push 0/imm32/register +<span id="L17976" class="LineNr">17976 </span> 68/push 0/imm32/register +<span id="L17977" class="LineNr">17977 </span> 68/push 8/imm32/stack-offset +<span id="L17978" class="LineNr">17978 </span> 68/push 1/imm32/block-depth +<span id="L17979" class="LineNr">17979 </span> 51/push-ecx +<span id="L17980" class="LineNr">17980 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17981" class="LineNr">17981 </span> 68/push 0/imm32/name +<span id="L17982" class="LineNr">17982 </span> 68/push 0/imm32/name +<span id="L17983" class="LineNr">17983 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L17984" class="LineNr">17984 </span> 89/<- %ecx 4/r32/esp +<span id="L17985" class="LineNr">17985 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var1-name</span>: +<span id="L17986" class="LineNr">17986 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L17987" class="LineNr">17987 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L17988" class="LineNr">17988 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L17989" class="LineNr">17989 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2</span>: +<span id="L17990" class="LineNr">17990 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L17991" class="LineNr">17991 </span> 68/push 0/imm32/register +<span id="L17992" class="LineNr">17992 </span> 68/push 0/imm32/register +<span id="L17993" class="LineNr">17993 </span> 68/push 0/imm32/no-stack-offset +<span id="L17994" class="LineNr">17994 </span> 68/push 1/imm32/block-depth +<span id="L17995" class="LineNr">17995 </span> ff 6/subop/push *(ecx+0x10) +<span id="L17996" class="LineNr">17996 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L17997" class="LineNr">17997 </span> 68/push 0/imm32/name +<span id="L17998" class="LineNr">17998 </span> 68/push 0/imm32/name +<span id="L17999" class="LineNr">17999 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18000" class="LineNr">18000 </span> 89/<- %edx 4/r32/esp +<span id="L18001" class="LineNr">18001 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2-name</span>: +<span id="L18002" class="LineNr">18002 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L18003" class="LineNr">18003 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18004" class="LineNr">18004 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L18005" class="LineNr">18005 </span><span class="Constant">$test-compare-mem-with-reg:initialize-var2-register</span>: +<span id="L18006" class="LineNr">18006 </span> <span class="subxComment"># var2->register = "eax"</span> +<span id="L18007" class="LineNr">18007 </span> 8d/copy-address *(edx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L18008" class="LineNr">18008 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L18009" class="LineNr">18009 </span><span class="Constant">$test-compare-mem-with-reg:initialize-inouts</span>: +<span id="L18010" class="LineNr">18010 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L18011" class="LineNr">18011 </span> 68/push 0/imm32/is-deref:false +<span id="L18012" class="LineNr">18012 </span> 68/push 0/imm32/next +<span id="L18013" class="LineNr">18013 </span> 68/push 0/imm32/next +<span id="L18014" class="LineNr">18014 </span> 52/push-edx/var2 +<span id="L18015" class="LineNr">18015 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18016" class="LineNr">18016 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18017" class="LineNr">18017 </span> 89/<- %esi 4/r32/esp +<span id="L18018" class="LineNr">18018 </span> <span class="subxComment"># inouts = [var1, var2]</span> +<span id="L18019" class="LineNr">18019 </span> 68/push 0/imm32/is-deref:false +<span id="L18020" class="LineNr">18020 </span> 56/push-esi/next +<span id="L18021" class="LineNr">18021 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18022" class="LineNr">18022 </span> 51/push-ecx/var1 +<span id="L18023" class="LineNr">18023 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18024" class="LineNr">18024 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18025" class="LineNr">18025 </span> 89/<- %esi 4/r32/esp +<span id="L18026" class="LineNr">18026 </span><span class="Constant">$test-compare-mem-with-reg:initialize-stmt</span>: +<span id="L18027" class="LineNr">18027 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18028" class="LineNr">18028 </span> 68/push 0/imm32/next +<span id="L18029" class="LineNr">18029 </span> 68/push 0/imm32/next +<span id="L18030" class="LineNr">18030 </span> 68/push 0/imm32/outputs +<span id="L18031" class="LineNr">18031 </span> 68/push 0/imm32/outputs +<span id="L18032" class="LineNr">18032 </span> 56/push-esi/inouts +<span id="L18033" class="LineNr">18033 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18034" class="LineNr">18034 </span> 68/push 0/imm32/operation +<span id="L18035" class="LineNr">18035 </span> 68/push 0/imm32/operation +<span id="L18036" class="LineNr">18036 </span> 68/push 1/imm32/tag:stmt1 +<span id="L18037" class="LineNr">18037 </span> 89/<- %esi 4/r32/esp +<span id="L18038" class="LineNr">18038 </span><span class="Constant">$test-compare-mem-with-reg:initialize-stmt-operation</span>: +<span id="L18039" class="LineNr">18039 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L18040" class="LineNr">18040 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18041" class="LineNr">18041 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L18042" class="LineNr">18042 </span> <span class="subxComment"># convert</span> +<span id="L18043" class="LineNr">18043 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18044" class="LineNr">18044 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18045" class="LineNr">18045 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18046" class="Folded">18046 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18052" class="LineNr">18052 </span> <span class="subxComment"># check output</span> +<span id="L18053" class="LineNr">18053 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"39/compare-> *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-compare-mem-with-reg"</span>) +<span id="L18054" class="LineNr">18054 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18055" class="LineNr">18055 </span> 89/<- %esp 5/r32/ebp +<span id="L18056" class="LineNr">18056 </span> 5d/pop-to-ebp +<span id="L18057" class="LineNr">18057 </span> c3/return +<span id="L18058" class="LineNr">18058 </span> +<span id="L18059" class="LineNr">18059 </span><span class="subxTest">test-compare-reg-with-mem</span>: +<span id="L18060" class="LineNr">18060 </span> <span class="subxComment"># compare var1/eax, var2</span> +<span id="L18061" class="LineNr">18061 </span> <span class="subxComment"># =></span> +<span id="L18062" class="LineNr">18062 </span> <span class="subxComment"># 3b/compare<- *(ebp+___) 0/r32/eax</span> +<span id="L18063" class="LineNr">18063 </span> <span class="subxComment">#</span> +<span id="L18064" class="LineNr">18064 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18065" class="LineNr">18065 </span> 55/push-ebp +<span id="L18066" class="LineNr">18066 </span> 89/<- %ebp 4/r32/esp +<span id="L18067" class="LineNr">18067 </span> <span class="subxComment"># setup</span> +<span id="L18068" class="LineNr">18068 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18069" class="LineNr">18069 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18070" class="LineNr">18070 </span><span class="Constant">$test-compare-reg-with-mem:initialize-type</span>: +<span id="L18071" class="LineNr">18071 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L18072" class="LineNr">18072 </span> 68/push 0/imm32/right:null +<span id="L18073" class="LineNr">18073 </span> 68/push 0/imm32/right:null +<span id="L18074" class="LineNr">18074 </span> 68/push 0/imm32/left:unused +<span id="L18075" class="LineNr">18075 </span> 68/push 1/imm32/value:int +<span id="L18076" class="LineNr">18076 </span> 68/push 1/imm32/is-atom?:true +<span id="L18077" class="LineNr">18077 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18078" class="LineNr">18078 </span> 89/<- %ecx 4/r32/esp +<span id="L18079" class="LineNr">18079 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1</span>: +<span id="L18080" class="LineNr">18080 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L18081" class="LineNr">18081 </span> 68/push 0/imm32/register +<span id="L18082" class="LineNr">18082 </span> 68/push 0/imm32/register +<span id="L18083" class="LineNr">18083 </span> 68/push 0/imm32/no-stack-offset +<span id="L18084" class="LineNr">18084 </span> 68/push 1/imm32/block-depth +<span id="L18085" class="LineNr">18085 </span> 51/push-ecx +<span id="L18086" class="LineNr">18086 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18087" class="LineNr">18087 </span> 68/push 0/imm32/name +<span id="L18088" class="LineNr">18088 </span> 68/push 0/imm32/name +<span id="L18089" class="LineNr">18089 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18090" class="LineNr">18090 </span> 89/<- %ecx 4/r32/esp +<span id="L18091" class="LineNr">18091 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1-name</span>: +<span id="L18092" class="LineNr">18092 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L18093" class="LineNr">18093 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18094" class="LineNr">18094 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L18095" class="LineNr">18095 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var1-register</span>: +<span id="L18096" class="LineNr">18096 </span> <span class="subxComment"># var1->register = "eax"</span> +<span id="L18097" class="LineNr">18097 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L18098" class="LineNr">18098 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L18099" class="LineNr">18099 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var2</span>: +<span id="L18100" class="LineNr">18100 </span> <span class="subxComment"># var var2/edx: (payload var)</span> +<span id="L18101" class="LineNr">18101 </span> 68/push 0/imm32/register +<span id="L18102" class="LineNr">18102 </span> 68/push 0/imm32/register +<span id="L18103" class="LineNr">18103 </span> 68/push 8/imm32/stack-offset +<span id="L18104" class="LineNr">18104 </span> 68/push 1/imm32/block-depth +<span id="L18105" class="LineNr">18105 </span> ff 6/subop/push *(ecx+0x10) +<span id="L18106" class="LineNr">18106 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18107" class="LineNr">18107 </span> 68/push 0/imm32/name +<span id="L18108" class="LineNr">18108 </span> 68/push 0/imm32/name +<span id="L18109" class="LineNr">18109 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18110" class="LineNr">18110 </span> 89/<- %edx 4/r32/esp +<span id="L18111" class="LineNr">18111 </span><span class="Constant">$test-compare-reg-with-mem:initialize-var2-name</span>: +<span id="L18112" class="LineNr">18112 </span> <span class="subxComment"># var2->name = "var2"</span> +<span id="L18113" class="LineNr">18113 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18114" class="LineNr">18114 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var2"</span> %eax) +<span id="L18115" class="LineNr">18115 </span><span class="Constant">$test-compare-reg-with-mem:initialize-inouts</span>: +<span id="L18116" class="LineNr">18116 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [var2]</span> +<span id="L18117" class="LineNr">18117 </span> 68/push 0/imm32/is-deref:false +<span id="L18118" class="LineNr">18118 </span> 68/push 0/imm32/next +<span id="L18119" class="LineNr">18119 </span> 68/push 0/imm32/next +<span id="L18120" class="LineNr">18120 </span> 52/push-edx/var2 +<span id="L18121" class="LineNr">18121 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18122" class="LineNr">18122 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18123" class="LineNr">18123 </span> 89/<- %esi 4/r32/esp +<span id="L18124" class="LineNr">18124 </span> <span class="subxComment"># inouts = [var1, var2]</span> +<span id="L18125" class="LineNr">18125 </span> 68/push 0/imm32/is-deref:false +<span id="L18126" class="LineNr">18126 </span> 56/push-esi/next +<span id="L18127" class="LineNr">18127 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18128" class="LineNr">18128 </span> 51/push-ecx/var1 +<span id="L18129" class="LineNr">18129 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18130" class="LineNr">18130 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18131" class="LineNr">18131 </span> 89/<- %esi 4/r32/esp +<span id="L18132" class="LineNr">18132 </span><span class="Constant">$test-compare-reg-with-mem:initialize-stmt</span>: +<span id="L18133" class="LineNr">18133 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18134" class="LineNr">18134 </span> 68/push 0/imm32/next +<span id="L18135" class="LineNr">18135 </span> 68/push 0/imm32/next +<span id="L18136" class="LineNr">18136 </span> 68/push 0/imm32/outputs +<span id="L18137" class="LineNr">18137 </span> 68/push 0/imm32/outputs +<span id="L18138" class="LineNr">18138 </span> 56/push-esi/inouts +<span id="L18139" class="LineNr">18139 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18140" class="LineNr">18140 </span> 68/push 0/imm32/operation +<span id="L18141" class="LineNr">18141 </span> 68/push 0/imm32/operation +<span id="L18142" class="LineNr">18142 </span> 68/push 1/imm32/tag:stmt1 +<span id="L18143" class="LineNr">18143 </span> 89/<- %esi 4/r32/esp +<span id="L18144" class="LineNr">18144 </span><span class="Constant">$test-compare-reg-with-mem:initialize-stmt-operation</span>: +<span id="L18145" class="LineNr">18145 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L18146" class="LineNr">18146 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18147" class="LineNr">18147 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L18148" class="LineNr">18148 </span> <span class="subxComment"># convert</span> +<span id="L18149" class="LineNr">18149 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18150" class="LineNr">18150 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18151" class="LineNr">18151 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18152" class="Folded">18152 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18158" class="LineNr">18158 </span> <span class="subxComment"># check output</span> +<span id="L18159" class="LineNr">18159 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"3b/compare<- *(ebp+0x00000008) 0x00000000/r32"</span> <span class="Constant">"F - test-compare-reg-with-mem"</span>) +<span id="L18160" class="LineNr">18160 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18161" class="LineNr">18161 </span> 89/<- %esp 5/r32/ebp +<span id="L18162" class="LineNr">18162 </span> 5d/pop-to-ebp +<span id="L18163" class="LineNr">18163 </span> c3/return +<span id="L18164" class="LineNr">18164 </span> +<span id="L18165" class="LineNr">18165 </span><span class="subxTest">test-compare-mem-with-literal</span>: +<span id="L18166" class="LineNr">18166 </span> <span class="subxComment"># compare var1, 0x34</span> +<span id="L18167" class="LineNr">18167 </span> <span class="subxComment"># =></span> +<span id="L18168" class="LineNr">18168 </span> <span class="subxComment"># 81 7/subop/compare *(ebp+___) 0x34/imm32</span> +<span id="L18169" class="LineNr">18169 </span> <span class="subxComment">#</span> +<span id="L18170" class="LineNr">18170 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18171" class="LineNr">18171 </span> 55/push-ebp +<span id="L18172" class="LineNr">18172 </span> 89/<- %ebp 4/r32/esp +<span id="L18173" class="LineNr">18173 </span> <span class="subxComment"># setup</span> +<span id="L18174" class="LineNr">18174 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18175" class="LineNr">18175 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18176" class="LineNr">18176 </span><span class="Constant">$test-compare-mem-with-literal:initialize-type</span>: +<span id="L18177" class="LineNr">18177 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L18178" class="LineNr">18178 </span> 68/push 0/imm32/right:null +<span id="L18179" class="LineNr">18179 </span> 68/push 0/imm32/right:null +<span id="L18180" class="LineNr">18180 </span> 68/push 0/imm32/left:unused +<span id="L18181" class="LineNr">18181 </span> 68/push 1/imm32/value:int +<span id="L18182" class="LineNr">18182 </span> 68/push 1/imm32/is-atom?:true +<span id="L18183" class="LineNr">18183 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18184" class="LineNr">18184 </span> 89/<- %ecx 4/r32/esp +<span id="L18185" class="LineNr">18185 </span><span class="Constant">$test-compare-mem-with-literal:initialize-var1</span>: +<span id="L18186" class="LineNr">18186 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> +<span id="L18187" class="LineNr">18187 </span> 68/push 0/imm32/register +<span id="L18188" class="LineNr">18188 </span> 68/push 0/imm32/register +<span id="L18189" class="LineNr">18189 </span> 68/push 8/imm32/stack-offset +<span id="L18190" class="LineNr">18190 </span> 68/push 1/imm32/block-depth +<span id="L18191" class="LineNr">18191 </span> 51/push-ecx +<span id="L18192" class="LineNr">18192 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18193" class="LineNr">18193 </span> 68/push 0/imm32/name +<span id="L18194" class="LineNr">18194 </span> 68/push 0/imm32/name +<span id="L18195" class="LineNr">18195 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18196" class="LineNr">18196 </span> 89/<- %ecx 4/r32/esp +<span id="L18197" class="LineNr">18197 </span><span class="Constant">$test-compare-mem-with-literal:initialize-var1-name</span>: +<span id="L18198" class="LineNr">18198 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L18199" class="LineNr">18199 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18200" class="LineNr">18200 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L18201" class="LineNr">18201 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal-type</span>: +<span id="L18202" class="LineNr">18202 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L18203" class="LineNr">18203 </span> 68/push 0/imm32/right:null +<span id="L18204" class="LineNr">18204 </span> 68/push 0/imm32/right:null +<span id="L18205" class="LineNr">18205 </span> 68/push 0/imm32/left:unused +<span id="L18206" class="LineNr">18206 </span> 68/push 0/imm32/value:literal +<span id="L18207" class="LineNr">18207 </span> 68/push 1/imm32/is-atom?:true +<span id="L18208" class="LineNr">18208 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18209" class="LineNr">18209 </span> 89/<- %edx 4/r32/esp +<span id="L18210" class="LineNr">18210 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal</span>: +<span id="L18211" class="LineNr">18211 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L18212" class="LineNr">18212 </span> 68/push 0/imm32/register +<span id="L18213" class="LineNr">18213 </span> 68/push 0/imm32/register +<span id="L18214" class="LineNr">18214 </span> 68/push 0/imm32/no-stack-offset +<span id="L18215" class="LineNr">18215 </span> 68/push 1/imm32/block-depth +<span id="L18216" class="LineNr">18216 </span> 52/push-edx +<span id="L18217" class="LineNr">18217 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18218" class="LineNr">18218 </span> 68/push 0/imm32/name +<span id="L18219" class="LineNr">18219 </span> 68/push 0/imm32/name +<span id="L18220" class="LineNr">18220 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18221" class="LineNr">18221 </span> 89/<- %edx 4/r32/esp +<span id="L18222" class="LineNr">18222 </span><span class="Constant">$test-compare-mem-with-literal:initialize-literal-value</span>: +<span id="L18223" class="LineNr">18223 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L18224" class="LineNr">18224 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18225" class="LineNr">18225 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L18226" class="LineNr">18226 </span><span class="Constant">$test-compare-mem-with-literal:initialize-inouts</span>: +<span id="L18227" class="LineNr">18227 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L18228" class="LineNr">18228 </span> 68/push 0/imm32/is-deref:false +<span id="L18229" class="LineNr">18229 </span> 68/push 0/imm32/next +<span id="L18230" class="LineNr">18230 </span> 68/push 0/imm32/next +<span id="L18231" class="LineNr">18231 </span> 52/push-edx/l +<span id="L18232" class="LineNr">18232 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18233" class="LineNr">18233 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18234" class="LineNr">18234 </span> 89/<- %esi 4/r32/esp +<span id="L18235" class="LineNr">18235 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> +<span id="L18236" class="LineNr">18236 </span> 68/push 0/imm32/is-deref:false +<span id="L18237" class="LineNr">18237 </span> 56/push-esi/next +<span id="L18238" class="LineNr">18238 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18239" class="LineNr">18239 </span> 51/push-ecx/var1 +<span id="L18240" class="LineNr">18240 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18241" class="LineNr">18241 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18242" class="LineNr">18242 </span> 89/<- %esi 4/r32/esp +<span id="L18243" class="LineNr">18243 </span><span class="Constant">$test-compare-mem-with-literal:initialize-stmt</span>: +<span id="L18244" class="LineNr">18244 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18245" class="LineNr">18245 </span> 68/push 0/imm32/next +<span id="L18246" class="LineNr">18246 </span> 68/push 0/imm32/next +<span id="L18247" class="LineNr">18247 </span> 68/push 0/imm32/outputs +<span id="L18248" class="LineNr">18248 </span> 68/push 0/imm32/outputs +<span id="L18249" class="LineNr">18249 </span> 56/push-esi/inouts +<span id="L18250" class="LineNr">18250 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18251" class="LineNr">18251 </span> 68/push 0/imm32/operation +<span id="L18252" class="LineNr">18252 </span> 68/push 0/imm32/operation +<span id="L18253" class="LineNr">18253 </span> 68/push 1/imm32/tag:stmt1 +<span id="L18254" class="LineNr">18254 </span> 89/<- %esi 4/r32/esp +<span id="L18255" class="LineNr">18255 </span><span class="Constant">$test-compare-mem-with-literal:initialize-stmt-operation</span>: +<span id="L18256" class="LineNr">18256 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L18257" class="LineNr">18257 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18258" class="LineNr">18258 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L18259" class="LineNr">18259 </span> <span class="subxComment"># convert</span> +<span id="L18260" class="LineNr">18260 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18261" class="LineNr">18261 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18262" class="LineNr">18262 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18263" class="Folded">18263 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18269" class="LineNr">18269 </span> <span class="subxComment"># check output</span> +<span id="L18270" class="LineNr">18270 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 7/subop/compare *(ebp+0x00000008) 0x34/imm32"</span> <span class="Constant">"F - test-compare-mem-with-literal"</span>) +<span id="L18271" class="LineNr">18271 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18272" class="LineNr">18272 </span> 89/<- %esp 5/r32/ebp +<span id="L18273" class="LineNr">18273 </span> 5d/pop-to-ebp +<span id="L18274" class="LineNr">18274 </span> c3/return +<span id="L18275" class="LineNr">18275 </span> +<span id="L18276" class="LineNr">18276 </span><span class="subxTest">test-compare-eax-with-literal</span>: +<span id="L18277" class="LineNr">18277 </span> <span class="subxComment"># compare var1/eax 0x34</span> +<span id="L18278" class="LineNr">18278 </span> <span class="subxComment"># =></span> +<span id="L18279" class="LineNr">18279 </span> <span class="subxComment"># 3d/compare-eax-with 0x34/imm32</span> +<span id="L18280" class="LineNr">18280 </span> <span class="subxComment">#</span> +<span id="L18281" class="LineNr">18281 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18282" class="LineNr">18282 </span> 55/push-ebp +<span id="L18283" class="LineNr">18283 </span> 89/<- %ebp 4/r32/esp +<span id="L18284" class="LineNr">18284 </span> <span class="subxComment"># setup</span> +<span id="L18285" class="LineNr">18285 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18286" class="LineNr">18286 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18287" class="LineNr">18287 </span><span class="Constant">$test-compare-eax-with-literal:initialize-type</span>: +<span id="L18288" class="LineNr">18288 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> <span id="L18289" class="LineNr">18289 </span> 68/push 0/imm32/right:null -<span id="L18290" class="LineNr">18290 </span> 68/push 0/imm32/left:unused -<span id="L18291" class="LineNr">18291 </span> 68/push 0/imm32/value:literal -<span id="L18292" class="LineNr">18292 </span> 68/push 1/imm32/is-atom?:true -<span id="L18293" class="LineNr">18293 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18294" class="LineNr">18294 </span> 89/<- %edx 4/r32/esp -<span id="L18295" class="LineNr">18295 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal</span>: -<span id="L18296" class="LineNr">18296 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L18297" class="LineNr">18297 </span> 68/push 0/imm32/register +<span id="L18290" class="LineNr">18290 </span> 68/push 0/imm32/right:null +<span id="L18291" class="LineNr">18291 </span> 68/push 0/imm32/left:unused +<span id="L18292" class="LineNr">18292 </span> 68/push 1/imm32/value:int +<span id="L18293" class="LineNr">18293 </span> 68/push 1/imm32/is-atom?:true +<span id="L18294" class="LineNr">18294 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18295" class="LineNr">18295 </span> 89/<- %ecx 4/r32/esp +<span id="L18296" class="LineNr">18296 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1</span>: +<span id="L18297" class="LineNr">18297 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> <span id="L18298" class="LineNr">18298 </span> 68/push 0/imm32/register -<span id="L18299" class="LineNr">18299 </span> 68/push 0/imm32/no-stack-offset -<span id="L18300" class="LineNr">18300 </span> 68/push 1/imm32/block-depth -<span id="L18301" class="LineNr">18301 </span> 52/push-edx -<span id="L18302" class="LineNr">18302 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18303" class="LineNr">18303 </span> 68/push 0/imm32/name +<span id="L18299" class="LineNr">18299 </span> 68/push 0/imm32/register +<span id="L18300" class="LineNr">18300 </span> 68/push 0/imm32/no-stack-offset +<span id="L18301" class="LineNr">18301 </span> 68/push 1/imm32/block-depth +<span id="L18302" class="LineNr">18302 </span> 51/push-ecx +<span id="L18303" class="LineNr">18303 </span> 68/push 0x11/imm32/alloc-id:fake <span id="L18304" class="LineNr">18304 </span> 68/push 0/imm32/name -<span id="L18305" class="LineNr">18305 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18306" class="LineNr">18306 </span> 89/<- %edx 4/r32/esp -<span id="L18307" class="LineNr">18307 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal-value</span>: -<span id="L18308" class="LineNr">18308 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L18309" class="LineNr">18309 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18310" class="LineNr">18310 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L18311" class="LineNr">18311 </span><span class="Constant">$test-compare-eax-with-literal:initialize-inouts</span>: -<span id="L18312" class="LineNr">18312 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L18313" class="LineNr">18313 </span> 68/push 0/imm32/is-deref:false -<span id="L18314" class="LineNr">18314 </span> 68/push 0/imm32/next -<span id="L18315" class="LineNr">18315 </span> 68/push 0/imm32/next -<span id="L18316" class="LineNr">18316 </span> 52/push-edx/l -<span id="L18317" class="LineNr">18317 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18318" class="LineNr">18318 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18319" class="LineNr">18319 </span> 89/<- %esi 4/r32/esp -<span id="L18320" class="LineNr">18320 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> -<span id="L18321" class="LineNr">18321 </span> 68/push 0/imm32/is-deref:false -<span id="L18322" class="LineNr">18322 </span> 56/push-esi/next -<span id="L18323" class="LineNr">18323 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18324" class="LineNr">18324 </span> 51/push-ecx/var1 -<span id="L18325" class="LineNr">18325 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18326" class="LineNr">18326 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18327" class="LineNr">18327 </span> 89/<- %esi 4/r32/esp -<span id="L18328" class="LineNr">18328 </span><span class="Constant">$test-compare-eax-with-literal:initialize-stmt</span>: -<span id="L18329" class="LineNr">18329 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18330" class="LineNr">18330 </span> 68/push 0/imm32/next -<span id="L18331" class="LineNr">18331 </span> 68/push 0/imm32/next -<span id="L18332" class="LineNr">18332 </span> 68/push 0/imm32/outputs -<span id="L18333" class="LineNr">18333 </span> 68/push 0/imm32/outputs -<span id="L18334" class="LineNr">18334 </span> 56/push-esi/inouts -<span id="L18335" class="LineNr">18335 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18336" class="LineNr">18336 </span> 68/push 0/imm32/operation -<span id="L18337" class="LineNr">18337 </span> 68/push 0/imm32/operation -<span id="L18338" class="LineNr">18338 </span> 68/push 1/imm32/tag:stmt1 -<span id="L18339" class="LineNr">18339 </span> 89/<- %esi 4/r32/esp -<span id="L18340" class="LineNr">18340 </span><span class="Constant">$test-compare-eax-with-literal:initialize-stmt-operation</span>: -<span id="L18341" class="LineNr">18341 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L18342" class="LineNr">18342 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18343" class="LineNr">18343 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L18344" class="LineNr">18344 </span> <span class="subxComment"># convert</span> -<span id="L18345" class="LineNr">18345 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18346" class="LineNr">18346 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18347" class="LineNr">18347 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18348" class="Folded">18348 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18354" class="LineNr">18354 </span> <span class="subxComment"># check output</span> -<span id="L18355" class="LineNr">18355 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"3d/compare-eax-with 0x34/imm32"</span> <span class="Constant">"F - test-compare-eax-with-literal"</span>) -<span id="L18356" class="LineNr">18356 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18357" class="LineNr">18357 </span> 89/<- %esp 5/r32/ebp -<span id="L18358" class="LineNr">18358 </span> 5d/pop-to-ebp -<span id="L18359" class="LineNr">18359 </span> c3/return -<span id="L18360" class="LineNr">18360 </span> -<span id="L18361" class="LineNr">18361 </span><span class="subxTest">test-compare-reg-with-literal</span>: -<span id="L18362" class="LineNr">18362 </span> <span class="subxComment"># compare var1/ecx 0x34</span> -<span id="L18363" class="LineNr">18363 </span> <span class="subxComment"># =></span> -<span id="L18364" class="LineNr">18364 </span> <span class="subxComment"># 81 7/subop/compare %ecx 0x34/imm32</span> -<span id="L18365" class="LineNr">18365 </span> <span class="subxComment">#</span> -<span id="L18366" class="LineNr">18366 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18367" class="LineNr">18367 </span> 55/push-ebp -<span id="L18368" class="LineNr">18368 </span> 89/<- %ebp 4/r32/esp -<span id="L18369" class="LineNr">18369 </span> <span class="subxComment"># setup</span> -<span id="L18370" class="LineNr">18370 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18371" class="LineNr">18371 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18372" class="LineNr">18372 </span><span class="Constant">$test-compare-reg-with-literal:initialize-type</span>: -<span id="L18373" class="LineNr">18373 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18374" class="LineNr">18374 </span> 68/push 0/imm32/right:null -<span id="L18375" class="LineNr">18375 </span> 68/push 0/imm32/right:null -<span id="L18376" class="LineNr">18376 </span> 68/push 0/imm32/left:unused -<span id="L18377" class="LineNr">18377 </span> 68/push 1/imm32/value:int -<span id="L18378" class="LineNr">18378 </span> 68/push 1/imm32/is-atom?:true -<span id="L18379" class="LineNr">18379 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18380" class="LineNr">18380 </span> 89/<- %ecx 4/r32/esp -<span id="L18381" class="LineNr">18381 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1</span>: -<span id="L18382" class="LineNr">18382 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> -<span id="L18383" class="LineNr">18383 </span> 68/push 0/imm32/register -<span id="L18384" class="LineNr">18384 </span> 68/push 0/imm32/register -<span id="L18385" class="LineNr">18385 </span> 68/push 0/imm32/no-stack-offset -<span id="L18386" class="LineNr">18386 </span> 68/push 1/imm32/block-depth -<span id="L18387" class="LineNr">18387 </span> 51/push-ecx -<span id="L18388" class="LineNr">18388 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18389" class="LineNr">18389 </span> 68/push 0/imm32/name -<span id="L18390" class="LineNr">18390 </span> 68/push 0/imm32/name -<span id="L18391" class="LineNr">18391 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18392" class="LineNr">18392 </span> 89/<- %ecx 4/r32/esp -<span id="L18393" class="LineNr">18393 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1-name</span>: -<span id="L18394" class="LineNr">18394 </span> <span class="subxComment"># var1->name = "var1"</span> -<span id="L18395" class="LineNr">18395 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18396" class="LineNr">18396 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) -<span id="L18397" class="LineNr">18397 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1-register</span>: -<span id="L18398" class="LineNr">18398 </span> <span class="subxComment"># v->register = "ecx"</span> -<span id="L18399" class="LineNr">18399 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> -<span id="L18400" class="LineNr">18400 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) -<span id="L18401" class="LineNr">18401 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal-type</span>: -<span id="L18402" class="LineNr">18402 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> -<span id="L18403" class="LineNr">18403 </span> 68/push 0/imm32/right:null +<span id="L18305" class="LineNr">18305 </span> 68/push 0/imm32/name +<span id="L18306" class="LineNr">18306 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18307" class="LineNr">18307 </span> 89/<- %ecx 4/r32/esp +<span id="L18308" class="LineNr">18308 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1-name</span>: +<span id="L18309" class="LineNr">18309 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L18310" class="LineNr">18310 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18311" class="LineNr">18311 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L18312" class="LineNr">18312 </span><span class="Constant">$test-compare-eax-with-literal:initialize-var1-register</span>: +<span id="L18313" class="LineNr">18313 </span> <span class="subxComment"># v->register = "eax"</span> +<span id="L18314" class="LineNr">18314 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L18315" class="LineNr">18315 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"eax"</span> %eax) +<span id="L18316" class="LineNr">18316 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal-type</span>: +<span id="L18317" class="LineNr">18317 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L18318" class="LineNr">18318 </span> 68/push 0/imm32/right:null +<span id="L18319" class="LineNr">18319 </span> 68/push 0/imm32/right:null +<span id="L18320" class="LineNr">18320 </span> 68/push 0/imm32/left:unused +<span id="L18321" class="LineNr">18321 </span> 68/push 0/imm32/value:literal +<span id="L18322" class="LineNr">18322 </span> 68/push 1/imm32/is-atom?:true +<span id="L18323" class="LineNr">18323 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18324" class="LineNr">18324 </span> 89/<- %edx 4/r32/esp +<span id="L18325" class="LineNr">18325 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal</span>: +<span id="L18326" class="LineNr">18326 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L18327" class="LineNr">18327 </span> 68/push 0/imm32/register +<span id="L18328" class="LineNr">18328 </span> 68/push 0/imm32/register +<span id="L18329" class="LineNr">18329 </span> 68/push 0/imm32/no-stack-offset +<span id="L18330" class="LineNr">18330 </span> 68/push 1/imm32/block-depth +<span id="L18331" class="LineNr">18331 </span> 52/push-edx +<span id="L18332" class="LineNr">18332 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18333" class="LineNr">18333 </span> 68/push 0/imm32/name +<span id="L18334" class="LineNr">18334 </span> 68/push 0/imm32/name +<span id="L18335" class="LineNr">18335 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18336" class="LineNr">18336 </span> 89/<- %edx 4/r32/esp +<span id="L18337" class="LineNr">18337 </span><span class="Constant">$test-compare-eax-with-literal:initialize-literal-value</span>: +<span id="L18338" class="LineNr">18338 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L18339" class="LineNr">18339 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18340" class="LineNr">18340 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L18341" class="LineNr">18341 </span><span class="Constant">$test-compare-eax-with-literal:initialize-inouts</span>: +<span id="L18342" class="LineNr">18342 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L18343" class="LineNr">18343 </span> 68/push 0/imm32/is-deref:false +<span id="L18344" class="LineNr">18344 </span> 68/push 0/imm32/next +<span id="L18345" class="LineNr">18345 </span> 68/push 0/imm32/next +<span id="L18346" class="LineNr">18346 </span> 52/push-edx/l +<span id="L18347" class="LineNr">18347 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18348" class="LineNr">18348 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18349" class="LineNr">18349 </span> 89/<- %esi 4/r32/esp +<span id="L18350" class="LineNr">18350 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> +<span id="L18351" class="LineNr">18351 </span> 68/push 0/imm32/is-deref:false +<span id="L18352" class="LineNr">18352 </span> 56/push-esi/next +<span id="L18353" class="LineNr">18353 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18354" class="LineNr">18354 </span> 51/push-ecx/var1 +<span id="L18355" class="LineNr">18355 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18356" class="LineNr">18356 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18357" class="LineNr">18357 </span> 89/<- %esi 4/r32/esp +<span id="L18358" class="LineNr">18358 </span><span class="Constant">$test-compare-eax-with-literal:initialize-stmt</span>: +<span id="L18359" class="LineNr">18359 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18360" class="LineNr">18360 </span> 68/push 0/imm32/next +<span id="L18361" class="LineNr">18361 </span> 68/push 0/imm32/next +<span id="L18362" class="LineNr">18362 </span> 68/push 0/imm32/outputs +<span id="L18363" class="LineNr">18363 </span> 68/push 0/imm32/outputs +<span id="L18364" class="LineNr">18364 </span> 56/push-esi/inouts +<span id="L18365" class="LineNr">18365 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18366" class="LineNr">18366 </span> 68/push 0/imm32/operation +<span id="L18367" class="LineNr">18367 </span> 68/push 0/imm32/operation +<span id="L18368" class="LineNr">18368 </span> 68/push 1/imm32/tag:stmt1 +<span id="L18369" class="LineNr">18369 </span> 89/<- %esi 4/r32/esp +<span id="L18370" class="LineNr">18370 </span><span class="Constant">$test-compare-eax-with-literal:initialize-stmt-operation</span>: +<span id="L18371" class="LineNr">18371 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L18372" class="LineNr">18372 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18373" class="LineNr">18373 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L18374" class="LineNr">18374 </span> <span class="subxComment"># convert</span> +<span id="L18375" class="LineNr">18375 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18376" class="LineNr">18376 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18377" class="LineNr">18377 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18378" class="Folded">18378 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18384" class="LineNr">18384 </span> <span class="subxComment"># check output</span> +<span id="L18385" class="LineNr">18385 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"3d/compare-eax-with 0x34/imm32"</span> <span class="Constant">"F - test-compare-eax-with-literal"</span>) +<span id="L18386" class="LineNr">18386 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18387" class="LineNr">18387 </span> 89/<- %esp 5/r32/ebp +<span id="L18388" class="LineNr">18388 </span> 5d/pop-to-ebp +<span id="L18389" class="LineNr">18389 </span> c3/return +<span id="L18390" class="LineNr">18390 </span> +<span id="L18391" class="LineNr">18391 </span><span class="subxTest">test-compare-reg-with-literal</span>: +<span id="L18392" class="LineNr">18392 </span> <span class="subxComment"># compare var1/ecx 0x34</span> +<span id="L18393" class="LineNr">18393 </span> <span class="subxComment"># =></span> +<span id="L18394" class="LineNr">18394 </span> <span class="subxComment"># 81 7/subop/compare %ecx 0x34/imm32</span> +<span id="L18395" class="LineNr">18395 </span> <span class="subxComment">#</span> +<span id="L18396" class="LineNr">18396 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18397" class="LineNr">18397 </span> 55/push-ebp +<span id="L18398" class="LineNr">18398 </span> 89/<- %ebp 4/r32/esp +<span id="L18399" class="LineNr">18399 </span> <span class="subxComment"># setup</span> +<span id="L18400" class="LineNr">18400 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18401" class="LineNr">18401 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18402" class="LineNr">18402 </span><span class="Constant">$test-compare-reg-with-literal:initialize-type</span>: +<span id="L18403" class="LineNr">18403 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> <span id="L18404" class="LineNr">18404 </span> 68/push 0/imm32/right:null -<span id="L18405" class="LineNr">18405 </span> 68/push 0/imm32/left:unused -<span id="L18406" class="LineNr">18406 </span> 68/push 0/imm32/value:literal -<span id="L18407" class="LineNr">18407 </span> 68/push 1/imm32/is-atom?:true -<span id="L18408" class="LineNr">18408 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18409" class="LineNr">18409 </span> 89/<- %edx 4/r32/esp -<span id="L18410" class="LineNr">18410 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal</span>: -<span id="L18411" class="LineNr">18411 </span> <span class="subxComment"># var l/edx: (payload var)</span> -<span id="L18412" class="LineNr">18412 </span> 68/push 0/imm32/register +<span id="L18405" class="LineNr">18405 </span> 68/push 0/imm32/right:null +<span id="L18406" class="LineNr">18406 </span> 68/push 0/imm32/left:unused +<span id="L18407" class="LineNr">18407 </span> 68/push 1/imm32/value:int +<span id="L18408" class="LineNr">18408 </span> 68/push 1/imm32/is-atom?:true +<span id="L18409" class="LineNr">18409 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18410" class="LineNr">18410 </span> 89/<- %ecx 4/r32/esp +<span id="L18411" class="LineNr">18411 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1</span>: +<span id="L18412" class="LineNr">18412 </span> <span class="subxComment"># var var1/ecx: (payload var)</span> <span id="L18413" class="LineNr">18413 </span> 68/push 0/imm32/register -<span id="L18414" class="LineNr">18414 </span> 68/push 0/imm32/no-stack-offset -<span id="L18415" class="LineNr">18415 </span> 68/push 1/imm32/block-depth -<span id="L18416" class="LineNr">18416 </span> 52/push-edx -<span id="L18417" class="LineNr">18417 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18418" class="LineNr">18418 </span> 68/push 0/imm32/name +<span id="L18414" class="LineNr">18414 </span> 68/push 0/imm32/register +<span id="L18415" class="LineNr">18415 </span> 68/push 0/imm32/no-stack-offset +<span id="L18416" class="LineNr">18416 </span> 68/push 1/imm32/block-depth +<span id="L18417" class="LineNr">18417 </span> 51/push-ecx +<span id="L18418" class="LineNr">18418 </span> 68/push 0x11/imm32/alloc-id:fake <span id="L18419" class="LineNr">18419 </span> 68/push 0/imm32/name -<span id="L18420" class="LineNr">18420 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18421" class="LineNr">18421 </span> 89/<- %edx 4/r32/esp -<span id="L18422" class="LineNr">18422 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal-value</span>: -<span id="L18423" class="LineNr">18423 </span> <span class="subxComment"># l->name = "0x34"</span> -<span id="L18424" class="LineNr">18424 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18425" class="LineNr">18425 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L18426" class="LineNr">18426 </span><span class="Constant">$test-compare-reg-with-literal:initialize-inouts</span>: -<span id="L18427" class="LineNr">18427 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> -<span id="L18428" class="LineNr">18428 </span> 68/push 0/imm32/is-deref:false -<span id="L18429" class="LineNr">18429 </span> 68/push 0/imm32/next -<span id="L18430" class="LineNr">18430 </span> 68/push 0/imm32/next -<span id="L18431" class="LineNr">18431 </span> 52/push-edx/l -<span id="L18432" class="LineNr">18432 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18433" class="LineNr">18433 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18434" class="LineNr">18434 </span> 89/<- %esi 4/r32/esp -<span id="L18435" class="LineNr">18435 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> -<span id="L18436" class="LineNr">18436 </span> 68/push 0/imm32/is-deref:false -<span id="L18437" class="LineNr">18437 </span> 56/push-esi/next -<span id="L18438" class="LineNr">18438 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18439" class="LineNr">18439 </span> 51/push-ecx/var1 -<span id="L18440" class="LineNr">18440 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18441" class="LineNr">18441 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18442" class="LineNr">18442 </span> 89/<- %esi 4/r32/esp -<span id="L18443" class="LineNr">18443 </span><span class="Constant">$test-compare-reg-with-literal:initialize-stmt</span>: -<span id="L18444" class="LineNr">18444 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18445" class="LineNr">18445 </span> 68/push 0/imm32/next -<span id="L18446" class="LineNr">18446 </span> 68/push 0/imm32/next -<span id="L18447" class="LineNr">18447 </span> 68/push 0/imm32/outputs -<span id="L18448" class="LineNr">18448 </span> 68/push 0/imm32/outputs -<span id="L18449" class="LineNr">18449 </span> 56/push-esi/inouts -<span id="L18450" class="LineNr">18450 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18451" class="LineNr">18451 </span> 68/push 0/imm32/operation -<span id="L18452" class="LineNr">18452 </span> 68/push 0/imm32/operation -<span id="L18453" class="LineNr">18453 </span> 68/push 1/imm32/tag:stmt1 -<span id="L18454" class="LineNr">18454 </span> 89/<- %esi 4/r32/esp -<span id="L18455" class="LineNr">18455 </span><span class="Constant">$test-compare-reg-with-literal:initialize-stmt-operation</span>: -<span id="L18456" class="LineNr">18456 </span> <span class="subxComment"># stmt->operation = "compare"</span> -<span id="L18457" class="LineNr">18457 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18458" class="LineNr">18458 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) -<span id="L18459" class="LineNr">18459 </span> <span class="subxComment"># convert</span> -<span id="L18460" class="LineNr">18460 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18461" class="LineNr">18461 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12664'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18462" class="LineNr">18462 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18463" class="Folded">18463 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18469" class="LineNr">18469 </span> <span class="subxComment"># check output</span> -<span id="L18470" class="LineNr">18470 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 7/subop/compare %ecx 0x34/imm32"</span> <span class="Constant">"F - test-compare-reg-with-literal"</span>) -<span id="L18471" class="LineNr">18471 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18472" class="LineNr">18472 </span> 89/<- %esp 5/r32/ebp -<span id="L18473" class="LineNr">18473 </span> 5d/pop-to-ebp -<span id="L18474" class="LineNr">18474 </span> c3/return -<span id="L18475" class="LineNr">18475 </span> -<span id="L18476" class="LineNr">18476 </span><span class="subxTest">test-emit-subx-stmt-function-call</span>: -<span id="L18477" class="LineNr">18477 </span> <span class="subxComment"># Call a function on a variable on the stack.</span> -<span id="L18478" class="LineNr">18478 </span> <span class="subxComment"># f foo</span> -<span id="L18479" class="LineNr">18479 </span> <span class="subxComment"># =></span> -<span id="L18480" class="LineNr">18480 </span> <span class="subxComment"># (f *(ebp-8))</span> -<span id="L18481" class="LineNr">18481 </span> <span class="subxComment"># (Changing the function name supports overloading in general, but here it</span> -<span id="L18482" class="LineNr">18482 </span> <span class="subxComment"># just serves to help disambiguate things.)</span> -<span id="L18483" class="LineNr">18483 </span> <span class="subxComment">#</span> -<span id="L18484" class="LineNr">18484 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> -<span id="L18485" class="LineNr">18485 </span> <span class="subxComment"># name: 'foo'</span> -<span id="L18486" class="LineNr">18486 </span> <span class="subxComment"># type: int</span> -<span id="L18487" class="LineNr">18487 </span> <span class="subxComment"># stack-offset: -8</span> -<span id="L18488" class="LineNr">18488 </span> <span class="subxComment">#</span> -<span id="L18489" class="LineNr">18489 </span> <span class="subxComment"># There's nothing in primitives.</span> -<span id="L18490" class="LineNr">18490 </span> <span class="subxComment">#</span> -<span id="L18491" class="LineNr">18491 </span> <span class="subxComment"># We don't perform any checking here on the type of 'f'.</span> -<span id="L18492" class="LineNr">18492 </span> <span class="subxComment">#</span> -<span id="L18493" class="LineNr">18493 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18494" class="LineNr">18494 </span> 55/push-ebp -<span id="L18495" class="LineNr">18495 </span> 89/<- %ebp 4/r32/esp -<span id="L18496" class="LineNr">18496 </span> <span class="subxComment"># setup</span> -<span id="L18497" class="LineNr">18497 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18498" class="LineNr">18498 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18499" class="LineNr">18499 </span><span class="Constant">$test-emit-subx-function-call:initialize-type</span>: -<span id="L18500" class="LineNr">18500 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18501" class="LineNr">18501 </span> 68/push 0/imm32/right:null -<span id="L18502" class="LineNr">18502 </span> 68/push 0/imm32/right:null -<span id="L18503" class="LineNr">18503 </span> 68/push 0/imm32/left:unused -<span id="L18504" class="LineNr">18504 </span> 68/push 1/imm32/value:int -<span id="L18505" class="LineNr">18505 </span> 68/push 1/imm32/is-atom?:true -<span id="L18506" class="LineNr">18506 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18507" class="LineNr">18507 </span> 89/<- %ecx 4/r32/esp -<span id="L18508" class="LineNr">18508 </span><span class="Constant">$test-emit-subx-function-call:initialize-var</span>: -<span id="L18509" class="LineNr">18509 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(type)</span> -<span id="L18510" class="LineNr">18510 </span> 68/push 0/imm32/no-register -<span id="L18511" class="LineNr">18511 </span> 68/push 0/imm32/no-register -<span id="L18512" class="LineNr">18512 </span> 68/push -8/imm32/stack-offset -<span id="L18513" class="LineNr">18513 </span> 68/push 1/imm32/block-depth -<span id="L18514" class="LineNr">18514 </span> 51/push-ecx/type -<span id="L18515" class="LineNr">18515 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18516" class="LineNr">18516 </span> 68/push 0/imm32/name -<span id="L18517" class="LineNr">18517 </span> 68/push 0/imm32/name -<span id="L18518" class="LineNr">18518 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18519" class="LineNr">18519 </span> 89/<- %ecx 4/r32/esp -<span id="L18520" class="LineNr">18520 </span><span class="Constant">$test-emit-subx-function-call:initialize-var-name</span>: -<span id="L18521" class="LineNr">18521 </span> <span class="subxComment"># var-foo->name = "foo"</span> -<span id="L18522" class="LineNr">18522 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18523" class="LineNr">18523 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) -<span id="L18524" class="LineNr">18524 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt-var</span>: -<span id="L18525" class="LineNr">18525 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> -<span id="L18526" class="LineNr">18526 </span> 68/push 0/imm32/is-deref:false -<span id="L18527" class="LineNr">18527 </span> 68/push 0/imm32/next -<span id="L18528" class="LineNr">18528 </span> 68/push 0/imm32/next -<span id="L18529" class="LineNr">18529 </span> 51/push-ecx/var-foo -<span id="L18530" class="LineNr">18530 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18531" class="LineNr">18531 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18532" class="LineNr">18532 </span> 89/<- %ebx 4/r32/esp -<span id="L18533" class="LineNr">18533 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt</span>: -<span id="L18534" class="LineNr">18534 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18535" class="LineNr">18535 </span> 68/push 0/imm32/no-outputs -<span id="L18536" class="LineNr">18536 </span> 68/push 0/imm32/no-outputs -<span id="L18537" class="LineNr">18537 </span> 53/push-ebx/inouts -<span id="L18538" class="LineNr">18538 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18539" class="LineNr">18539 </span> 68/push 0/imm32/operation -<span id="L18540" class="LineNr">18540 </span> 68/push 0/imm32/operation -<span id="L18541" class="LineNr">18541 </span> 68/push 1/imm32/tag -<span id="L18542" class="LineNr">18542 </span> 89/<- %esi 4/r32/esp -<span id="L18543" class="LineNr">18543 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt-operation</span>: -<span id="L18544" class="LineNr">18544 </span> <span class="subxComment"># stmt->operation = "f"</span> -<span id="L18545" class="LineNr">18545 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18546" class="LineNr">18546 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"f"</span> %eax) -<span id="L18547" class="LineNr">18547 </span> <span class="subxComment"># convert</span> -<span id="L18548" class="LineNr">18548 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18549" class="LineNr">18549 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi 0 <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18550" class="LineNr">18550 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18551" class="Folded">18551 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18557" class="LineNr">18557 </span> <span class="subxComment"># check output</span> -<span id="L18558" class="LineNr">18558 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"(f *(ebp+0xfffffff8))"</span> <span class="Constant">"F - test-emit-subx-stmt-function-call"</span>) -<span id="L18559" class="LineNr">18559 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18560" class="LineNr">18560 </span> 89/<- %esp 5/r32/ebp -<span id="L18561" class="LineNr">18561 </span> 5d/pop-to-ebp -<span id="L18562" class="LineNr">18562 </span> c3/return -<span id="L18563" class="LineNr">18563 </span> -<span id="L18564" class="LineNr">18564 </span><span class="subxTest">test-emit-subx-stmt-function-call-with-literal-arg</span>: -<span id="L18565" class="LineNr">18565 </span> <span class="subxComment"># Call a function on a literal.</span> -<span id="L18566" class="LineNr">18566 </span> <span class="subxComment"># f 0x34</span> -<span id="L18567" class="LineNr">18567 </span> <span class="subxComment"># =></span> -<span id="L18568" class="LineNr">18568 </span> <span class="subxComment"># (f2 0x34)</span> -<span id="L18569" class="LineNr">18569 </span> <span class="subxComment">#</span> -<span id="L18570" class="LineNr">18570 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18571" class="LineNr">18571 </span> 55/push-ebp -<span id="L18572" class="LineNr">18572 </span> 89/<- %ebp 4/r32/esp -<span id="L18573" class="LineNr">18573 </span> <span class="subxComment"># setup</span> -<span id="L18574" class="LineNr">18574 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) -<span id="L18575" class="LineNr">18575 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) -<span id="L18576" class="LineNr">18576 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-type</span>: -<span id="L18577" class="LineNr">18577 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> -<span id="L18578" class="LineNr">18578 </span> 68/push 0/imm32/right:null -<span id="L18579" class="LineNr">18579 </span> 68/push 0/imm32/right:null -<span id="L18580" class="LineNr">18580 </span> 68/push 0/imm32/left:unused -<span id="L18581" class="LineNr">18581 </span> 68/push 0/imm32/value:literal -<span id="L18582" class="LineNr">18582 </span> 68/push 1/imm32/is-atom?:true -<span id="L18583" class="LineNr">18583 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18584" class="LineNr">18584 </span> 89/<- %ecx 4/r32/esp -<span id="L18585" class="LineNr">18585 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-var</span>: -<span id="L18586" class="LineNr">18586 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(lit)</span> -<span id="L18587" class="LineNr">18587 </span> 68/push 0/imm32/no-register -<span id="L18588" class="LineNr">18588 </span> 68/push 0/imm32/no-register -<span id="L18589" class="LineNr">18589 </span> 68/push 0/imm32/no-stack-offset -<span id="L18590" class="LineNr">18590 </span> 68/push 1/imm32/block-depth -<span id="L18591" class="LineNr">18591 </span> 51/push-ecx/type -<span id="L18592" class="LineNr">18592 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18593" class="LineNr">18593 </span> 68/push 0/imm32/name -<span id="L18594" class="LineNr">18594 </span> 68/push 0/imm32/name -<span id="L18595" class="LineNr">18595 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18596" class="LineNr">18596 </span> 89/<- %ecx 4/r32/esp -<span id="L18597" class="LineNr">18597 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-var-name</span>: -<span id="L18598" class="LineNr">18598 </span> <span class="subxComment"># var-foo->name = "0x34"</span> -<span id="L18599" class="LineNr">18599 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> -<span id="L18600" class="LineNr">18600 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) -<span id="L18601" class="LineNr">18601 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt-var</span>: -<span id="L18602" class="LineNr">18602 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> -<span id="L18603" class="LineNr">18603 </span> 68/push 0/imm32/is-deref:false -<span id="L18604" class="LineNr">18604 </span> 68/push 0/imm32/next -<span id="L18605" class="LineNr">18605 </span> 68/push 0/imm32/next -<span id="L18606" class="LineNr">18606 </span> 51/push-ecx/var-foo -<span id="L18607" class="LineNr">18607 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18608" class="LineNr">18608 </span> 68/push 0x11/imm32/alloc-id:fake:payload -<span id="L18609" class="LineNr">18609 </span> 89/<- %ebx 4/r32/esp -<span id="L18610" class="LineNr">18610 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt</span>: -<span id="L18611" class="LineNr">18611 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> -<span id="L18612" class="LineNr">18612 </span> 68/push 0/imm32/no-outputs -<span id="L18613" class="LineNr">18613 </span> 68/push 0/imm32/no-outputs -<span id="L18614" class="LineNr">18614 </span> 53/push-ebx/inouts -<span id="L18615" class="LineNr">18615 </span> 68/push 0x11/imm32/alloc-id:fake -<span id="L18616" class="LineNr">18616 </span> 68/push 0/imm32/operation -<span id="L18617" class="LineNr">18617 </span> 68/push 0/imm32/operation -<span id="L18618" class="LineNr">18618 </span> 68/push 1/imm32/tag -<span id="L18619" class="LineNr">18619 </span> 89/<- %esi 4/r32/esp -<span id="L18620" class="LineNr">18620 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt-operation</span>: -<span id="L18621" class="LineNr">18621 </span> <span class="subxComment"># stmt->operation = "f"</span> -<span id="L18622" class="LineNr">18622 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> -<span id="L18623" class="LineNr">18623 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"f"</span> %eax) -<span id="L18624" class="LineNr">18624 </span> <span class="subxComment"># convert</span> -<span id="L18625" class="LineNr">18625 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 -<span id="L18626" class="LineNr">18626 </span> (<a href='mu.subx.html#L11686'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi 0 %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) -<span id="L18627" class="LineNr">18627 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) -<span id="L18628" class="Folded">18628 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> -<span id="L18634" class="LineNr">18634 </span> <span class="subxComment"># check output</span> -<span id="L18635" class="LineNr">18635 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"(f 0x34)"</span> <span class="Constant">"F - test-emit-subx-stmt-function-call-with-literal-arg"</span>) -<span id="L18636" class="LineNr">18636 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18637" class="LineNr">18637 </span> 89/<- %esp 5/r32/ebp -<span id="L18638" class="LineNr">18638 </span> 5d/pop-to-ebp -<span id="L18639" class="LineNr">18639 </span> c3/return -<span id="L18640" class="LineNr">18640 </span> -<span id="L18641" class="LineNr">18641 </span><span class="subxFunction">emit-indent</span>: <span class="subxComment"># out: (addr buffered-file), n: int</span> -<span id="L18642" class="LineNr">18642 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18643" class="LineNr">18643 </span> 55/push-ebp -<span id="L18644" class="LineNr">18644 </span> 89/<- %ebp 4/r32/esp -<span id="L18645" class="LineNr">18645 </span> <span class="subxS1Comment"># . save registers</span> -<span id="L18646" class="LineNr">18646 </span> 50/push-eax -<span id="L18647" class="LineNr">18647 </span> <span class="subxComment"># var i/eax: int = n</span> -<span id="L18648" class="LineNr">18648 </span> 8b/-> *(ebp+0xc) 0/r32/eax -<span id="L18649" class="LineNr">18649 </span> { -<span id="L18650" class="LineNr">18650 </span> <span class="subxComment"># if (i <= 0) break</span> -<span id="L18651" class="LineNr">18651 </span> 3d/compare-eax-with 0/imm32 -<span id="L18652" class="LineNr">18652 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 -<span id="L18653" class="LineNr">18653 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" "</span>) -<span id="L18654" class="LineNr">18654 </span> 48/decrement-eax -<span id="L18655" class="LineNr">18655 </span> eb/jump <span class="Constant">loop</span>/disp8 -<span id="L18656" class="LineNr">18656 </span> } -<span id="L18657" class="LineNr">18657 </span><span class="Constant">$emit-indent:end</span>: -<span id="L18658" class="LineNr">18658 </span> <span class="subxS1Comment"># . restore registers</span> -<span id="L18659" class="LineNr">18659 </span> 58/pop-to-eax -<span id="L18660" class="LineNr">18660 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18661" class="LineNr">18661 </span> 89/<- %esp 5/r32/ebp -<span id="L18662" class="LineNr">18662 </span> 5d/pop-to-ebp -<span id="L18663" class="LineNr">18663 </span> c3/return -<span id="L18664" class="LineNr">18664 </span> -<span id="L18665" class="LineNr">18665 </span><span class="subxFunction">emit-subx-prologue</span>: <span class="subxComment"># out: (addr buffered-file)</span> -<span id="L18666" class="LineNr">18666 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18667" class="LineNr">18667 </span> 55/push-ebp -<span id="L18668" class="LineNr">18668 </span> 89/<- %ebp 4/r32/esp -<span id="L18669" class="LineNr">18669 </span> <span class="subxComment">#</span> -<span id="L18670" class="LineNr">18670 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" # . prologue\n"</span>) -<span id="L18671" class="LineNr">18671 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 55/push-ebp\n"</span>) -<span id="L18672" class="LineNr">18672 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 89/<- %ebp 4/r32/esp\n"</span>) -<span id="L18673" class="LineNr">18673 </span><span class="Constant">$emit-subx-prologue:end</span>: -<span id="L18674" class="LineNr">18674 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18675" class="LineNr">18675 </span> 89/<- %esp 5/r32/ebp -<span id="L18676" class="LineNr">18676 </span> 5d/pop-to-ebp -<span id="L18677" class="LineNr">18677 </span> c3/return -<span id="L18678" class="LineNr">18678 </span> -<span id="L18679" class="LineNr">18679 </span><span class="subxFunction">emit-subx-epilogue</span>: <span class="subxComment"># out: (addr buffered-file)</span> -<span id="L18680" class="LineNr">18680 </span> <span class="subxS1Comment"># . prologue</span> -<span id="L18681" class="LineNr">18681 </span> 55/push-ebp -<span id="L18682" class="LineNr">18682 </span> 89/<- %ebp 4/r32/esp -<span id="L18683" class="LineNr">18683 </span> <span class="subxComment">#</span> -<span id="L18684" class="LineNr">18684 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" # . epilogue\n"</span>) -<span id="L18685" class="LineNr">18685 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 89/<- %esp 5/r32/ebp\n"</span>) -<span id="L18686" class="LineNr">18686 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 5d/pop-to-ebp\n"</span>) -<span id="L18687" class="LineNr">18687 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" c3/return\n"</span>) -<span id="L18688" class="LineNr">18688 </span><span class="Constant">$emit-subx-epilogue:end</span>: -<span id="L18689" class="LineNr">18689 </span> <span class="subxS1Comment"># . epilogue</span> -<span id="L18690" class="LineNr">18690 </span> 89/<- %esp 5/r32/ebp -<span id="L18691" class="LineNr">18691 </span> 5d/pop-to-ebp -<span id="L18692" class="LineNr">18692 </span> c3/return +<span id="L18420" class="LineNr">18420 </span> 68/push 0/imm32/name +<span id="L18421" class="LineNr">18421 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18422" class="LineNr">18422 </span> 89/<- %ecx 4/r32/esp +<span id="L18423" class="LineNr">18423 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1-name</span>: +<span id="L18424" class="LineNr">18424 </span> <span class="subxComment"># var1->name = "var1"</span> +<span id="L18425" class="LineNr">18425 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18426" class="LineNr">18426 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"var1"</span> %eax) +<span id="L18427" class="LineNr">18427 </span><span class="Constant">$test-compare-reg-with-literal:initialize-var1-register</span>: +<span id="L18428" class="LineNr">18428 </span> <span class="subxComment"># v->register = "ecx"</span> +<span id="L18429" class="LineNr">18429 </span> 8d/copy-address *(ecx+0x1c) 0/r32/eax <span class="subxComment"># Var-register + 4</span> +<span id="L18430" class="LineNr">18430 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"ecx"</span> %eax) +<span id="L18431" class="LineNr">18431 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal-type</span>: +<span id="L18432" class="LineNr">18432 </span> <span class="subxComment"># var type/edx: (payload tree type-id) = literal</span> +<span id="L18433" class="LineNr">18433 </span> 68/push 0/imm32/right:null +<span id="L18434" class="LineNr">18434 </span> 68/push 0/imm32/right:null +<span id="L18435" class="LineNr">18435 </span> 68/push 0/imm32/left:unused +<span id="L18436" class="LineNr">18436 </span> 68/push 0/imm32/value:literal +<span id="L18437" class="LineNr">18437 </span> 68/push 1/imm32/is-atom?:true +<span id="L18438" class="LineNr">18438 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18439" class="LineNr">18439 </span> 89/<- %edx 4/r32/esp +<span id="L18440" class="LineNr">18440 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal</span>: +<span id="L18441" class="LineNr">18441 </span> <span class="subxComment"># var l/edx: (payload var)</span> +<span id="L18442" class="LineNr">18442 </span> 68/push 0/imm32/register +<span id="L18443" class="LineNr">18443 </span> 68/push 0/imm32/register +<span id="L18444" class="LineNr">18444 </span> 68/push 0/imm32/no-stack-offset +<span id="L18445" class="LineNr">18445 </span> 68/push 1/imm32/block-depth +<span id="L18446" class="LineNr">18446 </span> 52/push-edx +<span id="L18447" class="LineNr">18447 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18448" class="LineNr">18448 </span> 68/push 0/imm32/name +<span id="L18449" class="LineNr">18449 </span> 68/push 0/imm32/name +<span id="L18450" class="LineNr">18450 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18451" class="LineNr">18451 </span> 89/<- %edx 4/r32/esp +<span id="L18452" class="LineNr">18452 </span><span class="Constant">$test-compare-reg-with-literal:initialize-literal-value</span>: +<span id="L18453" class="LineNr">18453 </span> <span class="subxComment"># l->name = "0x34"</span> +<span id="L18454" class="LineNr">18454 </span> 8d/copy-address *(edx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18455" class="LineNr">18455 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L18456" class="LineNr">18456 </span><span class="Constant">$test-compare-reg-with-literal:initialize-inouts</span>: +<span id="L18457" class="LineNr">18457 </span> <span class="subxComment"># var inouts/esi: (payload stmt-var) = [l]</span> +<span id="L18458" class="LineNr">18458 </span> 68/push 0/imm32/is-deref:false +<span id="L18459" class="LineNr">18459 </span> 68/push 0/imm32/next +<span id="L18460" class="LineNr">18460 </span> 68/push 0/imm32/next +<span id="L18461" class="LineNr">18461 </span> 52/push-edx/l +<span id="L18462" class="LineNr">18462 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18463" class="LineNr">18463 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18464" class="LineNr">18464 </span> 89/<- %esi 4/r32/esp +<span id="L18465" class="LineNr">18465 </span> <span class="subxComment"># var inouts = (handle stmt-var) = [var1, var2]</span> +<span id="L18466" class="LineNr">18466 </span> 68/push 0/imm32/is-deref:false +<span id="L18467" class="LineNr">18467 </span> 56/push-esi/next +<span id="L18468" class="LineNr">18468 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18469" class="LineNr">18469 </span> 51/push-ecx/var1 +<span id="L18470" class="LineNr">18470 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18471" class="LineNr">18471 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18472" class="LineNr">18472 </span> 89/<- %esi 4/r32/esp +<span id="L18473" class="LineNr">18473 </span><span class="Constant">$test-compare-reg-with-literal:initialize-stmt</span>: +<span id="L18474" class="LineNr">18474 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18475" class="LineNr">18475 </span> 68/push 0/imm32/next +<span id="L18476" class="LineNr">18476 </span> 68/push 0/imm32/next +<span id="L18477" class="LineNr">18477 </span> 68/push 0/imm32/outputs +<span id="L18478" class="LineNr">18478 </span> 68/push 0/imm32/outputs +<span id="L18479" class="LineNr">18479 </span> 56/push-esi/inouts +<span id="L18480" class="LineNr">18480 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18481" class="LineNr">18481 </span> 68/push 0/imm32/operation +<span id="L18482" class="LineNr">18482 </span> 68/push 0/imm32/operation +<span id="L18483" class="LineNr">18483 </span> 68/push 1/imm32/tag:stmt1 +<span id="L18484" class="LineNr">18484 </span> 89/<- %esi 4/r32/esp +<span id="L18485" class="LineNr">18485 </span><span class="Constant">$test-compare-reg-with-literal:initialize-stmt-operation</span>: +<span id="L18486" class="LineNr">18486 </span> <span class="subxComment"># stmt->operation = "compare"</span> +<span id="L18487" class="LineNr">18487 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18488" class="LineNr">18488 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"compare"</span> %eax) +<span id="L18489" class="LineNr">18489 </span> <span class="subxComment"># convert</span> +<span id="L18490" class="LineNr">18490 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18491" class="LineNr">18491 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi <span class="SpecialChar"><a href='mu.subx.html#L12694'>Primitives</a></span> <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18492" class="LineNr">18492 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18493" class="Folded">18493 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18499" class="LineNr">18499 </span> <span class="subxComment"># check output</span> +<span id="L18500" class="LineNr">18500 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"81 7/subop/compare %ecx 0x34/imm32"</span> <span class="Constant">"F - test-compare-reg-with-literal"</span>) +<span id="L18501" class="LineNr">18501 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18502" class="LineNr">18502 </span> 89/<- %esp 5/r32/ebp +<span id="L18503" class="LineNr">18503 </span> 5d/pop-to-ebp +<span id="L18504" class="LineNr">18504 </span> c3/return +<span id="L18505" class="LineNr">18505 </span> +<span id="L18506" class="LineNr">18506 </span><span class="subxTest">test-emit-subx-stmt-function-call</span>: +<span id="L18507" class="LineNr">18507 </span> <span class="subxComment"># Call a function on a variable on the stack.</span> +<span id="L18508" class="LineNr">18508 </span> <span class="subxComment"># f foo</span> +<span id="L18509" class="LineNr">18509 </span> <span class="subxComment"># =></span> +<span id="L18510" class="LineNr">18510 </span> <span class="subxComment"># (f *(ebp-8))</span> +<span id="L18511" class="LineNr">18511 </span> <span class="subxComment"># (Changing the function name supports overloading in general, but here it</span> +<span id="L18512" class="LineNr">18512 </span> <span class="subxComment"># just serves to help disambiguate things.)</span> +<span id="L18513" class="LineNr">18513 </span> <span class="subxComment">#</span> +<span id="L18514" class="LineNr">18514 </span> <span class="subxComment"># There's a variable on the var stack as follows:</span> +<span id="L18515" class="LineNr">18515 </span> <span class="subxComment"># name: 'foo'</span> +<span id="L18516" class="LineNr">18516 </span> <span class="subxComment"># type: int</span> +<span id="L18517" class="LineNr">18517 </span> <span class="subxComment"># stack-offset: -8</span> +<span id="L18518" class="LineNr">18518 </span> <span class="subxComment">#</span> +<span id="L18519" class="LineNr">18519 </span> <span class="subxComment"># There's nothing in primitives.</span> +<span id="L18520" class="LineNr">18520 </span> <span class="subxComment">#</span> +<span id="L18521" class="LineNr">18521 </span> <span class="subxComment"># We don't perform any checking here on the type of 'f'.</span> +<span id="L18522" class="LineNr">18522 </span> <span class="subxComment">#</span> +<span id="L18523" class="LineNr">18523 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18524" class="LineNr">18524 </span> 55/push-ebp +<span id="L18525" class="LineNr">18525 </span> 89/<- %ebp 4/r32/esp +<span id="L18526" class="LineNr">18526 </span> <span class="subxComment"># setup</span> +<span id="L18527" class="LineNr">18527 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18528" class="LineNr">18528 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18529" class="LineNr">18529 </span><span class="Constant">$test-emit-subx-function-call:initialize-type</span>: +<span id="L18530" class="LineNr">18530 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L18531" class="LineNr">18531 </span> 68/push 0/imm32/right:null +<span id="L18532" class="LineNr">18532 </span> 68/push 0/imm32/right:null +<span id="L18533" class="LineNr">18533 </span> 68/push 0/imm32/left:unused +<span id="L18534" class="LineNr">18534 </span> 68/push 1/imm32/value:int +<span id="L18535" class="LineNr">18535 </span> 68/push 1/imm32/is-atom?:true +<span id="L18536" class="LineNr">18536 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18537" class="LineNr">18537 </span> 89/<- %ecx 4/r32/esp +<span id="L18538" class="LineNr">18538 </span><span class="Constant">$test-emit-subx-function-call:initialize-var</span>: +<span id="L18539" class="LineNr">18539 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(type)</span> +<span id="L18540" class="LineNr">18540 </span> 68/push 0/imm32/no-register +<span id="L18541" class="LineNr">18541 </span> 68/push 0/imm32/no-register +<span id="L18542" class="LineNr">18542 </span> 68/push -8/imm32/stack-offset +<span id="L18543" class="LineNr">18543 </span> 68/push 1/imm32/block-depth +<span id="L18544" class="LineNr">18544 </span> 51/push-ecx/type +<span id="L18545" class="LineNr">18545 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18546" class="LineNr">18546 </span> 68/push 0/imm32/name +<span id="L18547" class="LineNr">18547 </span> 68/push 0/imm32/name +<span id="L18548" class="LineNr">18548 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18549" class="LineNr">18549 </span> 89/<- %ecx 4/r32/esp +<span id="L18550" class="LineNr">18550 </span><span class="Constant">$test-emit-subx-function-call:initialize-var-name</span>: +<span id="L18551" class="LineNr">18551 </span> <span class="subxComment"># var-foo->name = "foo"</span> +<span id="L18552" class="LineNr">18552 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18553" class="LineNr">18553 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"foo"</span> %eax) +<span id="L18554" class="LineNr">18554 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt-var</span>: +<span id="L18555" class="LineNr">18555 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> +<span id="L18556" class="LineNr">18556 </span> 68/push 0/imm32/is-deref:false +<span id="L18557" class="LineNr">18557 </span> 68/push 0/imm32/next +<span id="L18558" class="LineNr">18558 </span> 68/push 0/imm32/next +<span id="L18559" class="LineNr">18559 </span> 51/push-ecx/var-foo +<span id="L18560" class="LineNr">18560 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18561" class="LineNr">18561 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18562" class="LineNr">18562 </span> 89/<- %ebx 4/r32/esp +<span id="L18563" class="LineNr">18563 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt</span>: +<span id="L18564" class="LineNr">18564 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18565" class="LineNr">18565 </span> 68/push 0/imm32/no-outputs +<span id="L18566" class="LineNr">18566 </span> 68/push 0/imm32/no-outputs +<span id="L18567" class="LineNr">18567 </span> 53/push-ebx/inouts +<span id="L18568" class="LineNr">18568 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18569" class="LineNr">18569 </span> 68/push 0/imm32/operation +<span id="L18570" class="LineNr">18570 </span> 68/push 0/imm32/operation +<span id="L18571" class="LineNr">18571 </span> 68/push 1/imm32/tag +<span id="L18572" class="LineNr">18572 </span> 89/<- %esi 4/r32/esp +<span id="L18573" class="LineNr">18573 </span><span class="Constant">$test-emit-subx-function-call:initialize-stmt-operation</span>: +<span id="L18574" class="LineNr">18574 </span> <span class="subxComment"># stmt->operation = "f"</span> +<span id="L18575" class="LineNr">18575 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18576" class="LineNr">18576 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"f"</span> %eax) +<span id="L18577" class="LineNr">18577 </span> <span class="subxComment"># convert</span> +<span id="L18578" class="LineNr">18578 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18579" class="LineNr">18579 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi 0 <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18580" class="LineNr">18580 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18581" class="Folded">18581 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18587" class="LineNr">18587 </span> <span class="subxComment"># check output</span> +<span id="L18588" class="LineNr">18588 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"(f *(ebp+0xfffffff8))"</span> <span class="Constant">"F - test-emit-subx-stmt-function-call"</span>) +<span id="L18589" class="LineNr">18589 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18590" class="LineNr">18590 </span> 89/<- %esp 5/r32/ebp +<span id="L18591" class="LineNr">18591 </span> 5d/pop-to-ebp +<span id="L18592" class="LineNr">18592 </span> c3/return +<span id="L18593" class="LineNr">18593 </span> +<span id="L18594" class="LineNr">18594 </span><span class="subxTest">test-emit-subx-stmt-function-call-with-literal-arg</span>: +<span id="L18595" class="LineNr">18595 </span> <span class="subxComment"># Call a function on a literal.</span> +<span id="L18596" class="LineNr">18596 </span> <span class="subxComment"># f 0x34</span> +<span id="L18597" class="LineNr">18597 </span> <span class="subxComment"># =></span> +<span id="L18598" class="LineNr">18598 </span> <span class="subxComment"># (f2 0x34)</span> +<span id="L18599" class="LineNr">18599 </span> <span class="subxComment">#</span> +<span id="L18600" class="LineNr">18600 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18601" class="LineNr">18601 </span> 55/push-ebp +<span id="L18602" class="LineNr">18602 </span> 89/<- %ebp 4/r32/esp +<span id="L18603" class="LineNr">18603 </span> <span class="subxComment"># setup</span> +<span id="L18604" class="LineNr">18604 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a>) +<span id="L18605" class="LineNr">18605 </span> (<a href='../055stream.subx.html#L17'>clear-stream</a> $_test-output-buffered-file->buffer) +<span id="L18606" class="LineNr">18606 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-type</span>: +<span id="L18607" class="LineNr">18607 </span> <span class="subxComment"># var type/ecx: (payload tree type-id) = int</span> +<span id="L18608" class="LineNr">18608 </span> 68/push 0/imm32/right:null +<span id="L18609" class="LineNr">18609 </span> 68/push 0/imm32/right:null +<span id="L18610" class="LineNr">18610 </span> 68/push 0/imm32/left:unused +<span id="L18611" class="LineNr">18611 </span> 68/push 0/imm32/value:literal +<span id="L18612" class="LineNr">18612 </span> 68/push 1/imm32/is-atom?:true +<span id="L18613" class="LineNr">18613 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18614" class="LineNr">18614 </span> 89/<- %ecx 4/r32/esp +<span id="L18615" class="LineNr">18615 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-var</span>: +<span id="L18616" class="LineNr">18616 </span> <span class="subxComment"># var var-foo/ecx: (payload var) = var(lit)</span> +<span id="L18617" class="LineNr">18617 </span> 68/push 0/imm32/no-register +<span id="L18618" class="LineNr">18618 </span> 68/push 0/imm32/no-register +<span id="L18619" class="LineNr">18619 </span> 68/push 0/imm32/no-stack-offset +<span id="L18620" class="LineNr">18620 </span> 68/push 1/imm32/block-depth +<span id="L18621" class="LineNr">18621 </span> 51/push-ecx/type +<span id="L18622" class="LineNr">18622 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18623" class="LineNr">18623 </span> 68/push 0/imm32/name +<span id="L18624" class="LineNr">18624 </span> 68/push 0/imm32/name +<span id="L18625" class="LineNr">18625 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18626" class="LineNr">18626 </span> 89/<- %ecx 4/r32/esp +<span id="L18627" class="LineNr">18627 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-var-name</span>: +<span id="L18628" class="LineNr">18628 </span> <span class="subxComment"># var-foo->name = "0x34"</span> +<span id="L18629" class="LineNr">18629 </span> 8d/copy-address *(ecx+4) 0/r32/eax <span class="subxComment"># Var-name + 4</span> +<span id="L18630" class="LineNr">18630 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"0x34"</span> %eax) +<span id="L18631" class="LineNr">18631 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt-var</span>: +<span id="L18632" class="LineNr">18632 </span> <span class="subxComment"># var operand/ebx: (payload stmt-var) = stmt-var(var-foo)</span> +<span id="L18633" class="LineNr">18633 </span> 68/push 0/imm32/is-deref:false +<span id="L18634" class="LineNr">18634 </span> 68/push 0/imm32/next +<span id="L18635" class="LineNr">18635 </span> 68/push 0/imm32/next +<span id="L18636" class="LineNr">18636 </span> 51/push-ecx/var-foo +<span id="L18637" class="LineNr">18637 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18638" class="LineNr">18638 </span> 68/push 0x11/imm32/alloc-id:fake:payload +<span id="L18639" class="LineNr">18639 </span> 89/<- %ebx 4/r32/esp +<span id="L18640" class="LineNr">18640 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt</span>: +<span id="L18641" class="LineNr">18641 </span> <span class="subxComment"># var stmt/esi: (addr statement)</span> +<span id="L18642" class="LineNr">18642 </span> 68/push 0/imm32/no-outputs +<span id="L18643" class="LineNr">18643 </span> 68/push 0/imm32/no-outputs +<span id="L18644" class="LineNr">18644 </span> 53/push-ebx/inouts +<span id="L18645" class="LineNr">18645 </span> 68/push 0x11/imm32/alloc-id:fake +<span id="L18646" class="LineNr">18646 </span> 68/push 0/imm32/operation +<span id="L18647" class="LineNr">18647 </span> 68/push 0/imm32/operation +<span id="L18648" class="LineNr">18648 </span> 68/push 1/imm32/tag +<span id="L18649" class="LineNr">18649 </span> 89/<- %esi 4/r32/esp +<span id="L18650" class="LineNr">18650 </span><span class="Constant">$test-emit-subx-function-call-with-literal-arg:initialize-stmt-operation</span>: +<span id="L18651" class="LineNr">18651 </span> <span class="subxComment"># stmt->operation = "f"</span> +<span id="L18652" class="LineNr">18652 </span> 8d/copy-address *(esi+4) 0/r32/eax <span class="subxComment"># Stmt1-operation</span> +<span id="L18653" class="LineNr">18653 </span> (<a href='../069allocate.subx.html#L710'>copy-array</a> <span class="SpecialChar"><a href='../069allocate.subx.html#L27'>Heap</a></span> <span class="Constant">"f"</span> %eax) +<span id="L18654" class="LineNr">18654 </span> <span class="subxComment"># convert</span> +<span id="L18655" class="LineNr">18655 </span> c7 0/subop/copy *<span class="SpecialChar"><a href='mu.subx.html#L5143'>Curr-block-depth</a></span> 0/imm32 +<span id="L18656" class="LineNr">18656 </span> (<a href='mu.subx.html#L11716'>emit-subx-stmt</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a> %esi 0 %ebx <span class="SpecialChar"><a href='../065write-buffered.subx.html#L209'>Stderr</a></span> 0) +<span id="L18657" class="LineNr">18657 </span> (<a href='../064write-byte.subx.html#L81'>flush</a> <a href='../064write-byte.subx.html#L359'>_test-output-buffered-file</a>) +<span id="L18658" class="Folded">18658 </span><span class="Folded">+-- 6 lines: #? # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span> +<span id="L18664" class="LineNr">18664 </span> <span class="subxComment"># check output</span> +<span id="L18665" class="LineNr">18665 </span> (<a href='../058stream-equal.subx.html#L565'>check-next-stream-line-equal</a> <a href='../064write-byte.subx.html#L285'>_test-output-stream</a> <span class="Constant">"(f 0x34)"</span> <span class="Constant">"F - test-emit-subx-stmt-function-call-with-literal-arg"</span>) +<span id="L18666" class="LineNr">18666 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18667" class="LineNr">18667 </span> 89/<- %esp 5/r32/ebp +<span id="L18668" class="LineNr">18668 </span> 5d/pop-to-ebp +<span id="L18669" class="LineNr">18669 </span> c3/return +<span id="L18670" class="LineNr">18670 </span> +<span id="L18671" class="LineNr">18671 </span><span class="subxFunction">emit-indent</span>: <span class="subxComment"># out: (addr buffered-file), n: int</span> +<span id="L18672" class="LineNr">18672 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18673" class="LineNr">18673 </span> 55/push-ebp +<span id="L18674" class="LineNr">18674 </span> 89/<- %ebp 4/r32/esp +<span id="L18675" class="LineNr">18675 </span> <span class="subxS1Comment"># . save registers</span> +<span id="L18676" class="LineNr">18676 </span> 50/push-eax +<span id="L18677" class="LineNr">18677 </span> <span class="subxComment"># var i/eax: int = n</span> +<span id="L18678" class="LineNr">18678 </span> 8b/-> *(ebp+0xc) 0/r32/eax +<span id="L18679" class="LineNr">18679 </span> { +<span id="L18680" class="LineNr">18680 </span> <span class="subxComment"># if (i <= 0) break</span> +<span id="L18681" class="LineNr">18681 </span> 3d/compare-eax-with 0/imm32 +<span id="L18682" class="LineNr">18682 </span> 7e/jump-if-<= <span class="Constant">break</span>/disp8 +<span id="L18683" class="LineNr">18683 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" "</span>) +<span id="L18684" class="LineNr">18684 </span> 48/decrement-eax +<span id="L18685" class="LineNr">18685 </span> eb/jump <span class="Constant">loop</span>/disp8 +<span id="L18686" class="LineNr">18686 </span> } +<span id="L18687" class="LineNr">18687 </span><span class="Constant">$emit-indent:end</span>: +<span id="L18688" class="LineNr">18688 </span> <span class="subxS1Comment"># . restore registers</span> +<span id="L18689" class="LineNr">18689 </span> 58/pop-to-eax +<span id="L18690" class="LineNr">18690 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18691" class="LineNr">18691 </span> 89/<- %esp 5/r32/ebp +<span id="L18692" class="LineNr">18692 </span> 5d/pop-to-ebp +<span id="L18693" class="LineNr">18693 </span> c3/return +<span id="L18694" class="LineNr">18694 </span> +<span id="L18695" class="LineNr">18695 </span><span class="subxFunction">emit-subx-prologue</span>: <span class="subxComment"># out: (addr buffered-file)</span> +<span id="L18696" class="LineNr">18696 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18697" class="LineNr">18697 </span> 55/push-ebp +<span id="L18698" class="LineNr">18698 </span> 89/<- %ebp 4/r32/esp +<span id="L18699" class="LineNr">18699 </span> <span class="subxComment">#</span> +<span id="L18700" class="LineNr">18700 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" # . prologue\n"</span>) +<span id="L18701" class="LineNr">18701 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 55/push-ebp\n"</span>) +<span id="L18702" class="LineNr">18702 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 89/<- %ebp 4/r32/esp\n"</span>) +<span id="L18703" class="LineNr">18703 </span><span class="Constant">$emit-subx-prologue:end</span>: +<span id="L18704" class="LineNr">18704 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18705" class="LineNr">18705 </span> 89/<- %esp 5/r32/ebp +<span id="L18706" class="LineNr">18706 </span> 5d/pop-to-ebp +<span id="L18707" class="LineNr">18707 </span> c3/return +<span id="L18708" class="LineNr">18708 </span> +<span id="L18709" class="LineNr">18709 </span><span class="subxFunction">emit-subx-epilogue</span>: <span class="subxComment"># out: (addr buffered-file)</span> +<span id="L18710" class="LineNr">18710 </span> <span class="subxS1Comment"># . prologue</span> +<span id="L18711" class="LineNr">18711 </span> 55/push-ebp +<span id="L18712" class="LineNr">18712 </span> 89/<- %ebp 4/r32/esp +<span id="L18713" class="LineNr">18713 </span> <span class="subxComment">#</span> +<span id="L18714" class="LineNr">18714 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" # . epilogue\n"</span>) +<span id="L18715" class="LineNr">18715 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 89/<- %esp 5/r32/ebp\n"</span>) +<span id="L18716" class="LineNr">18716 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" 5d/pop-to-ebp\n"</span>) +<span id="L18717" class="LineNr">18717 </span> (<a href='../065write-buffered.subx.html#L8'>write-buffered</a> *(ebp+8) <span class="Constant">" c3/return\n"</span>) +<span id="L18718" class="LineNr">18718 </span><span class="Constant">$emit-subx-epilogue:end</span>: +<span id="L18719" class="LineNr">18719 </span> <span class="subxS1Comment"># . epilogue</span> +<span id="L18720" class="LineNr">18720 </span> 89/<- %esp 5/r32/ebp +<span id="L18721" class="LineNr">18721 </span> 5d/pop-to-ebp +<span id="L18722" class="LineNr">18722 </span> c3/return </pre> </body> </html> diff --git a/stats.txt b/stats.txt index 2e56533a..26ddf9ea 100644 --- a/stats.txt +++ b/stats.txt @@ -12,7 +12,7 @@ apps/tests.subx 284 137 apps/sigils.subx 4641 896 apps/calls.subx 1785 448 apps/braces.subx 360 121 -apps/mu.subx (incomplete) 17940 5780 +apps/mu.subx (incomplete) 18722 6044 ## Total source lines needed including libraries Initial -whitespace/comments/tests/dead code @@ -28,7 +28,7 @@ apps/tests.subx 8519 2214 apps/sigils.subx 10578 3043 apps/calls.subx 9242 2388 apps/braces.subx 8545 2111 -apps/mu.subx (incomplete) 21949 8357 +apps/mu.subx (incomplete) 22481 8537 ## executable size in KB Initial -tests/dead code @@ -44,7 +44,7 @@ apps/tests 41 5.8 apps/sigils 54 9.1 apps/calls 47 7.1 apps/braces 42 5.9 -apps/mu (incomplete) 303 47.0 +apps/mu (incomplete) 316 49.0 ## history of apps/mu.subx date commit mu.subx -tests/cmts binary (KB excl. dead code) @@ -65,6 +65,6 @@ user-defined types, and getting fields in them Mar 11 6135 11592 cleanup: switch to handles everywhere May 22 6382 15014 5064 39 -checking: function call types and registers Jun 18 6552 17940 5780 47 +first round of prototyping and static checks Jun 21 6572 18722 6044 49 vim:nowrap:tw& |