From d7fcbcdbf0dd3976ea26800a28508785d02c2408 Mon Sep 17 00:00:00 2001
From: Mirek Kratochvil <exa.exa@gmail.com>
Date: Fri, 3 Nov 2023 21:28:40 +0100
Subject: fix blackhole (partially), kill apply1

---
 include/data.s | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'include/data.s')

diff --git a/include/data.s b/include/data.s
index 35c4c8d..c3f113f 100644
--- a/include/data.s
+++ b/include/data.s
@@ -67,8 +67,12 @@ IND_code:
 # Blackhole (contains the original thunkptr for debugging purposes)
 # | ptr | orig_thunkptr |
 BLE_evacuate:
+	pushq 010(%rbp)
+	pushq $BLE_code
+	mov %rsp,%rbp
 	jmp _gc_evacuate_ret
 BLE_scavenge:
+	add $020, %rbp
 	jmp _gc_scavenge_ret
 
 BLE_info_table:
-- 
cgit v1.2.3