X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FTimer.h;h=1fe857d9692b600ed27a971b76acc18aa88db3d2;hp=ae26653462b82006b3a0e33a308384175d1c122e;hb=9da4639011348fb6c318e3cba4b08622f811d9c4;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1 diff --git a/rts/Timer.h b/rts/Timer.h index ae26653..1fe857d 100644 --- a/rts/Timer.h +++ b/rts/Timer.h @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * (c) The GHC Team, 1995-2005 + * (c) The GHC Team, 1995-2006 * * Interval timer service for profiling and pre-emptive scheduling. * @@ -9,16 +9,9 @@ #ifndef TIMER_H #define TIMER_H -# define TICK_MILLISECS (1000/TICK_FREQUENCY) /* ms per tick */ - -/* Context switch timing constants. Context switches happen after a - * whole number of ticks, the default being every tick. - */ -#define CS_MIN_MILLISECS TICK_MILLISECS /* milliseconds per slice */ - typedef void (*TickProc)(int); -extern int startTimer(nat ms); +extern int startTimer(void); extern int stopTimer(void); #endif /* TIMER_H */