[project @ 2000-03-07 11:53:12 by simonmar]
[ghc-hetmet.git] / ghc / rts / ProfRts.h
1 /* -----------------------------------------------------------------------------
2  * $Id: ProfRts.h,v 1.9 2000/03/07 11:53:12 simonmar Exp $
3  *
4  * (c) The GHC Team, 1998-2000
5  *
6  * Support for profiling
7  *
8  * ---------------------------------------------------------------------------*/
9
10 #if defined(PROFILING) || defined(DEBUG)
11 void initProfiling ( void );
12 void endProfiling  ( void );
13
14 extern FILE *prof_file;
15 #endif
16
17 #ifdef PROFILING
18
19 void gen_XML_logfile     ( void );
20 void report_ccs_profiling ( void );
21 void heap_profile_finish (void);
22
23 void PrintNewStackDecls ( void );
24
25 void print_ccs (FILE *, CostCentreStack *);
26
27 # define DEFAULT_INTERVAL TICK_FREQUENCY
28
29 extern rtsBool time_profiling;
30
31 #endif