blob: c67cce27489f8d15ace561d506428b05e83e88af (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
#ifndef __DIST_H
#define __DIST_H
#ifdef DIST
#include "Rts.h"
typedef StgWord32 StgPEId;
// interface functions for Haskell Language calls
StgWord32 cGetPECount(void);
StgPEId cGetPEId(StgWord32 n);
StgPEId cGetMyPEId(void);
StgPEId cGetCertainOwner(StgClosure *mv);
void cRevalIO(StgClosure *job,StgPEId p);
StgPEId cGetHostOwner(StgByteArray h);
#endif /* DIST */
#endif /* __DIST_H */
|
