diff options
author | Ian Lynagh <igloo@earth.li> | 2010-05-25 11:12:17 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2010-05-25 11:12:17 +0000 |
commit | 68c1816d93339e48b4907ed3b80e9551c2150a2d (patch) | |
tree | 5a7cb75d12966baeae931558ccc3122b3680461c /rts/Profiling.c | |
parent | 8b6c1605e75a2482892995c6d0529911796e89dd (diff) | |
download | haskell-68c1816d93339e48b4907ed3b80e9551c2150a2d.tar.gz |
Fix profiling output; spotted by jlouis
We were outputing the number of words allocated in a column titled "bytes".
Diffstat (limited to 'rts/Profiling.c')
-rw-r--r-- | rts/Profiling.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Profiling.c b/rts/Profiling.c index 581bf06b0f..6d23bc2fe2 100644 --- a/rts/Profiling.c +++ b/rts/Profiling.c @@ -697,7 +697,7 @@ report_per_cc_costs( void ) if (RtsFlags.CcFlags.doCostCentres >= COST_CENTRES_VERBOSE) { fprintf(prof_file, " %5" FMT_Word64 " %9" FMT_Word64, - (StgWord64)(cc->time_ticks), cc->mem_alloc); + (StgWord64)(cc->time_ticks), cc->mem_alloc*sizeof(W_)); } fprintf(prof_file, "\n"); } |