Massive patch for the first months work adding System FC to GHC #35
[ghc-hetmet.git] / rts / AwaitEvent.h
1 /* -----------------------------------------------------------------------------
2  *
3  * (c) The GHC Team 1998-2005
4  *
5  * The awaitEvent() interface, for the non-threaded RTS
6  *
7  * -------------------------------------------------------------------------*/
8
9 #ifndef AWAITEVENT_H
10 #define AWAITEVENT_H
11
12 #if !defined(THREADED_RTS)
13 /* awaitEvent(rtsBool wait)
14  *
15  * Checks for blocked threads that need to be woken.
16  *
17  * Called from STG :  NO
18  * Locks assumed   :  sched_mutex
19  */
20 void awaitEvent(rtsBool wait);  /* In posix/Select.c or
21                                  * win32/AwaitEvent.c */
22 #endif
23
24 #endif /* SELECT_H */