[project @ 2002-06-19 20:45:14 by sof]

[ghc-hetmet.git] / ghc / includes / ClosureTypes.h

diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index 24d4189..680958f 100644 (file)
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -1,6 +1,8 @@
 /* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.7 1999/01/26 16:16:19 simonm Exp $
+ * $Id: ClosureTypes.h,v 1.17 2002/03/26 11:09:34 simonmar Exp $
  * 
+ * (c) The GHC Team, 1998-1999
+ *
  * Closure Type Constants
  *
  * -------------------------------------------------------------------------- */
@@ -45,33 +47,37 @@
 #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 BLACKHOLE              47
-#define BLACKHOLE_BQ           48
+#define RET_BCO                 34
+#define RET_SMALL              35
+#define RET_VEC_SMALL          36
+#define RET_BIG                        37
+#define RET_VEC_BIG            38
+#define RET_DYN                        39
+#define UPDATE_FRAME           40
+#define CATCH_FRAME            41
+#define STOP_FRAME             42
+#define SEQ_FRAME              43
+#define CAF_BLACKHOLE          44
+#define BLACKHOLE              45
+#define BLACKHOLE_BQ           46
+#define SE_BLACKHOLE           47
+#define SE_CAF_BLACKHOLE       48
 #define MVAR                   49
 #define ARR_WORDS              50
-#define MUT_ARR_WORDS          51
-#define MUT_ARR_PTRS           52
-#define MUT_ARR_PTRS_FROZEN     53
-#define MUT_VAR                        54
+#define MUT_ARR_PTRS           51
+#define MUT_ARR_PTRS_FROZEN     52
+#define MUT_VAR                        53
+#define MUT_CONS                54
 #define WEAK                   55
 #define FOREIGN                        56
 #define STABLE_NAME            57
 #define TSO                    58
 #define BLOCKED_FETCH          59
 #define FETCH_ME                60
-#define EVACUATED               61
+#define FETCH_ME_BQ             61
+#define RBH                     62
+#define EVACUATED               63
+#define REMOTE_REF              64
+#define N_CLOSURE_TYPES         65
 
-#endif CLOSURETYPES_H
+#endif /* CLOSURETYPES_H */