X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProftimer.h;h=c837b855f9143ed5f7d52b6df435460480e24559;hb=45252b35151fc55aa19fb6770df5ed8267639083;hp=38a023ca12bea6fe3e6cf1841a944a809335ab20;hpb=c6ab4bfa09886be3bfff4aa747af2f1c8e348a1f;p=ghc-hetmet.git diff --git a/ghc/rts/Proftimer.h b/ghc/rts/Proftimer.h index 38a023c..c837b85 100644 --- a/ghc/rts/Proftimer.h +++ b/ghc/rts/Proftimer.h @@ -1,16 +1,22 @@ /* ----------------------------------------------------------------------------- - * $Id: Proftimer.h,v 1.4 1999/08/25 16:11:50 simonmar Exp $ * - * (c) The GHC Team, 1998 + * (c) The GHC Team, 1998-2005 * * Profiling interval timer * * ---------------------------------------------------------------------------*/ -extern lnat total_prof_ticks; +#ifndef PROFTIMER_H +#define PROFTIMER_H -extern void initProfTimer(nat ms); -extern void stopProfTimer(void); -extern void startProfTimer(void); -extern void handleProfTick(int unused); +extern void initProfTimer ( void ); +extern void handleProfTick ( void ); +extern void stopProfTimer ( void ); +extern void startProfTimer ( void ); +extern void stopHeapProfTimer ( void ); +extern void startHeapProfTimer ( void ); + +extern rtsBool performHeapProfile; + +#endif /* PROFTIMER_H */