X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfiling.h;h=735fa6699b4689a180cfca9a5d757754e8237705;hb=423d477bfecd490de1449c59325c8776f91d7aac;hp=52db2da05ef609c31eb56dbbc48152a30c3a6ef7;hpb=db61851c5472bf565cd1da900b33d6e033fd743d;p=ghc-hetmet.git

diff --git a/ghc/rts/Profiling.h b/ghc/rts/Profiling.h
index 52db2da..735fa66 100644
--- a/ghc/rts/Profiling.h
+++ b/ghc/rts/Profiling.h
@@ -1,6 +1,5 @@
 /* -----------------------------------------------------------------------------
-
- * $Id: Profiling.h,v 1.3 2001/11/22 14:25:12 simonmar Exp $
+ * $Id: Profiling.h,v 1.6 2004/08/13 13:10:28 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -20,20 +19,12 @@ extern FILE *hp_file;
 #ifdef PROFILING
 
 void gen_XML_logfile     ( void );
-void report_ccs_profiling ( void );
-void heap_profile_finish (void);
+void reportCCSProfiling ( void );
 
 void PrintNewStackDecls ( void );
 
-void print_ccs (FILE *, CostCentreStack *);
-
-# define DEFAULT_INTERVAL TICK_FREQUENCY
-
-extern rtsBool time_profiling;
-
-extern lnat total_prof_ticks;
+extern lnat RTS_VAR(total_prof_ticks);
 
 extern void fprintCCS( FILE *f, CostCentreStack *ccs );
 
-
 #endif