mirrored from https://gitlab.haskell.org/ghc/ghc.git
-
Notifications
You must be signed in to change notification settings - Fork 705
/
ParTypes.h
38 lines (30 loc) · 845 Bytes
/
ParTypes.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
/* ---------------------------------------------------------------------------
* Time-stamp: <Tue Nov 09 1999 16:31:38 Stardate: [-30]3873.44 hwloidl>
*
* Runtime system types for GUM
*
* ------------------------------------------------------------------------- */
#ifndef PARTYPES_H
#define PARTYPES_H
#ifdef PAR /* all of it */
// now in Parallel.h
//typedef struct hashtable HashTable;
//typedef struct hashlist HashList;
/* Global addresses now live in Parallel.h (needed in Closures.h) */
// gaddr
// now in Parallel.h
/* (GA, LA) pairs
typedef struct gala {
globalAddr ga;
StgPtr la;
struct gala *next;
rtsBool preferred;
} rtsGaLa;
*/
#if defined(GRAN)
typedef unsigned long TIME;
typedef unsigned char Proc;
typedef unsigned char EVTTYPE;
#endif
#endif /* PAR */
#endif /* ! PARTYPES_H */