[project @ 2002-12-05 23:49:43 by mthomas]
[ghc-hetmet.git] / ghc / rts / Itimer.h
1 /* -----------------------------------------------------------------------------
2  * $Id: Itimer.h,v 1.10 2001/11/27 01:51:23 sof Exp $
3  *
4  * (c) The GHC Team 1998-2001
5  *
6  * Interval timer for profiling and pre-emptive scheduling.
7  *
8  * ---------------------------------------------------------------------------*/
9
10 # define TICK_FREQUENCY   50                      /* ticks per second */
11 # define TICK_MILLISECS   (1000/TICK_FREQUENCY)   /* ms per tick */
12
13 /* Context switch timing constants. Context switches happen after a
14  * whole number of ticks, the default being every tick.
15  */
16 #define CS_MIN_MILLISECS TICK_MILLISECS       /* milliseconds per slice */
17  
18 int  startVirtTimer( nat ms );
19 int  stopVirtTimer ( void );
20 void block_vtalrm_signal       ( void );
21 void unblock_vtalrm_signal     ( void );
22 unsigned int getourtimeofday   ( void );