X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Frts%2FStats.h;h=626eb0707d77929672315ba75ab7a36ba89237c5;hb=0bffc410964e1688ad80d277d53400659e697ab5;hp=297cc52ce9d861f07b033af31fba704d22da0a99;hpb=f5a4ddffad3528a8be6ba063a4cd0cb685e3f5fd;p=ghc-hetmet.git

diff --git a/ghc/rts/Stats.h b/ghc/rts/Stats.h
index 297cc52..626eb07 100644
--- a/ghc/rts/Stats.h
+++ b/ghc/rts/Stats.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Stats.h,v 1.10 2000/12/19 14:30:39 simonmar Exp $
+ * $Id: Stats.h,v 1.17 2002/02/06 01:21:41 sof Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -14,6 +14,20 @@ extern void      stat_startGC(void);
 extern void      stat_endGC(lnat alloc, lnat collect, lnat live, 
 			    lnat copied, lnat gen);
 
+#ifdef PROFILING
+extern void      stat_startRP(void);
+extern void      stat_endRP(nat, 
+#ifdef DEBUG_RETAINER
+                            nat, int, 
+#endif
+                            double);
+#endif // PROFILING
+
+#if defined(PROFILING) || defined(DEBUG)
+extern void      stat_startHeapCensus(void);
+extern void      stat_endHeapCensus(void);
+#endif
+
 extern void      stat_startExit(void);
 extern void      stat_endExit(void);
 
@@ -22,8 +36,17 @@ extern void      stat_workerStop(void);
 
 extern void      initStats(void);
 
-extern void      stat_describe_gens(void);
 extern double    mut_user_time_during_GC(void);
 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);
+#endif // PROFILING
+
+extern void      statDescribeGens( void );
 extern HsInt     getAllocations( void );
+
+#if defined(SMP)
+extern long int  stat_getElapsedTime ( void );
+#endif