[project @ 2001-11-08 12:46:31 by simonmar]
[ghc-hetmet.git] / ghc / includes / ClosureTypes.h
index 65502a7..1d46c00 100644 (file)
@@ -1,6 +1,8 @@
 /* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.8 1999/02/05 15:25:01 simonm Exp $
+ * $Id: ClosureTypes.h,v 1.16 2001/07/23 17:23:19 simonmar Exp $
  * 
+ * (c) The GHC Team, 1998-1999
+ *
  * Closure Type Constants
  *
  * -------------------------------------------------------------------------- */
 #define IND_PERM               31
 #define IND_OLDGEN_PERM                32
 #define IND_STATIC             33
-#define CAF_UNENTERED           34
-#define CAF_ENTERED            35
-#define CAF_BLACKHOLE          36
-#define RET_BCO                 37
-#define RET_SMALL              38
-#define RET_VEC_SMALL          39
-#define RET_BIG                        40
-#define RET_VEC_BIG            41
-#define RET_DYN                        42
-#define UPDATE_FRAME           43
-#define CATCH_FRAME            44
-#define STOP_FRAME             45
-#define SEQ_FRAME              46
+#define RET_BCO                 36
+#define RET_SMALL              37
+#define RET_VEC_SMALL          38
+#define RET_BIG                        39
+#define RET_VEC_BIG            40
+#define RET_DYN                        41
+#define UPDATE_FRAME           42
+#define CATCH_FRAME            43
+#define STOP_FRAME             44
+#define SEQ_FRAME              45
+#define CAF_BLACKHOLE          46
 #define BLACKHOLE              47
 #define BLACKHOLE_BQ           48
-#define MVAR                   49
-#define ARR_WORDS              50
-#define MUT_ARR_PTRS           51
-#define MUT_ARR_PTRS_FROZEN     52
-#define MUT_VAR                        53
-#define WEAK                   54
-#define FOREIGN                        55
-#define STABLE_NAME            56
-#define TSO                    57
-#define BLOCKED_FETCH          58
-#define FETCH_ME                69
-#define EVACUATED               60
+#define SE_BLACKHOLE           49
+#define SE_CAF_BLACKHOLE       50
+#define MVAR                   51
+#define ARR_WORDS              52
+#define MUT_ARR_PTRS           53
+#define MUT_ARR_PTRS_FROZEN     54
+#define MUT_VAR                        55
+#define MUT_CONS                56
+#define WEAK                   57
+#define FOREIGN                        58
+#define STABLE_NAME            59
+
+#define TSO                    60
+#define BLOCKED_FETCH          61
+#define FETCH_ME                62
+#define FETCH_ME_BQ             63
+#define RBH                     64
+
+#define EVACUATED               65
+
+#define REMOTE_REF              66
+
+#define N_CLOSURE_TYPES         67
 
-#endif CLOSURETYPES_H
+#endif /* CLOSURETYPES_H */