X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfiling.h;h=b503fa64fa3b3dbe4fd0dcc3e46564dbaecfa967;hb=5bcba9677f6d097ecad2034b7bd039d125eaabdc;hp=7cc38df79e1e6c14dfb65d75a946535a3d1cb64b;hpb=80164adadb52f16b557e283ac4cd3810848d7561;p=ghc-hetmet.git diff --git a/ghc/rts/Profiling.h b/ghc/rts/Profiling.h index 7cc38df..b503fa6 100644 --- a/ghc/rts/Profiling.h +++ b/ghc/rts/Profiling.h @@ -1,7 +1,6 @@ /* ----------------------------------------------------------------------------- - * $Id: Profiling.h,v 1.5 2002/07/18 09:12:03 simonmar Exp $ * - * (c) The GHC Team, 1998-2000 + * (c) The GHC Team, 1998-2004 * * Support for profiling * @@ -23,7 +22,7 @@ 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 );