X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStats.h;h=c3efd36312c06b36588d78f5781dfe37bb03632c;hb=c7fd6356eb1ccab4b92fa548d52023cc221fa7c0;hp=297cc52ce9d861f07b033af31fba704d22da0a99;hpb=f5a4ddffad3528a8be6ba063a4cd0cb685e3f5fd;p=ghc-hetmet.git

diff --git a/ghc/rts/Stats.h b/ghc/rts/Stats.h
index 297cc52..c3efd36 100644
--- a/ghc/rts/Stats.h
+++ b/ghc/rts/Stats.h
@@ -1,5 +1,4 @@
 /* -----------------------------------------------------------------------------
- * $Id: Stats.h,v 1.10 2000/12/19 14:30:39 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -14,6 +13,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 +35,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);
 
-extern HsInt     getAllocations( 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 HsInt64   getAllocations( void );
+
+#if defined(SMP)
+extern long int  stat_getElapsedTime ( void );
+#endif