/* -----------------------------------------------------------------------------
- * $Id: Sparks.h,v 1.2 2000/03/31 03:09:36 hwloidl Exp $
*
* (c) The GHC Team, 2000
*
#elif defined(PAR) || defined(SMP)
-void initSparkPools( void );
+StgClosure *findSpark( rtsBool );
+rtsBool initSparkPools( void );
void markSparkQueue( void );
-StgClosure *findSpark( void );
+#if defined(PAR)
+StgTSO *activateSpark (rtsSpark spark) ;
rtsBool add_to_spark_queue( StgClosure *closure, StgSparkPool *pool );
void markSparkQueue( void );
+nat spark_queue_len( StgSparkPool *pool );
+void disposeSpark( StgClosure *spark );
+#endif
#endif