X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSanity.h;h=96ac6c534f7bf32be361783c740805ce6cef184d;hb=6cf8982ac30be6836a0cdd8be5a6ac1a1a144213;hp=f27c395c44ca7c097dcae4d657fe6763cec26da0;hpb=7d7c187b4a12f1bb350e85cdb0115e19537cc704;p=ghc-hetmet.git

diff --git a/rts/Sanity.h b/rts/Sanity.h
index f27c395..96ac6c5 100644
--- a/rts/Sanity.h
+++ b/rts/Sanity.h
@@ -11,7 +11,7 @@
 
 #ifdef DEBUG
 
-#pragma GCC visibility push(hidden)
+BEGIN_RTS_PRIVATE
 
 # if defined(PAR)
 # define PVM_PE_MASK    0xfffc0000
@@ -36,7 +36,7 @@ void checkMutableLists ( rtsBool checkTSOs );
 
 void checkBQ (StgTSO *bqe, StgClosure *closure);
 
-#pragma GCC visibility pop
+END_RTS_PRIVATE
 
 #endif /* DEBUG */