1 /* -----------------------------------------------------------------------------
3 * (c) The GHC Team, 1998-2004
5 * Support for profiling
7 * ---------------------------------------------------------------------------*/
11 #if defined(PROFILING) || defined(DEBUG)
12 void initProfiling1 ( void );
13 void initProfiling2 ( void );
14 void endProfiling ( void );
16 extern FILE *prof_file;
22 void gen_XML_logfile ( void );
23 void reportCCSProfiling ( void );
25 void PrintNewStackDecls ( void );
27 extern lnat RTS_VAR(total_prof_ticks);
29 extern void fprintCCS( FILE *f, CostCentreStack *ccs );
32 extern void debugCCS( CostCentreStack *ccs );