From 9b5e08861ad487e9221cb987d9c3f413399b5d37 Mon Sep 17 00:00:00 2001 From: panne Date: Fri, 19 Mar 2004 23:20:20 +0000 Subject: [PATCH] [project @ 2004-03-19 23:20:20 by panne] Fixed the JOB line in heap profiles, it contained superfluous spaces and an evil line break. Merge to STABLE (This fix looks quite right, but again, I leave this to the Master of Releases (tm), because there might already be tools depending on the slightly wrong old format.) --- ghc/rts/ProfHeap.c | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/ghc/rts/ProfHeap.c b/ghc/rts/ProfHeap.c index 837591b..1f0156c 100644 --- a/ghc/rts/ProfHeap.c +++ b/ghc/rts/ProfHeap.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: ProfHeap.c,v 1.50 2003/11/12 17:49:08 sof Exp $ + * $Id: ProfHeap.c,v 1.51 2004/03/19 23:20:20 panne Exp $ * * (c) The GHC Team, 1998-2003 * @@ -430,10 +430,9 @@ initHeapProfiling(void) int count; for(count = 1; count < prog_argc; count++) fprintf(hp_file, " %s", prog_argv[count]); - fprintf(hp_file, " +RTS "); + fprintf(hp_file, " +RTS"); for(count = 0; count < rts_argc; count++) - fprintf(hp_file, "%s ", rts_argv[count]); - fprintf(hp_file, "\n"); + fprintf(hp_file, " %s", rts_argv[count]); } #endif /* PROFILING */ -- 1.7.10.4