X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FItimer.h;h=47fbbb6fb90cb0bc4a16394c341374a51de690d2;hb=593d142d840df09f64b2e8a24f19a298122e27a3;hp=e415074d867747db63c71d18275f228e7731bd76;hpb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;p=ghc-hetmet.git diff --git a/ghc/rts/Itimer.h b/ghc/rts/Itimer.h index e415074..47fbbb6 100644 --- a/ghc/rts/Itimer.h +++ b/ghc/rts/Itimer.h @@ -1,15 +1,20 @@ /* ----------------------------------------------------------------------------- - * $Id: Itimer.h,v 1.2 1998/12/02 13:28:28 simonm Exp $ * - * (c) The GHC Team 1998 + * (c) The GHC Team 1998-2001 * * Interval timer for profiling and pre-emptive scheduling. * * ---------------------------------------------------------------------------*/ +#ifndef __ITIMER_H__ +#define __ITIMER_H__ -nat initialize_virtual_timer ( nat ms ); -int install_vtalrm_handler ( void (*handler)(int) ); -void block_vtalrm_signal ( void ); -void unblock_vtalrm_signal ( void ); - +extern int startTicker( nat ms, TickProc handle_tick); +extern int stopTicker ( void ); +extern nat getourtimeofday ( void ); +#if 0 +/* unused */ +extern void block_vtalrm_signal ( void ); +extern void unblock_vtalrm_signal ( void ); +#endif +#endif /* __ITIMER_H__ */