RTS tidyup sweep, first phase
[ghc-hetmet.git] / rts / Threads.h
1 /* ---------------------------------------------------------------------------
2  *
3  * (c) The GHC Team, 2006
4  *
5  * Thread-related functionality
6  *
7  * --------------------------------------------------------------------------*/
8
9 #ifndef THREADS_H
10 #define THREADS_H
11
12 StgTSO * unblockOne (Capability *cap, StgTSO *tso);
13 StgTSO * unblockOne_ (Capability *cap, StgTSO *tso, rtsBool allow_migrate);
14
15 void awakenBlockedQueue (Capability *cap, StgTSO *tso);
16
17 void removeThreadFromMVarQueue (Capability *cap, StgMVar *mvar, StgTSO *tso);
18 void removeThreadFromQueue     (Capability *cap, StgTSO **queue, StgTSO *tso);
19 void removeThreadFromDeQueue   (Capability *cap, StgTSO **head, StgTSO **tail, StgTSO *tso);
20
21 StgBool isThreadBound (StgTSO* tso);
22
23 #ifdef DEBUG
24 void printThreadBlockage (StgTSO *tso);
25 void printThreadStatus (StgTSO *t);
26 void printAllThreads (void);
27 void printThreadQueue (StgTSO *t);
28 #endif
29
30 #endif /* THREADS_H */