ghc/rts/Profiling.h

   1 /* -----------------------------------------------------------------------------
   2  *
   3  * (c) The GHC Team, 1998-2004
   4  *
   5  * Support for profiling
   6  *
   7  * ---------------------------------------------------------------------------*/
   8
   9 #if defined(PROFILING) || defined(DEBUG)
  10 void initProfiling1 ( void );
  11 void initProfiling2 ( void );
  12 void endProfiling   ( void );
  13
  14 extern FILE *prof_file;
  15 extern FILE *hp_file;
  16 #endif
  17
  18 #ifdef PROFILING
  19
  20 void gen_XML_logfile     ( void );
  21 void reportCCSProfiling ( void );
  22
  23 void PrintNewStackDecls ( void );
  24
  25 extern lnat RTS_VAR(total_prof_ticks);
  26
  27 extern void fprintCCS( FILE *f, CostCentreStack *ccs );
  28
  29 #endif