X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FMarkWeak.h;h=018dd6cd798cbc90cf71de6f4060b4a07b8eee3f;hb=6cf8982ac30be6836a0cdd8be5a6ac1a1a144213;hp=7fd81e536bf432d2927bd43cb2b40f940453672d;hpb=7d7c187b4a12f1bb350e85cdb0115e19537cc704;p=ghc-hetmet.git diff --git a/rts/sm/MarkWeak.h b/rts/sm/MarkWeak.h index 7fd81e5..018dd6c 100644 --- a/rts/sm/MarkWeak.h +++ b/rts/sm/MarkWeak.h @@ -14,7 +14,7 @@ #ifndef SM_MARKWEAK_H #define SM_MARKWEAK_H -#pragma GCC visibility push(hidden) +BEGIN_RTS_PRIVATE extern StgWeak *old_weak_ptr_list; extern StgTSO *resurrected_threads; @@ -25,6 +25,6 @@ rtsBool traverseWeakPtrList ( void ); void markWeakPtrList ( void ); rtsBool traverseBlackholeQueue ( void ); -#pragma GCC visibility pop +END_RTS_PRIVATE #endif /* SM_MARKWEAK_H */