X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FClosureTypes.h;h=f8840264f374776ac616ca03db5c507517dfb722;hb=86f2671b37507012692a53c2fe45357b0988cb40;hp=18e94489b9d12bd71c5a3e7e600fabcfcab3bc4f;hpb=da69fa9c5047c5b0d05bdb05eaddefa1eb5d5a36;p=ghc-hetmet.git

diff --git a/ghc/includes/ClosureTypes.h b/ghc/includes/ClosureTypes.h
index 18e9448..f884026 100644
--- a/ghc/includes/ClosureTypes.h
+++ b/ghc/includes/ClosureTypes.h
@@ -76,23 +76,24 @@
 #define MUT_ARR_PTRS_DIRTY      52
 #define MUT_ARR_PTRS_FROZEN0    53
 #define MUT_ARR_PTRS_FROZEN     54
-#define MUT_VAR		        55
-#define WEAK		        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 TVAR_WAIT_QUEUE         65
-#define TVAR                    66
-#define TREC_CHUNK              67
-#define TREC_HEADER             68
-#define ATOMICALLY_FRAME        69
-#define CATCH_RETRY_FRAME       70
-#define CATCH_STM_FRAME         71
-#define N_CLOSURE_TYPES         72
+#define MUT_VAR_CLEAN	        55
+#define MUT_VAR_DIRTY	        56
+#define WEAK		        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 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 */