X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStats.h;h=20bc0155ada6742ae3975575521f08a7d4137b5b;hb=0dbbf1932d550293986af6244202cb735b2cd966;hp=e6f746beeabe90fb9ad74e72e77746c44eddb491;hpb=e2931b094c55715f6eedb65e030514d6fe5680b5;p=ghc-hetmet.git diff --git a/ghc/rts/Stats.h b/ghc/rts/Stats.h index e6f746b..20bc015 100644 --- a/ghc/rts/Stats.h +++ b/ghc/rts/Stats.h @@ -1,21 +1,26 @@ /* ----------------------------------------------------------------------------- * - * (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 scavd_copied, lnat gen); +#include "GetTime.h" + +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 -extern void stat_startRP(void); -extern void stat_endRP(nat, +void stat_startRP(void); +void stat_endRP(nat, #ifdef DEBUG_RETAINER nat, int, #endif @@ -23,29 +28,29 @@ extern void stat_endRP(nat, #endif /* PROFILING */ #if defined(PROFILING) || defined(DEBUG) -extern void stat_startHeapCensus(void); -extern void stat_endHeapCensus(void); +void stat_startHeapCensus(void); +void stat_endHeapCensus(void); #endif -extern void stat_startExit(void); -extern void stat_endExit(void); +void stat_startExit(void); +void stat_endExit(void); -extern void stat_exit(int alloc); -extern void stat_workerStop(void); +void stat_exit(int alloc); +void stat_workerStop(void); -extern void initStats(void); +void initStats(void); -extern double mut_user_time_during_GC(void); -extern double mut_user_time(void); +double mut_user_time_during_GC(void); +double mut_user_time(void); #ifdef PROFILING -extern double mut_user_time_during_RP(void); -extern double mut_user_time_during_heap_census(void); +double mut_user_time_during_RP(void); +double mut_user_time_during_heap_census(void); #endif /* PROFILING */ -extern void statDescribeGens( void ); -extern HsInt64 getAllocations( void ); +void statDescribeGens( void ); +HsInt64 getAllocations( void ); + +Ticks stat_getElapsedGCTime(void); -extern void stat_getTimes ( long *currentElapsedTime, - long *currentUserTime, - long *elapsedGCTime ); +#endif /* STATS_H */