From fbc57cad5622039654b95590ab1efb464984c71b Mon Sep 17 00:00:00 2001
From: Mirek Kratochvil <exa.exa@gmail.com>
Date: Tue, 31 Oct 2023 21:07:03 +0100
Subject: debug the gc

---
 apply_over.s | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'apply_over.s')

diff --git a/apply_over.s b/apply_over.s
index 4e86d17..165b6f2 100644
--- a/apply_over.s
+++ b/apply_over.s
@@ -45,7 +45,7 @@
 	thunkto %r13, $print, $1, %r13
 
 	# make a continuation for main (exit) and set it for print call
-	thunkto %rsi, $main_exit, $1, %rsi
+	thunkto %rsi, $main_exit, $0
 
 	# start evaluating the print
 	enter %r13
-- 
cgit v1.2.3