From e2c22ad4d9cbc99f4f256559819650c4d74261af Mon Sep 17 00:00:00 2001
From: Kartik Agaram <vc@akkartik.com>
Date: Sun, 26 Jul 2020 22:44:25 -0700
Subject: 6681

---
 apps/mu      | Bin 362269 -> 362269 bytes
 apps/mu.subx |   4 ++--
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'apps')

diff --git a/apps/mu b/apps/mu
index db6c157a..7ae8daf3 100755
Binary files a/apps/mu and b/apps/mu differ
diff --git a/apps/mu.subx b/apps/mu.subx
index 06c963b9..536bca5d 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -12810,7 +12810,7 @@ size-of-deref:  # v: (addr var) -> result/eax: int
       3d/compare-eax-and 0/imm32/false
       74/jump-if-= break/disp8
       (size-of-array %ecx)  # => eax
-      eb/jump $size-of:end/disp8
+      eb/jump $size-of-deref:end/disp8
     }
     # if (!t->is-atom?) t = lookup(t->left)
     {
@@ -12879,7 +12879,7 @@ size-of-array:  # a: (addr type-tree) -> result/eax: int
     (lookup *(ecx+0xc) *(ecx+0x10))  # Type-tree-right Type-tree-right => eax
     (lookup *(eax+4) *(eax+8))  # Type-tree-left Type-tree-left => eax
     8b/-> *(eax+8) 1/r32/ecx  # Type-tree-value-size
-    # return array-size * size-of(elem-type)
+    # return 4 + array-size * size-of(elem-type)
     (size-of-type-id-as-array-element %edx)  # => eax
     f7 4/subop/multiply-into-eax %ecx
     05/add-to-eax 4/imm32  # for array size
-- 
cgit 1.4.1-2-gfad0