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

diff --git a/rts/Ticker.h b/rts/Ticker.h
index f955576..3e62622 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 );
+BEGIN_RTS_PRIVATE
+
+typedef void (*TickProc)(int);
+
+void initTicker  (nat ms, TickProc handle_tick);
+void startTicker (void);
+void stopTicker  (void);
+void exitTicker  (void);
+
+END_RTS_PRIVATE
 
 #endif /* TICKER_H */