X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTicker.h;h=159820d39963e93ddfcdf82d0324c403e2df295a;hb=a5288c551349a0adab0d931a429b10a096d9444d;hp=f9555768b5bcbe4b3bf391235721c0900f9cac64;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/rts/Ticker.h b/rts/Ticker.h
index f955576..159820d 100644
--- a/rts/Ticker.h
+++ b/rts/Ticker.h
@@ -2,14 +2,22 @@
  *
  * (c) The GHC Team 2005
  *
- * Ticker interface (implementation is OS-specific)
+ * Interface to the OS-specific implementation of a regular time signal.
  *
  * ---------------------------------------------------------------------------*/
 
 #ifndef TICKER_H
 #define TICKER_H
 
-extern int  startTicker( nat ms, TickProc handle_tick );
-extern int  stopTicker ( void );
+#pragma GCC visibility push(hidden)
+
+typedef void (*TickProc)(int);
+
+void initTicker  (nat ms, TickProc handle_tick);
+void startTicker (void);
+void stopTicker  (void);
+void exitTicker  (void);
+
+#pragma GCC visibility pop
 
 #endif /* TICKER_H */