X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTicker.h;h=5804501da59d7d76c565f2e74d28d0bc2640eb95;hb=7d9eb2e45b4a9ff4cb053b1ec37602be88528b62;hp=f9555768b5bcbe4b3bf391235721c0900f9cac64;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git diff --git a/rts/Ticker.h b/rts/Ticker.h index f955576..5804501 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 ); +#include "BeginPrivate.h" + +typedef void (*TickProc)(int); + +void initTicker (nat ms, TickProc handle_tick); +void startTicker (void); +void stopTicker (void); +void exitTicker (rtsBool wait); + +#include "EndPrivate.h" #endif /* TICKER_H */