Declare RTS-private prototypes with __attribute__((visibility("hidden")))

[ghc-hetmet.git] / rts / RtsUtils.h

diff --git a/rts/RtsUtils.h b/rts/RtsUtils.h
index 241cbf3..a47f953 100644 (file)
--- a/rts/RtsUtils.h
+++ b/rts/RtsUtils.h
@@ -9,6 +9,8 @@
 #ifndef RTSUTILS_H
 #define RTSUTILS_H
 
+#pragma GCC visibility push(hidden)
+
 /* -----------------------------------------------------------------------------
  * (Checked) dynamic allocation
  * -------------------------------------------------------------------------- */
@@ -49,4 +51,6 @@ int genericRaise(int sig);
 
 int rts_isProfiled(void);
 
+#pragma GCC visibility pop
+
 #endif /* RTSUTILS_H */