X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTicker.h;h=37c2696537ae86d2d0f71a582ba7144bca42df69;hb=81c95f7d9854521a568179bb19199299835b7a53;hp=b06890a049aec5e2d0f9bd0a062df12fa230c7a4;hpb=e30aca19def5c629a8429bd57e56535b7f8f85c8;p=ghc-hetmet.git

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