X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfiling.h;h=735fa6699b4689a180cfca9a5d757754e8237705;hb=423d477bfecd490de1449c59325c8776f91d7aac;hp=dccf4440e67e160add54ec23349d7992cc4e00a1;hpb=55c8be525c07ee7b4a3d34c23d580580fd825fce;p=ghc-hetmet.git diff --git a/ghc/rts/Profiling.h b/ghc/rts/Profiling.h index dccf444..735fa66 100644 --- a/ghc/rts/Profiling.h +++ b/ghc/rts/Profiling.h @@ -1,6 +1,5 @@ /* ----------------------------------------------------------------------------- - - * $Id: Profiling.h,v 1.4 2001/12/12 14:31:43 simonmar Exp $ + * $Id: Profiling.h,v 1.6 2004/08/13 13:10:28 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -24,9 +23,8 @@ void reportCCSProfiling ( void ); void PrintNewStackDecls ( void ); -extern lnat total_prof_ticks; +extern lnat RTS_VAR(total_prof_ticks); extern void fprintCCS( FILE *f, CostCentreStack *ccs ); - #endif