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

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

diff --git a/rts/Ticker.h b/rts/Ticker.h
index a39e7d6..159820d 100644 (file)
--- a/rts/Ticker.h
+++ b/rts/Ticker.h
@@ -9,11 +9,15 @@
 #ifndef TICKER_H
 #define TICKER_H
 
+#pragma GCC visibility push(hidden)
+
 typedef void (*TickProc)(int);
 
-extern void initTicker  (nat ms, TickProc handle_tick);
-extern void startTicker (void);
-extern void stopTicker  (void);
-extern void exitTicker  (void);
+void initTicker  (nat ms, TickProc handle_tick);
+void startTicker (void);
+void stopTicker  (void);
+void exitTicker  (void);
+
+#pragma GCC visibility pop
 
 #endif /* TICKER_H */