projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2005-10-21 14:02:17 by simonmar]
[ghc-hetmet.git]
/
ghc
/
rts
/
Stats.h
diff --git
a/ghc/rts/Stats.h
b/ghc/rts/Stats.h
index
59fe58a
..
ee706db
100644
(file)
--- a/
ghc/rts/Stats.h
+++ b/
ghc/rts/Stats.h
@@
-1,18
+1,22
@@
/* -----------------------------------------------------------------------------
/* -----------------------------------------------------------------------------
- * $Id: Stats.h,v 1.14 2001/11/26 16:54:22 simonmar Exp $
*
*
- * (c) The GHC Team, 1998-1999
+ * (c) The GHC Team, 1998-2005
*
* Statistics and timing-related functions.
*
* ---------------------------------------------------------------------------*/
*
* Statistics and timing-related functions.
*
* ---------------------------------------------------------------------------*/
+#ifndef STATS_H
+#define STATS_H
+
+#include "Task.h"
+
extern void stat_startInit(void);
extern void stat_endInit(void);
extern void stat_startGC(void);
extern void stat_startInit(void);
extern void stat_endInit(void);
extern void stat_startGC(void);
-extern void stat_endGC(lnat alloc, lnat collect, lnat live,
- lnat copied, lnat gen);
+extern void stat_endGC (lnat alloc, lnat collect, lnat live,
+ lnat copied, lnat scavd_copied, lnat gen);
#ifdef PROFILING
extern void stat_startRP(void);
#ifdef PROFILING
extern void stat_startRP(void);
@@
-21,7
+25,7
@@
extern void stat_endRP(nat,
nat, int,
#endif
double);
nat, int,
#endif
double);
-#endif // PROFILING
+#endif /* PROFILING */
#if defined(PROFILING) || defined(DEBUG)
extern void stat_startHeapCensus(void);
#if defined(PROFILING) || defined(DEBUG)
extern void stat_startHeapCensus(void);
@@
-42,7
+46,13
@@
extern double mut_user_time(void);
#ifdef PROFILING
extern double mut_user_time_during_RP(void);
extern double mut_user_time_during_heap_census(void);
#ifdef PROFILING
extern double mut_user_time_during_RP(void);
extern double mut_user_time_during_heap_census(void);
-#endif // PROFILING
+#endif /* PROFILING */
extern void statDescribeGens( void );
extern void statDescribeGens( void );
-extern HsInt getAllocations( void );
+extern HsInt64 getAllocations( void );
+
+extern void stat_getTimes ( long *currentElapsedTime,
+ long *currentUserTime,
+ long *elapsedGCTime );
+
+#endif /* STATS_H */