Be a bit less aggressive in mark-many inside a cast
[ghc-hetmet.git] / rts / ThreadPaused.h
1 /* -----------------------------------------------------------------------------
2  *
3  * (c) The GHC Team 1998-2006
4  *
5  * Tidying up a thread when it stops running
6  *
7  * ---------------------------------------------------------------------------*/
8
9 #ifndef THREADPAUSED_H
10 #define THREADPAUSED_H
11
12 RTS_PRIVATE void threadPaused ( Capability *cap, StgTSO * );
13
14 #endif /* THREADPAUSED_H */