X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FWeak.h;h=a931b054cc342beb16bcb8fec911b7e0b13a7338;hb=661c97c65e5fa47177502e592bb763f752b487ac;hp=4f60bf9ebd30e1d91165ca57875a6a0e1ef79859;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git diff --git a/rts/Weak.h b/rts/Weak.h index 4f60bf9..a931b05 100644 --- a/rts/Weak.h +++ b/rts/Weak.h @@ -11,6 +11,8 @@ #include "Capability.h" +BEGIN_RTS_PRIVATE + extern rtsBool running_finalizers; extern StgWeak * weak_ptr_list; @@ -19,5 +21,7 @@ void runAllCFinalizers(StgWeak *w); void scheduleFinalizers(Capability *cap, StgWeak *w); void markWeakList(void); +END_RTS_PRIVATE + #endif /* WEAK_H */