X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfRts.h;h=2ffe8c31a439ddac32c08502d9ffd5b1363ae165;hb=b933b46923f9e67fbb20a62b9ccde5a9a3e8fb7e;hp=870786cf47482c744bb31c56f9a933710c83f73b;hpb=17315bf6c11c17ad38ca5a65d7e938ac32d07d8a;p=ghc-hetmet.git diff --git a/ghc/rts/ProfRts.h b/ghc/rts/ProfRts.h index 870786c..2ffe8c3 100644 --- a/ghc/rts/ProfRts.h +++ b/ghc/rts/ProfRts.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: ProfRts.h,v 1.5 1999/09/15 13:45:18 simonmar Exp $ + * $Id: ProfRts.h,v 1.7 1999/12/03 15:55:29 chak Exp $ * * (c) The GHC Team, 1998-1999 * @@ -7,20 +7,20 @@ * * ---------------------------------------------------------------------------*/ +#if defined(PROFILING) || defined(DEBUG) +void initProfiling ( void ); +void endProfiling ( void ); +#endif + #ifdef PROFILING void report_ccs_profiling ( void ); void heap_profile_finish (void); -void initProfiling ( void ); -void endProfiling ( void ); - void PrintNewStackDecls ( void ); void print_ccs (FILE *, CostCentreStack *); -void report_ccs_profiling( void ); - # define DEFAULT_INTERVAL TICK_FREQUENCY extern rtsBool time_profiling;