X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FItimer.h;h=3e41e49a7b95f63279263affa22a244c77d9ad0e;hb=922805b23964e54f9aa5e7408747617d32ea0e1d;hp=2430ec1a3868d584748af059258c5030200bf583;hpb=5a4ec9379ff8e96ab7a75ea1854bf2005db01050;p=ghc-hetmet.git diff --git a/ghc/rts/Itimer.h b/ghc/rts/Itimer.h index 2430ec1..3e41e49 100644 --- a/ghc/rts/Itimer.h +++ b/ghc/rts/Itimer.h @@ -1,7 +1,7 @@ /* ----------------------------------------------------------------------------- - * $Id: Itimer.h,v 1.7 2000/08/25 13:12:07 simonmar Exp $ + * $Id: Itimer.h,v 1.10 2001/11/27 01:51:23 sof Exp $ * - * (c) The GHC Team 1998-1999 + * (c) The GHC Team 1998-2001 * * Interval timer for profiling and pre-emptive scheduling. * @@ -15,13 +15,8 @@ */ #define CS_MIN_MILLISECS TICK_MILLISECS /* milliseconds per slice */ -extern rtsBool do_prof_ticks; /* profiling ticks on/off */ - -/* Total number of ticks since startup */ -extern lnat total_ticks; - -nat initialize_virtual_timer ( nat ms ); -int install_vtalrm_handler ( void ); +int startVirtTimer( nat ms ); +int stopVirtTimer ( void ); void block_vtalrm_signal ( void ); void unblock_vtalrm_signal ( void ); unsigned int getourtimeofday ( void );