From 94cd5c93337206c9175b6319fdf3d817e5e65eab Mon Sep 17 00:00:00 2001
From: Devyn Cairns <devyn.cairns@gmail.com>
Date: Thu, 17 Aug 2023 01:14:31 -0700
Subject: [PATCH] also print return address when asked to deallocate a zeroed
 object

---
 stage1/memory.s | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/stage1/memory.s b/stage1/memory.s
index 29704a2..01a157f 100644
--- a/stage1/memory.s
+++ b/stage1/memory.s
@@ -304,12 +304,17 @@ drop_object:
         la ra, .Ldrop_object_end
         jr (t0)
 .Ldrop_object_zero:
-        # print z address and return without deallocating
+        # print z address:ra and return without deallocating
         li a0, 'z'
         call putc
         mv a0, s1
         li a1, 16
         call put_hex
+        li a0, ':'
+        call putc
+        ld a0, 0(sp) # return address
+        li a1, 16
+        call put_hex
         li a0, '\n'
         call putc
         j .Ldrop_object_ret