From bf3b063304643135af78b31a6e3eaaa88be55c82 Mon Sep 17 00:00:00 2001
From: John van Groningen
Date: Tue, 5 Sep 2006 14:50:23 +0000
Subject: mark using pointer reversal ifthe stack becomes too large in the mark
 phase of the compacting collector

---
 acompact.asm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'acompact.asm')

diff --git a/acompact.asm b/acompact.asm
index 5db500e..7659fed 100644
--- a/acompact.asm
+++ b/acompact.asm
@@ -5,6 +5,9 @@
 	shl	rax,6
 	mov	qword ptr heap_size_64_65,rax 
 
+	lea	rax,(-16000)[rsp]
+	mov	qword ptr end_stack,rax
+
 	mov	rax,qword ptr caf_list
 
 	test	qword ptr flags,4096
@@ -75,6 +78,8 @@ end_rmarkp_cafs:
 
 	include	acompact_rmark_prefetch.asm
 
+	include acompact_rmarkr.asm
+
 ; compact the heap
 
 compact_heap:
-- 
cgit v1.2.3