1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team 1998-2005
5 * Interval timer for profiling and pre-emptive scheduling.
7 * ---------------------------------------------------------------------------*/
12 extern int startTicker( nat ms, TickProc handle_tick);
13 extern int stopTicker ( void );
15 extern lnat getourtimeofday ( void );
18 extern void block_vtalrm_signal ( void );
19 extern void unblock_vtalrm_signal ( void );