X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosureTypes.h;h=680958f2ead8ef2a53d59c116542afeceb7a0925;hb=67eedc225a7e9af8575705af7ce6e998cf5ea6bd;hp=65502a73db0d07d416a532ed594a64db67382fcc;hpb=a5dc9cdae04f5e0c1f2d13a53bb06c52f0a8c8c9;p=ghc-hetmet.git

diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index 65502a7..680958f 100644
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -1,6 +1,8 @@
 /* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.8 1999/02/05 15:25:01 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,32 +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_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 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 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 */