From 942818de37045d594591c482deefed6a13c35053 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Fri, 18 Nov 2005 15:38:26 +0000
Subject: [PATCH] [project @ 2005-11-18 15:38:26 by simonmar] fix threaded
 build

---
 ghc/rts/Sparks.h |    6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/ghc/rts/Sparks.h b/ghc/rts/Sparks.h
index 1cc92eb..089b3f4 100644
--- a/ghc/rts/Sparks.h
+++ b/ghc/rts/Sparks.h
@@ -90,6 +90,12 @@ discardSparksCap (Capability *cap)
 { return discardSparks(&cap->r.rSparks); }
 
 
+#elif defined(THREADED_RTS) 
+
+INLINE_HEADER rtsBool
+emptySparkPoolCap (Capability *cap STG_UNUSED)
+{ return rtsTrue; }
+
 #endif
 
 #endif /* SPARKS_H */
-- 
1.7.10.4