summaryrefslogtreecommitdiff
path: root/rts/RetainerProfile.h
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-09-09 09:32:17 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-09-09 09:32:17 +0000
commit9a9803e8dc80ba41bd3e2d31228e64fa6b61060e (patch)
tree7a31b6abc9b585771bd88df29e8502bb0e5da31b /rts/RetainerProfile.h
parentb25c93f1c914d81d77aeafeb49263f29bed128aa (diff)
downloadhaskell-9a9803e8dc80ba41bd3e2d31228e64fa6b61060e.tar.gz
Omit visibility pragmas on Windows (fixes warnings/validate failures)
Diffstat (limited to 'rts/RetainerProfile.h')
-rw-r--r--rts/RetainerProfile.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RetainerProfile.h b/rts/RetainerProfile.h
index 7278dc7465..9736eeb8d6 100644
--- a/rts/RetainerProfile.h
+++ b/rts/RetainerProfile.h
@@ -14,7 +14,7 @@
#include "RetainerSet.h"
-#pragma GCC visibility push(hidden)
+BEGIN_RTS_PRIVATE
void initRetainerProfiling ( void );
void endRetainerProfiling ( void );
@@ -43,7 +43,7 @@ retainerSetOf( StgClosure *c )
extern lnat retainerStackBlocks ( void );
#endif
-#pragma GCC visibility pop
+END_RTS_PRIVATE
#endif /* PROFILING */