X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.h;h=38fc87ca4465b806d3959bea11c72a2f4af96482;hb=26f4bfc82f2b2359259578e9c54d476fc2de650f;hp=cddba0099e204425fbf4f1768f87564da15a3831;hpb=754e039a8a15d5774fe73872ff9ac593b46370e0;p=ghc-hetmet.git diff --git a/rts/sm/GC.h b/rts/sm/GC.h index cddba00..38fc87c 100644 --- a/rts/sm/GC.h +++ b/rts/sm/GC.h @@ -14,7 +14,7 @@ #ifndef SM_GC_H #define SM_GC_H -BEGIN_RTS_PRIVATE +#include "BeginPrivate.h" void GarbageCollect(rtsBool force_major_gc, nat gc_type, Capability *cap); @@ -29,7 +29,6 @@ extern rtsBool major_gc; extern bdescr *mark_stack_bd; extern bdescr *mark_stack_top_bd; extern StgPtr mark_sp; -extern StgPtr mark_splim; extern long copied; @@ -54,6 +53,6 @@ void releaseGCThreads (Capability *cap); #define WORK_UNIT_WORDS 128 -END_RTS_PRIVATE +#include "EndPrivate.h" #endif /* SM_GC_H */