X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FProfiling.c;h=c5baff0107d281cbcad7360e5b6d84da2eb64439;hb=bda047d0f4dce1de599938457d8f31a97cb36f5b;hp=613d30200c9cf3bb2c39a010c782d2ca80fc0c3f;hpb=9bffc64eff34148e67a28834aa6597c6027f28d3;p=ghc-hetmet.git diff --git a/ghc/rts/Profiling.c b/ghc/rts/Profiling.c index 613d302..c5baff0 100644 --- a/ghc/rts/Profiling.c +++ b/ghc/rts/Profiling.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Profiling.c,v 1.34 2002/11/01 11:17:29 simonmar Exp $ + * $Id: Profiling.c,v 1.36 2003/02/22 04:51:52 sof Exp $ * * (c) The GHC Team, 1998-2000 * @@ -16,7 +16,7 @@ #include "Profiling.h" #include "Storage.h" #include "Proftimer.h" -#include "Itimer.h" +#include "Timer.h" #include "ProfHeap.h" #include "Arena.h" #include "RetainerProfile.h" @@ -715,6 +715,7 @@ reportCCSProfiling( void ) gen_XML_logfile(); return; default: + break; } fprintf(prof_file, "\t%s Time and Allocation Profiling Report (%s)\n",