X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=inline;f=rts%2Fsm%2FGC.h;h=cddba0099e204425fbf4f1768f87564da15a3831;hb=754e039a8a15d5774fe73872ff9ac593b46370e0;hp=4b928e9bfa18819558072132a231d833162bb295;hpb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;p=ghc-hetmet.git diff --git a/rts/sm/GC.h b/rts/sm/GC.h index 4b928e9..cddba00 100644 --- a/rts/sm/GC.h +++ b/rts/sm/GC.h @@ -26,14 +26,10 @@ void markCAFs ( evac_fn evac, void *user ); extern nat N; extern rtsBool major_gc; -extern bdescr *mark_stack_bdescr; -extern StgPtr *mark_stack; -extern StgPtr *mark_sp; -extern StgPtr *mark_splim; - -extern rtsBool mark_stack_overflowed; -extern bdescr *oldgen_scan_bd; -extern StgPtr oldgen_scan; +extern bdescr *mark_stack_bd; +extern bdescr *mark_stack_top_bd; +extern StgPtr mark_sp; +extern StgPtr mark_splim; extern long copied;