X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FClosureFlags.c;h=477a892594f3b7c5474d97d1f8e5e3be20230de1;hb=4a445641a0c9e44a9c9e2916a45553c0ccb16a70;hp=bbe0e8ffed52f80aedb9baa8a61742c38b07bda1;hpb=9b266fba8f18f9f8a469bbe0b51b80a91217f1ab;p=ghc-hetmet.git

diff --git a/rts/ClosureFlags.c b/rts/ClosureFlags.c
index bbe0e8f..477a892 100644
--- a/rts/ClosureFlags.c
+++ b/rts/ClosureFlags.c
@@ -76,11 +76,6 @@ StgWord16 closure_flags[] = {
  [WEAK]		   	=  (_HNF|     _NS|              _UPT           ),
  [STABLE_NAME]	   	=  (_HNF|     _NS|              _UPT           ),
  [TSO]                 	=  (_HNF|     _NS|         _MUT|_UPT           ),
- [BLOCKED_FETCH]	=  (_HNF|     _NS|         _MUT|_UPT           ),
- [FETCH_ME]		=  (_HNF|     _NS|         _MUT|_UPT           ),
- [FETCH_ME_BQ]          =  ( 	      _NS|         _MUT|_UPT           ),
- [RBH]                  =  ( 	      _NS|         _MUT|_UPT           ),
- [REMOTE_REF]		=  (_HNF|     _NS|              _UPT           ),
  [TVAR_WATCH_QUEUE]     =  (          _NS|         _MUT|_UPT           ),
  [INVARIANT_CHECK_QUEUE]=  (          _NS|         _MUT|_UPT           ),
  [ATOMIC_INVARIANT]     =  (          _NS|         _MUT|_UPT           ),
@@ -93,6 +88,6 @@ StgWord16 closure_flags[] = {
  [WHITEHOLE]		=  ( 0                                         )
 };
 
-#if N_CLOSURE_TYPES != 70
+#if N_CLOSURE_TYPES != 65
 #error Closure types changed: update ClosureFlags.c!
 #endif