akkartik
/
mu
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

7349

This commit is contained in:
Kartik Agaram 2020-12-11 21:59:22 -08:00
parent 84f7026e82
commit a6167c6472
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
apps/mu.subx
View File

@ -28446,7 +28446,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "copy-byte")) break
(string-equal? %ecx "copy-byte") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-copy-byte-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28456,7 +28456,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "length")) break
(string-equal? %ecx "length") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-length-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28465,7 +28465,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "index")) break
(string-equal? %ecx "index") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-index-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x14) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28474,7 +28474,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "compute-offset")) break
(string-equal? %ecx "compute-offset") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-compute-index-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28483,7 +28483,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "get")) break
(string-equal? %ecx "get") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-get-stmt *(ebp+8) *(ebp+0xc))
e9/jump $emit-subx-stmt:end/disp32
@ -28492,7 +28492,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "allocate")) break
(string-equal? %ecx "allocate") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-allocate-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28501,7 +28501,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "copy-object")) break
(string-equal? %ecx "copy-object") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-copy-object-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28510,7 +28510,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "clear-object")) break
(string-equal? %ecx "clear-object") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-clear-object-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28519,7 +28519,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "populate")) break
(string-equal? %ecx "populate") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-populate-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28528,7 +28528,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "populate-stream")) break
(string-equal? %ecx "populate-stream") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-populate-stream-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28537,7 +28537,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "read-from-stream")) break
(string-equal? %ecx "read-from-stream") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-read-from-stream-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32
@ -28546,7 +28546,7 @@ emit-subx-stmt: # out: (addr buffered-file), stmt: (addr stmt), primitives: (ad
{
# if (!string-equal?(stmt->operation, "write-to-stream")) break
(string-equal? %ecx "write-to-stream") # => eax
3d/compare-eax-and 0/imm32
3d/compare-eax-and 0/imm32/false
0f 84/jump-if-= break/disp32
(translate-mu-write-to-stream-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x18) *(ebp+0x1c))
e9/jump $emit-subx-stmt:end/disp32