[project @ 2000-01-12 15:15:17 by simonmar]
[ghc-hetmet.git] / ghc / rts / Sparks.h
1 /* -----------------------------------------------------------------------------
2  * $Id: Sparks.h,v 1.1 2000/01/12 15:15:18 simonmar Exp $
3  *
4  * (c) The GHC Team, 2000
5  *
6  * Sparking support for PAR and SMP versions of the RTS.
7  *
8  * ---------------------------------------------------------------------------*/
9
10 void         initSparkPools( void );
11 void         markSparkQueue( void );
12 StgClosure * findSpark( void );
13 rtsBool      add_to_spark_queue( StgClosure *closure, StgSparkPool *pool );
14 void         markSparkQueue( void );