From 81f1c23dd1091a163c775faa575aa66aa65cf47e Mon Sep 17 00:00:00 2001
From: John van Groningen
Date: Tue, 15 Nov 2011 15:30:18 +0000
Subject: fix compacting for an empty A stack

---
 icompact_rmark.s | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/icompact_rmark.s b/icompact_rmark.s
index 819ecf0..2863653 100644
--- a/icompact_rmark.s
+++ b/icompact_rmark.s
@@ -7,10 +7,11 @@ rmark_stack_nodes1:
 
 rmark_next_stack_node:
 	addl	$4,a3
+rmark_stack_nodes:
 	cmpl	end_vector,a3
 	je	end_rmark_nodes
 
-rmark_stack_nodes:
+rmark_more_stack_nodes:
 	movl	(a3),a0
 
 	movl	neg_heap_p3,d0
@@ -42,7 +43,7 @@ rmark_stack_nodes:
 
 	addl	$4,a3
 	cmpl	end_vector,a3
-	jne	rmark_stack_nodes
+	jne	rmark_more_stack_nodes
 	ret
 
 rmark_stack_node:
-- 
cgit v1.2.3