1 /* -----------------------------------------------------------------------------
2 * $Id: Itimer.h,v 1.2 1998/12/02 13:28:28 simonm Exp $
4 * (c) The GHC Team 1998
6 * Interval timer for profiling and pre-emptive scheduling.
8 * ---------------------------------------------------------------------------*/
10 nat initialize_virtual_timer ( nat ms );
11 int install_vtalrm_handler ( void (*handler)(int) );
12 void block_vtalrm_signal ( void );
13 void unblock_vtalrm_signal ( void );