From d70fca1c3fb332767377b0aabb83d86bf8ef3209 Mon Sep 17 00:00:00 2001
From: Kartik Agaram <vc@akkartik.com>
Date: Wed, 15 Apr 2020 16:09:04 -0700
Subject: 6204

---
 apps/mu      | Bin 212655 -> 212548 bytes
 apps/mu.subx |  28 ----------------------------
 2 files changed, 28 deletions(-)

(limited to 'apps')

diff --git a/apps/mu b/apps/mu
index ba8ffaf9..9b43d6db 100755
Binary files a/apps/mu and b/apps/mu differ
diff --git a/apps/mu.subx b/apps/mu.subx
index fa747713..08ceeca3 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -5640,34 +5640,6 @@ test-parse-mu-stmt-with-comma:
     5d/pop-to-ebp
     c3/return
 
-new-function:  # ad: (addr allocation-descriptor), name: (addr array byte), subx-name: (addr array byte), inouts: (handle list var), outputs: (handle list var), body: (handle block), next: (handle function) -> result/eax: (handle function)
-    # . prologue
-    55/push-ebp
-    89/<- %ebp 4/r32/esp
-    # . save registers
-    51/push-ecx
-    #
-    (allocate *(ebp+8) *Function-size)  # => eax
-    8b/-> *(ebp+0xc) 1/r32/ecx
-    89/<- *eax 1/r32/ecx  # Function-name
-    8b/-> *(ebp+0x10) 1/r32/ecx
-    89/<- *(eax+4) 1/r32/ecx  # Function-subx-name
-    8b/-> *(ebp+0x14) 1/r32/ecx
-    89/<- *(eax+8) 1/r32/ecx  # Function-inouts
-    8b/-> *(ebp+0x18) 1/r32/ecx
-    89/<- *(eax+0xc) 1/r32/ecx  # Function-outputs
-    8b/-> *(ebp+0x1c) 1/r32/ecx
-    89/<- *(eax+0x10) 1/r32/ecx  # Function-body
-    8b/-> *(ebp+0x20) 1/r32/ecx
-    89/<- *(eax+0x14) 1/r32/ecx  # Function-next
-$new-function:end:
-    # . restore registers
-    59/pop-to-ecx
-    # . epilogue
-    89/<- %esp 5/r32/ebp
-    5d/pop-to-ebp
-    c3/return
-
 new-var:  # ad: (addr allocation-descriptor), name: (addr array byte) -> result/eax: (handle var)
     # . prologue
     55/push-ebp
-- 
cgit 1.4.1-2-gfad0