diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-08-03 20:21:51 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-08-03 20:21:51 +0000 |
| commit | 02ec05e6564d9bbb536c5c0f3cd3c1b5503e3aea (patch) | |
| tree | eb837b91f992ab7a7da4ec255528049c1e5895c5 /rts/ClosureFlags.c | |
| parent | 9b266fba8f18f9f8a469bbe0b51b80a91217f1ab (diff) | |
| download | haskell-02ec05e6564d9bbb536c5c0f3cd3c1b5503e3aea.tar.gz | |
remove the GUM closure types
Diffstat (limited to 'rts/ClosureFlags.c')
| -rw-r--r-- | rts/ClosureFlags.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/rts/ClosureFlags.c b/rts/ClosureFlags.c index bbe0e8ffed..477a892594 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 |