From 612636182166a706ff1f64e1705a79ac233836fe Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Wed, 1 Jan 2020 14:51:07 -0800 Subject: 5848 --- apps/mu.subx | 10 +++++----- 1 file 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 -- cgit 1.4.1-2-gfad0 7a64ff204d9381d701cc94e83d42f79'/>

path: root/070table.mu

blob: 21184084d8e0fe70bb1ed204df62f72c9ea96335 (plain) (blame)