Remove vectored returns.

[ghc-hetmet.git] / rts / ClosureFlags.c

diff --git a/rts/ClosureFlags.c b/rts/ClosureFlags.c
index 260bf39..5a34c5e 100644 (file)
--- a/rts/ClosureFlags.c
+++ b/rts/ClosureFlags.c
@@ -61,9 +61,7 @@ StgWord16 closure_flags[] = {
 /* IND_STATIC          = */ (          _NS|_STA|                   _IND ),
 /* RET_BCO             = */ (     _BTM                                  ),
 /* RET_SMALL           = */ (     _BTM|                       _SRT      ),
-/* RET_VEC_SMALL       = */ (     _BTM|                       _SRT      ),
 /* RET_BIG             = */ (                                 _SRT      ),
-/* RET_VEC_BIG         = */ (                                 _SRT      ),
 /* RET_DYN             = */ (                                 _SRT      ),
 /* RET_FUN             = */ ( 0                                         ),
 /* UPDATE_FRAME                = */ (     _BTM                                  ),
@@ -90,7 +88,9 @@ StgWord16 closure_flags[] = {
 /* RBH                  = */ (                 _NS|         _MUT|_UPT           ),
 /* EVACUATED           = */ ( 0                                         ),
 /* REMOTE_REF          = */ (_HNF|     _NS|              _UPT           ),
-/* TVAR_WAIT_QUEUE      = */ (          _NS|         _MUT|_UPT           ),
+/* TVAR_WATCH_QUEUE     = */ (          _NS|         _MUT|_UPT           ),
+/* INVARIANT_CHECK_QUEUE= */ (          _NS|         _MUT|_UPT           ),
+/* ATOMIC_INVARIANT     = */ (          _NS|         _MUT|_UPT           ),
 /* TVAR                 = */ (_HNF|     _NS|         _MUT|_UPT           ), 
 /* TREC_CHUNK           = */ (          _NS|         _MUT|_UPT           ),
 /* TREC_HEADER          = */ (          _NS|         _MUT|_UPT           ),