X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FTimer.h;h=59b695cac27d8eebdff8a28d7642a391f5eba12c;hp=ae26653462b82006b3a0e33a308384175d1c122e;hb=f7963d3f11e67375b8c6ecbd71e56f0d0ac262dd;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1

diff --git a/rts/Timer.h b/rts/Timer.h
index ae26653..59b695c 100644
--- a/rts/Timer.h
+++ b/rts/Timer.h
@@ -1,24 +1,17 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team, 1995-2005
+ * (c) The GHC Team, 1995-2006
  *
- * Interval timer service for profiling and pre-emptive scheduling.
+ * Interface to the RTS timer signal (uses OS-dependent Ticker.h underneath)
  *
  * ---------------------------------------------------------------------------*/
 
 #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 stopTimer(void);
+extern void initTimer(void);
+extern void startTimer(void);
+extern void stopTimer(void);
+extern void exitTimer(void);
 
 #endif /* TIMER_H */