diff options
| author | Kartik Agaram <vc@akkartik.com> | 2020-01-01 14:51:07 -0800 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2020-01-01 14:51:07 -0800 |
| commit | 612636182166a706ff1f64e1705a79ac233836fe (patch) | |
| tree | 3b0d8557d835ce909aea2aa8a89d458019698cc1 | |
| parent | a9baaac00b4bacfbee2986482ac0c37a7461927c (diff) | |
| download | mu-612636182166a706ff1f64e1705a79ac233836fe.tar.gz | |
5848
| -rw-r--r-- | apps/mu.subx | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/apps/mu.subx b/apps/mu.subx index 5f3513f4..05e41346 100644 --- a/apps/mu.subx +++ b/apps/mu.subx @@ -4357,7 +4357,7 @@ $mu-stmt-matches-primitive?:end: 5d/pop-to-ebp c3/return -operand-matches-primitive?: # var : (handle var), primout-var : (handle var) => result/eax : boolean +operand-matches-primitive?: # var : (handle var), prim-var : (handle var) => result/eax : boolean # . prologue 55/push-ebp 89/<- %ebp 4/r32/esp @@ -4366,14 +4366,14 @@ operand-matches-primitive?: # var : (handle var), primout-var : (handle var) => 57/push-edi # esi = var 8b/-> *(ebp+8) 6/r32/esi - # edi = primout-var + # edi = prim-var 8b/-> *(ebp+0xc) 7/r32/edi - # if (var->type != primout-var->type) return false + # if (var->type != prim-var->type) return false 8b/-> *(esi+4) 0/r32/eax # Var-type 39/compare *(edi+4) 0/r32/eax # Var-type b8/copy-to-eax 0/imm32/false 75/jump-if-not-equal $operand-matches-primitive?:end/disp8 - # return false if var->register doesn't match primout-var->register + # return false if var->register doesn't match prim-var->register { # if addresses are equal, don't return here 8b/-> *(esi+0x10) 0/r32/eax @@ -4384,7 +4384,7 @@ operand-matches-primitive?: # var : (handle var), primout-var : (handle var) => 74/jump-if-equal $operand-matches-primitive?:end/disp8 # eax goes from meaning var->register to result 81 7/subop/compare *(edi+0x10) 0/imm32 74/jump-if-equal $operand-matches-primitive?:end/disp8 # eax goes from meaning var->register to result - # if primout-var->register is "*", return true + # if prim-var->register is "*", return true (string-equal? *(edi+0x10) "*") # Var-register 3d/compare-eax-and 0/imm32 b8/copy-to-eax 1/imm32/true |