about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-01-26 15:07:55 -0800
committerKartik Agaram <vc@akkartik.com>2020-01-26 15:07:55 -0800
commit9a4631af7767dbeac3d3ed8cce0c423486467576 (patch)
treed74855383fbf57637c4261e531176557d9f17960
parentd1b94adc392432dcd475e4fd78dffbd164d978aa (diff)
downloadmu-9a4631af7767dbeac3d3ed8cce0c423486467576.tar.gz
5919
-rwxr-xr-xapps/mubin81143 -> 81046 bytes
-rw-r--r--apps/mu.subx24
2 files changed, 0 insertions, 24 deletions
diff --git a/apps/mu b/apps/mu
index 9b44b1a3..0b479ea9 100755
--- a/apps/mu
+++ b/apps/mu
Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx
index efc71006..da45b638 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -3336,30 +3336,6 @@ $new-block:end:
     5d/pop-to-ebp
     c3/return
 
-new-stmt:  # ad: (addr allocation-descriptor), operation: (addr array byte), inouts: (handle list var), outputs: (handle list var) -> result/eax: (handle statement)
-    # . prologue
-    55/push-ebp
-    89/<- %ebp 4/r32/esp
-    # . save registers
-    51/push-ecx
-    #
-    (allocate *(ebp+8) *Stmt-size)  # => eax
-    (zero-out %eax *Stmt-size)
-    c7 0/subop/copy *eax 1/imm32/tag/regular-stmt  # Stmt-tag
-    8b/-> *(ebp+0xc) 1/r32/ecx
-    89/<- *(eax+4) 1/r32/ecx  # Stmt1-operation
-    8b/-> *(ebp+0x10) 1/r32/ecx
-    89/<- *(eax+8) 1/r32/ecx  # Stmt1-inouts
-    8b/-> *(ebp+0x14) 1/r32/ecx
-    89/<- *(eax+0xc) 1/r32/ecx  # Stmt1-outputs
-$new-stmt:end:
-    # . restore registers
-    59/pop-to-ecx
-    # . epilogue
-    89/<- %esp 5/r32/ebp
-    5d/pop-to-ebp
-    c3/return
-
 new-vardef:  # ad: (addr allocation-descriptor), var: (handle var) -> result/eax: (handle statement)
     # . prologue
     55/push-ebp