X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FStats.c;h=ae3d8431576434ee52c98426e3f2997530e312bb;hb=d42eeec30cc321ef65a69ea0e85c17d176f89c71;hp=3ec5794e761a0c5c797db965702ebeb64e40e163;hpb=6eee9f878a34f4b3ea4b3b3435a1f9b5beae6210;p=ghc-hetmet.git diff --git a/rts/Stats.c b/rts/Stats.c index 3ec5794..ae3d843 100644 --- a/rts/Stats.c +++ b/rts/Stats.c @@ -628,11 +628,11 @@ stat_exit(int alloc) { nat i; Task *task; + statsPrintf(" MUT time (elapsed) GC time (elapsed)\n"); for (i = 0, task = all_tasks; task != NULL; i++, task = task->all_link) { - statsPrintf(" Task %2d %-8s : MUT time: %6.2fs (%6.2fs elapsed)\n" - " GC time: %6.2fs (%6.2fs elapsed)\n\n", + statsPrintf(" Task %2d %-8s : %6.2fs (%6.2fs) %6.2fs (%6.2fs)\n", i, (task->tso == NULL) ? "(worker)" : "(bound)", TICK_TO_DBL(task->mut_time), @@ -642,6 +642,8 @@ stat_exit(int alloc) } } + statsPrintf("\n"); + { nat i; lnat sparks_created = 0; @@ -712,12 +714,10 @@ stat_exit(int alloc) { nat g, s; - statsPrintf("recordMutableGen_sync: %"FMT_Word64"\n", recordMutableGen_sync.spin); statsPrintf("gc_alloc_block_sync: %"FMT_Word64"\n", gc_alloc_block_sync.spin); statsPrintf("whitehole_spin: %"FMT_Word64"\n", whitehole_spin); for (g = 0; g < RtsFlags.GcFlags.generations; g++) { for (s = 0; s < generations[g].n_steps; s++) { - statsPrintf("gen[%d].steps[%d].sync_todo: %"FMT_Word64"\n", g, s, generations[g].steps[s].sync_todo.spin); statsPrintf("gen[%d].steps[%d].sync_large_objects: %"FMT_Word64"\n", g, s, generations[g].steps[s].sync_large_objects.spin); } }