X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FClosureFlags.c;h=260bf390d02796637376766c5e7721d39414792f;hp=5545693362e89b96557c8d03b73889659ed7a120;hb=a0be7e7ccd602efd9b7d35b3e0747a2c4f155ce9;hpb=ddf8b805caafdfb5e3bbc3356aaed66af6f0b5e9 diff --git a/rts/ClosureFlags.c b/rts/ClosureFlags.c index 5545693..260bf39 100644 --- a/rts/ClosureFlags.c +++ b/rts/ClosureFlags.c @@ -33,8 +33,6 @@ StgWord16 closure_flags[] = { /* CONSTR_2_0 = */ (_HNF| _NS ), /* CONSTR_1_1 = */ (_HNF| _NS ), /* CONSTR_0_2 = */ (_HNF| _NS ), -/* CONSTR_INTLIKE = */ (_HNF| _NS|_STA ), -/* CONSTR_CHARLIKE = */ (_HNF| _NS|_STA ), /* CONSTR_STATIC = */ (_HNF| _NS|_STA ), /* CONSTR_NOCAF_STATIC = */ (_HNF| _NS|_STA ), /* FUN = */ (_HNF| _NS| _SRT ), @@ -101,7 +99,6 @@ StgWord16 closure_flags[] = { /* CATCH_STM_FRAME = */ ( _BTM ) }; -#if N_CLOSURE_TYPES != 73 +#if N_CLOSURE_TYPES != 71 #error Closure types changed: update ClosureFlags.c! #endif -