X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FMarkWeak.h;h=64ccb0f027f03971f78c4000e6fedbbdd073a165;hb=f61d53d322cdf81a1cfa09cf4a4af4198611bcd5;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 */