X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FMarkWeak.h;h=64ccb0f027f03971f78c4000e6fedbbdd073a165;hb=cd47700887365ca2a6af17d03e731efce65cf2ac;hp=7b3a806857c6a5f9ed064eb2151fab1427d290d4;hpb=e7987f16175f88daa11f06f25d10161a95f84bc4;p=ghc-hetmet.git diff --git a/rts/sm/MarkWeak.h b/rts/sm/MarkWeak.h index 7b3a806..64ccb0f 100644 --- a/rts/sm/MarkWeak.h +++ b/rts/sm/MarkWeak.h @@ -11,6 +11,11 @@ * * ---------------------------------------------------------------------------*/ +#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; @@ -18,4 +23,7 @@ extern StgTSO *exception_threads; void initWeakForGC ( void ); rtsBool traverseWeakPtrList ( void ); void markWeakPtrList ( void ); -rtsBool traverseBlackholeQueue ( void ); + +#include "EndPrivate.h" + +#endif /* SM_MARKWEAK_H */