X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfiling.h;h=7cc38df79e1e6c14dfb65d75a946535a3d1cb64b;hb=715184e20183fbdc71383cbc0b1e07598c91b165;hp=8b5bf762d143255b7429730d16e54b2bedb135d2;hpb=b9d8ddb91c9360e3165244520f31dcd28c396825;p=ghc-hetmet.git diff --git a/ghc/rts/Profiling.h b/ghc/rts/Profiling.h index 8b5bf76..7cc38df 100644 --- a/ghc/rts/Profiling.h +++ b/ghc/rts/Profiling.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Profiling.h,v 1.1 2000/04/03 15:54:49 simonmar Exp $ + * $Id: Profiling.h,v 1.5 2002/07/18 09:12:03 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -13,20 +13,18 @@ void initProfiling2 ( void ); void endProfiling ( void ); extern FILE *prof_file; +extern FILE *hp_file; #endif #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 *); +extern lnat total_prof_ticks; -# define DEFAULT_INTERVAL TICK_FREQUENCY - -extern rtsBool time_profiling; +extern void fprintCCS( FILE *f, CostCentreStack *ccs ); #endif