X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.h;h=e871f4c56c57b8b187cd95307f24ca886214b8db;hb=2aa633c256760cef04bc388f817a28436f1e3865;hp=4b928e9bfa18819558072132a231d833162bb295;hpb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;p=ghc-hetmet.git diff --git a/rts/sm/GC.h b/rts/sm/GC.h index 4b928e9..e871f4c 100644 --- a/rts/sm/GC.h +++ b/rts/sm/GC.h @@ -26,14 +26,9 @@ 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 long copied;