X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FTicker.h;h=5804501da59d7d76c565f2e74d28d0bc2640eb95;hp=b06890a049aec5e2d0f9bd0a062df12fa230c7a4;hb=cf5905ea24904cf73a041fd7535e8723a668cb9a;hpb=e30aca19def5c629a8429bd57e56535b7f8f85c8 diff --git a/rts/Ticker.h b/rts/Ticker.h index b06890a..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 void startTicker( nat ms, TickProc handle_tick ); -extern void 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 */