X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FMarkWeak.h;h=64ccb0f027f03971f78c4000e6fedbbdd073a165;hb=bef3da1e26639303fccbf26c312d2833eedb486e;hp=c586ba1cc2977261dbc7777448f54eec30269c08;hpb=a370654a872838c43e63bdd6cc279c0ee9913cdf;p=ghc-hetmet.git diff --git a/rts/sm/MarkWeak.h b/rts/sm/MarkWeak.h index c586ba1..64ccb0f 100644 --- a/rts/sm/MarkWeak.h +++ b/rts/sm/MarkWeak.h @@ -11,10 +11,19 @@ * * ---------------------------------------------------------------------------*/ +#ifndef SM_MARKWEAK_H +#define SM_MARKWEAK_H + +#include "BeginPrivate.h" + extern StgWeak *old_weak_ptr_list; extern StgTSO *resurrected_threads; +extern StgTSO *exception_threads; void initWeakForGC ( void ); rtsBool traverseWeakPtrList ( void ); void markWeakPtrList ( void ); -rtsBool traverseBlackholeQueue ( void ); + +#include "EndPrivate.h" + +#endif /* SM_MARKWEAK_H */