blob: 54650fd018a6dc7b40800e0349d42e1f295dd71b (
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
*
* --------------------------------------------------------------------------*/
#include "BeginPrivate.h"
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
#include "EndPrivate.h"
|