X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStats.h;h=20bc0155ada6742ae3975575521f08a7d4137b5b;hb=3eacdc7faf0d0e87a7201253f9f12c1fb4db7249;hp=535bef3a087921dbd4904397914eefe2bfc9c382;hpb=db61851c5472bf565cd1da900b33d6e033fd743d;p=ghc-hetmet.git diff --git a/ghc/rts/Stats.h b/ghc/rts/Stats.h index 535bef3..20bc015 100644 --- a/ghc/rts/Stats.h +++ b/ghc/rts/Stats.h @@ -1,44 +1,56 @@ /* ----------------------------------------------------------------------------- - * $Id: Stats.h,v 1.12 2001/11/22 14:25:12 simonmar Exp $ * - * (c) The GHC Team, 1998-1999 + * (c) The GHC Team, 1998-2005 * * Statistics and timing-related functions. * * ---------------------------------------------------------------------------*/ -extern void stat_startInit(void); -extern void stat_endInit(void); +#ifndef STATS_H +#define STATS_H -extern void stat_startGC(void); -extern void stat_endGC(lnat alloc, lnat collect, lnat live, - lnat copied, lnat gen); +#include "GetTime.h" -extern void stat_startRP(void); -extern void stat_endRP(nat, +void stat_startInit(void); +void stat_endInit(void); + +void stat_startGC(void); +void stat_endGC (lnat alloc, lnat live, + lnat copied, lnat scavd_copied, lnat gen); + +#ifdef PROFILING +void stat_startRP(void); +void stat_endRP(nat, #ifdef DEBUG_RETAINER nat, int, #endif - double, nat, nat); + double); +#endif /* PROFILING */ + +#if defined(PROFILING) || defined(DEBUG) +void stat_startHeapCensus(void); +void stat_endHeapCensus(void); +#endif -extern void stat_startLDV(void); -extern void stat_endLDV(void); +void stat_startExit(void); +void stat_endExit(void); -extern void stat_startExit(void); -extern void stat_endExit(void); +void stat_exit(int alloc); +void stat_workerStop(void); -extern void stat_exit(int alloc); -extern void stat_workerStop(void); +void initStats(void); -extern void initStats(void); +double mut_user_time_during_GC(void); +double mut_user_time(void); -extern double mut_user_time_during_GC(void); #ifdef PROFILING -// @retainer profiling -extern double mut_user_time_during_RP(void); -extern double mut_user_time_during_LDV(void); -#endif -extern double mut_user_time(void); +double mut_user_time_during_RP(void); +double mut_user_time_during_heap_census(void); +#endif /* PROFILING */ + +void statDescribeGens( void ); +HsInt64 getAllocations( void ); + +Ticks stat_getElapsedGCTime(void); -extern void statDescribeGens( void ); -extern HsInt getAllocations( void ); +#endif /* STATS_H */