1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 1998-2008
7 * ---------------------------------------------------------------------------*/
9 /* -------------------------------------------------------------------------
10 Generally useful typedefs
11 ------------------------------------------------------------------------- */
16 typedef unsigned int nat; /* at least 32 bits (like int) */
17 typedef unsigned long lnat; /* at least 32 bits */
19 typedef unsigned long long ullong; /* at least 32 bits */
20 typedef long long llong;
22 typedef unsigned __int64 ullong; /* at least 32 bits */
23 typedef __int64 llong;
26 /* ullong (64|128-bit) type: only include if needed (not ANSI) */
39 Types specific to the parallel runtime system.
42 typedef ullong rtsTime;
45 /* types only needed in the parallel system */
46 typedef struct hashtable ParHashTable;
47 typedef struct hashlist ParHashList;
49 /* typedef double REAL_TIME; */
50 /* typedef W_ TIME; */
51 /* typedef GlobalTaskId Proc; */
52 typedef int GlobalTaskId;
53 typedef GlobalTaskId PEs;
54 typedef unsigned int rtsWeight;
55 typedef int rtsPacket;
58 /* Global addresses i.e. unique ids in a parallel setup; needed in Closures.h*/
81 * GlobalTaskId is dummy in GranSim;
82 * we define it to have cleaner code in the RTS
84 typedef int GlobalTaskId;
90 #endif /* RTS_TYPES_H */