X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosureTypes.h;h=3e2b7cfe6e5352cd5c64cd6e29adaec7b88ee5b3;hb=caa7c91dd13a69110a55d68b61967f8239de15ce;hp=ebb14373f412c43cd200d2ad9c004d2ee796c139;hpb=20fc2f0ced64a12d8e44956931b2ac341ed2186f;p=ghc-hetmet.git

diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index ebb1437..3e2b7cf 100644
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: ClosureTypes.h,v 1.15 2001/03/22 03:51:09 hwloidl Exp $
+ * $Id: ClosureTypes.h,v 1.20 2005/02/10 13:02:02 simonmar Exp $
  * 
  * (c) The GHC Team, 1998-1999
  *
@@ -40,47 +40,52 @@
 #define THUNK_STATIC	        24
 #define THUNK_SELECTOR	        25
 #define BCO		        26
-#define AP_UPD		        27
+#define AP		        27
 #define PAP			28
-#define IND		        29
-#define IND_OLDGEN	        30
-#define IND_PERM	        31
-#define IND_OLDGEN_PERM	        32
-#define IND_STATIC	        33
-#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 AP_STACK                29
+#define IND		        30
+#define IND_OLDGEN	        31
+#define IND_PERM	        32
+#define IND_OLDGEN_PERM	        33
+#define IND_STATIC	        34
+#define RET_BCO                 35
+#define RET_SMALL	        36
+#define RET_VEC_SMALL	        37
+#define RET_BIG		        38
+#define RET_VEC_BIG	        39
+#define RET_DYN		        40
+#define RET_FUN                 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 SE_BLACKHOLE		49
-#define SE_CAF_BLACKHOLE	50
-#define MVAR		        51
-#define ARR_WORDS	        52
-#define MUT_ARR_PTRS	        53
+#define CAF_BLACKHOLE		45
+#define BLACKHOLE	        46
+#define BLACKHOLE_BQ	        47
+#define SE_BLACKHOLE		48
+#define SE_CAF_BLACKHOLE	49
+#define MVAR		        50
+#define ARR_WORDS	        51
+#define MUT_ARR_PTRS	        52
+#define MUT_ARR_PTRS_FROZEN0    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 REMOTE_REF              65
-
-#define N_CLOSURE_TYPES         66
+#define TVAR_WAIT_QUEUE         66
+#define TVAR                    67
+#define TREC_CHUNK              68
+#define TREC_HEADER             69
+#define ATOMICALLY_FRAME        70
+#define CATCH_RETRY_FRAME       71
+#define CATCH_STM_FRAME         72
+#define N_CLOSURE_TYPES         73
 
 #endif /* CLOSURETYPES_H */