diff options
Diffstat (limited to 'rts/ClosureFlags.c')
| -rw-r--r-- | rts/ClosureFlags.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/rts/ClosureFlags.c b/rts/ClosureFlags.c index 41810f4025..0ab8b45669 100644 --- a/rts/ClosureFlags.c +++ b/rts/ClosureFlags.c @@ -37,14 +37,14 @@ StgWord16 closure_flags[] = { [FUN_1_1] = (_HNF| _NS| _SRT ), [FUN_0_2] = (_HNF| _NS| _SRT ), [FUN_STATIC] = (_HNF| _NS|_STA| _SRT ), - [THUNK] = ( _BTM| _THU| _SRT ), - [THUNK_1_0] = ( _BTM| _THU| _SRT ), - [THUNK_0_1] = ( _BTM| _THU| _SRT ), - [THUNK_2_0] = ( _BTM| _THU| _SRT ), - [THUNK_1_1] = ( _BTM| _THU| _SRT ), - [THUNK_0_2] = ( _BTM| _THU| _SRT ), - [THUNK_STATIC] = ( _BTM| _STA|_THU| _SRT ), - [THUNK_SELECTOR] = ( _BTM| _THU| _SRT ), + [THUNK] = ( _THU| _SRT ), + [THUNK_1_0] = ( _THU| _SRT ), + [THUNK_0_1] = ( _THU| _SRT ), + [THUNK_2_0] = ( _THU| _SRT ), + [THUNK_1_1] = ( _THU| _SRT ), + [THUNK_0_2] = ( _THU| _SRT ), + [THUNK_STATIC] = ( _STA|_THU| _SRT ), + [THUNK_SELECTOR] = ( _THU| _SRT ), [BCO] = (_HNF| _NS ), [AP] = ( _THU ), [PAP] = (_HNF| _NS ), @@ -52,7 +52,7 @@ StgWord16 closure_flags[] = { [IND] = ( _NS| _IND ), [IND_PERM] = ( _NS| _IND ), [IND_STATIC] = ( _NS|_STA| _IND ), - [RET_BCO] = ( _BTM ), + [RET_BCO] = ( 0 ), [RET_SMALL] = ( _BTM| _SRT ), [RET_BIG] = ( _SRT ), [RET_DYN] = ( _SRT ), |