X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FTicker.h;h=a39e7d69c1daba5a4a4991b2fd11e4e9419aec11;hp=f9555768b5bcbe4b3bf391235721c0900f9cac64;hb=c004ec62b41aa2137b5b5e298ca562609b0de92e;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1 diff --git a/rts/Ticker.h b/rts/Ticker.h index f955576..a39e7d6 100644 --- a/rts/Ticker.h +++ b/rts/Ticker.h @@ -2,14 +2,18 @@ * * (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 ); +typedef void (*TickProc)(int); + +extern void initTicker (nat ms, TickProc handle_tick); +extern void startTicker (void); +extern void stopTicker (void); +extern void exitTicker (void); #endif /* TICKER_H */