blob: 15c037954b27efc2d44f2de0d294aa93a65c707a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
/* ---------------------------------------------------------------------------
*
* (c) The GHC Team, 2010
*
* Inter-Capability message passing
*
* --------------------------------------------------------------------------*/
BEGIN_RTS_PRIVATE
nat messageBlackHole(Capability *cap, MessageBlackHole *msg);
#ifdef THREADED_RTS
void executeMessage (Capability *cap, Message *m);
void sendMessage (Capability *from_cap, Capability *to_cap, Message *msg);
#endif
END_RTS_PRIVATE
|