about summary refs log tree commit diff stats
path: root/apps/mu.subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-07-25 19:11:51 -0700
committerKartik Agaram <vc@akkartik.com>2020-07-25 19:11:51 -0700
commit2b1737363f88b61e6f07b368144096ff275c509a (patch)
tree2bfe8e3cc27ab89a6264633c0f3bf11b4016d32d /apps/mu.subx
parentab8d4b593b5309af9106e75aac0401c8d01a55a7 (diff)
downloadmu-2b1737363f88b61e6f07b368144096ff275c509a.tar.gz
6676 - type checks for 'lookup'
Diffstat (limited to 'apps/mu.subx')
-rw-r--r--apps/mu.subx24
1 files changed, 0 insertions, 24 deletions
diff --git a/apps/mu.subx b/apps/mu.subx
index 389aa9e2..06c963b9 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -11653,10 +11653,6 @@ has-primitive-name?:  # stmt: (addr stmt) -> result/eax: boolean
     (string-equal? %esi "compute-offset")  # => eax
     3d/compare-eax-and 0/imm32/false
     0f 85/jump-if-!= $has-primitive-name?:end/disp32
-    # if (name == "lookup") return true
-    (string-equal? %esi "lookup")  # => eax
-    3d/compare-eax-and 0/imm32/false
-    0f 85/jump-if-!= $has-primitive-name?:end/disp32
     # if (name == "allocate") return true
     (string-equal? %esi "allocate")  # => eax
     3d/compare-eax-and 0/imm32/false
@@ -11770,14 +11766,6 @@ check-mu-primitive:  # stmt: (addr stmt), fn: (addr function), err: (addr buffer
       (check-mu-compute-offset-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14))
       e9/jump $check-mu-primitive:end/disp32
     }
-    # if (op == "lookup") check-mu-lookup-stmt
-    {
-      (string-equal? %ecx "lookup")  # => eax
-      3d/compare-eax-and 0/imm32/false
-      74/jump-if-= break/disp8
-      (check-mu-lookup-stmt *(ebp+8) *(ebp+0xc) *(ebp+0x10) *(ebp+0x14))
-      e9/jump $check-mu-primitive:end/disp32
-    }
     # if (op == "allocate") check-mu-allocate-stmt
     {
       (string-equal? %ecx "allocate")  # => eax
@@ -12349,18 +12337,6 @@ $check-mu-compute-offset-stmt:end:
     5d/pop-to-ebp
     c3/return
 
-check-mu-lookup-stmt:  # stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)
-    # . prologue
-    55/push-ebp
-    89/<- %ebp 4/r32/esp
-    # . save registers
-$check-mu-lookup-stmt:end:
-    # . restore registers
-    # . epilogue
-    89/<- %esp 5/r32/ebp
-    5d/pop-to-ebp
-    c3/return
-
 check-mu-allocate-stmt:  # stmt: (addr stmt), fn: (addr function), err: (addr buffered-file), ed: (addr exit-descriptor)
     # . prologue
     55/push-ebp