[project @ 1999-02-05 15:25:01 by simonm]
[ghc-hetmet.git] / ghc / includes / ClosureTypes.h
1 /* ----------------------------------------------------------------------------
2  * $Id: ClosureTypes.h,v 1.8 1999/02/05 15:25:01 simonm Exp $
3  * 
4  * Closure Type Constants
5  *
6  * -------------------------------------------------------------------------- */
7
8 #ifndef CLOSURETYPES_H
9 #define CLOSURETYPES_H
10
11 /* Out here because the native code generator needs to get at them. */
12
13 /* Object tag 0 raises an internal error */
14 #define INVALID_OBJECT          0
15 #define CONSTR                  1
16 #define CONSTR_1_0              2
17 #define CONSTR_0_1              3
18 #define CONSTR_2_0              4
19 #define CONSTR_1_1              5
20 #define CONSTR_0_2              6
21 #define CONSTR_INTLIKE          7 
22 #define CONSTR_CHARLIKE         8 
23 #define CONSTR_STATIC           9 
24 #define CONSTR_NOCAF_STATIC     10
25 #define FUN                     11
26 #define FUN_1_0                 12
27 #define FUN_0_1                 13
28 #define FUN_2_0                 14
29 #define FUN_1_1                 15
30 #define FUN_0_2                 16
31 #define FUN_STATIC              17
32 #define THUNK                   18
33 #define THUNK_1_0               19
34 #define THUNK_0_1               20
35 #define THUNK_2_0               21
36 #define THUNK_1_1               22
37 #define THUNK_0_2               23
38 #define THUNK_STATIC            24
39 #define THUNK_SELECTOR          25
40 #define BCO                     26
41 #define AP_UPD                  27
42 #define PAP                     28
43 #define IND                     29
44 #define IND_OLDGEN              30
45 #define IND_PERM                31
46 #define IND_OLDGEN_PERM         32
47 #define IND_STATIC              33
48 #define CAF_UNENTERED           34
49 #define CAF_ENTERED             35
50 #define CAF_BLACKHOLE           36
51 #define RET_BCO                 37
52 #define RET_SMALL               38
53 #define RET_VEC_SMALL           39
54 #define RET_BIG                 40
55 #define RET_VEC_BIG             41
56 #define RET_DYN                 42
57 #define UPDATE_FRAME            43
58 #define CATCH_FRAME             44
59 #define STOP_FRAME              45
60 #define SEQ_FRAME               46
61 #define BLACKHOLE               47
62 #define BLACKHOLE_BQ            48
63 #define MVAR                    49
64 #define ARR_WORDS               50
65 #define MUT_ARR_PTRS            51
66 #define MUT_ARR_PTRS_FROZEN     52
67 #define MUT_VAR                 53
68 #define WEAK                    54
69 #define FOREIGN                 55
70 #define STABLE_NAME             56
71 #define TSO                     57
72 #define BLOCKED_FETCH           58
73 #define FETCH_ME                69
74 #define EVACUATED               60
75
76 #endif CLOSURETYPES_H