From b8710c572b9c0bb0370fa34645537aab88672883 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Mon, 28 Nov 2016 21:34:19 +0000
Subject: WIP fix for compacting/marking collector

---
 thumb2compact_rmark.s | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/thumb2compact_rmark.s b/thumb2compact_rmark.s
index ab0ab1b..5acfa91 100644
--- a/thumb2compact_rmark.s
+++ b/thumb2compact_rmark.s
@@ -102,7 +102,12 @@ rmark_node_:
 	orr	ASTACK_2,ASTACK_2,BSTACK_0
 	str	ASTACK_2,[HEAP_PTR,ASTACK_1,lsl #2]
 
-	ldr	BSTACK_0,[ASTACK_0]
+	@ldr	BSTACK_0,[ASTACK_0]
+	ands	lr,ASTACK_0,#1
+	it	eq
+	ldreq	BSTACK_0,[ASTACK_0]
+	it	ne
+	ldrne	BSTACK_0,[ASTACK_0,#-1]
 rmark_arguments:
 	cmp	ASTACK_0,BSTACK_1
 	bhi	rmark_no_reverse
-- 
cgit v1.2.3