1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team 1998-2005
5 * Interval timer for profiling and pre-emptive scheduling.
7 * ---------------------------------------------------------------------------*/
12 extern lnat getourtimeofday ( void );
15 extern void block_vtalrm_signal ( void );
16 extern void unblock_vtalrm_signal ( void );