diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-11-11 13:27:27 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-11-11 13:27:27 +0000 |
| commit | 52567e9d746db8c523885b9491b79302064b4bd8 (patch) | |
| tree | 0fca3fee64296f519d190100938588609e61f232 /rts/Stats.c | |
| parent | cc65b3682b688fb510e6458b4e4c4504430393db (diff) | |
| download | haskell-52567e9d746db8c523885b9491b79302064b4bd8.tar.gz | |
count fizzled and GC'd sparks separately
Diffstat (limited to 'rts/Stats.c')
| -rw-r--r-- | rts/Stats.c | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/rts/Stats.c b/rts/Stats.c index a507147fde..97661a9d95 100644 --- a/rts/Stats.c +++ b/rts/Stats.c @@ -638,16 +638,18 @@ stat_exit(int alloc) lnat sparks_created = 0; lnat sparks_dud = 0; lnat sparks_converted = 0; - lnat sparks_pruned = 0; + lnat sparks_gcd = 0; + lnat sparks_fizzled = 0; for (i = 0; i < n_capabilities; i++) { sparks_created += capabilities[i].sparks_created; sparks_dud += capabilities[i].sparks_dud; sparks_converted += capabilities[i].sparks_converted; - sparks_pruned += capabilities[i].sparks_pruned; + sparks_gcd += capabilities[i].sparks_gcd; + sparks_fizzled += capabilities[i].sparks_fizzled; } - statsPrintf(" SPARKS: %ld (%ld converted, %ld dud, %ld pruned)\n\n", - sparks_created + sparks_dud, sparks_converted, sparks_dud, sparks_pruned); + statsPrintf(" SPARKS: %ld (%ld converted, %ld dud, %ld GC'd, %ld fizzled)\n\n", + sparks_created + sparks_dud, sparks_converted, sparks_dud, sparks_gcd, sparks_fizzled); } #endif |