[project @ 2000-01-13 14:33:57 by hwloidl]

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

diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index 544bc76..e1a9f2c 100644 (file)
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.9 1999/02/05 16:02:20 simonm Exp $
+ * $Id: ClosureTypes.h,v 1.12 2000/01/13 14:34:00 hwloidl Exp $
  * 
  * (c) The GHC Team, 1998-1999
  *
@@ -62,17 +62,25 @@
 #define SEQ_FRAME              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 WEAK                   56
+#define FOREIGN                        57
+#define STABLE_NAME            58
+
+#define TSO                    59
+#define BLOCKED_FETCH          60
+#define FETCH_ME                61
+#define FETCH_ME_BQ             62
+#define RBH                     63
+
+#define EVACUATED               64
+
+#define N_CLOSURE_TYPES         65
 
 #endif CLOSURETYPES_H