From d13df738cbbe8017ae19ae2702f4e10805ee521b Mon Sep 17 00:00:00 2001
From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 31 Oct 2007 15:33:39 +0000
Subject: compile special minor GC versions of evacuate() and scavenge_block()

This is for two reasons: minor GCs don't need to do per-object locking
for parallel GC, which is fairly expensive, and secondly minor GCs
don't need to follow SRTs.
---
 rts/sm/Evac.h | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'rts/sm/Evac.h')

diff --git a/rts/sm/Evac.h b/rts/sm/Evac.h
index c73008fb1b..33ee4c5195 100644
--- a/rts/sm/Evac.h
+++ b/rts/sm/Evac.h
@@ -27,6 +27,7 @@
 #define REGPARM1
 #endif
 
-REGPARM1 void evacuate (StgClosure **p);
+REGPARM1 void evacuate  (StgClosure **p);
+REGPARM1 void evacuate0 (StgClosure **p);
 
 extern lnat thunk_selector_depth;
-- 
cgit v1.2.1