diff options
| author | Duncan Coutts <duncan@well-typed.com> | 2011-06-01 19:38:15 +0100 |
|---|---|---|
| committer | Duncan Coutts <duncan@well-typed.com> | 2011-07-18 16:31:14 +0100 |
| commit | 556557ebee2758acade603e25a8a16266dea791d (patch) | |
| tree | 30e93330fac8cec46f1241c6dba170ea6797f2e5 /rts/Stats.c | |
| parent | ededf355981fd08f52b4fab256f231179848073f (diff) | |
| download | haskell-556557ebee2758acade603e25a8a16266dea791d.tar.gz | |
Use a struct for the set of spark counters
Diffstat (limited to 'rts/Stats.c')
| -rw-r--r-- | rts/Stats.c | 20 |
1 files changed, 9 insertions, 11 deletions
diff --git a/rts/Stats.c b/rts/Stats.c index 9fc702a2a3..04b091cd3a 100644 --- a/rts/Stats.c +++ b/rts/Stats.c @@ -629,21 +629,19 @@ stat_exit(int alloc) { nat i; - lnat sparks_created = 0; - lnat sparks_dud = 0; - lnat sparks_converted = 0; - lnat sparks_gcd = 0; - lnat sparks_fizzled = 0; + SparkCounters sparks = { 0, 0, 0, 0, 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_gcd += capabilities[i].sparks_gcd; - sparks_fizzled += capabilities[i].sparks_fizzled; + sparks.created += capabilities[i].spark_stats.created; + sparks.dud += capabilities[i].spark_stats.dud; + sparks.converted += capabilities[i].spark_stats.converted; + sparks.gcd += capabilities[i].spark_stats.gcd; + sparks.fizzled += capabilities[i].spark_stats.fizzled; } 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); + sparks.created + sparks.dud, + sparks.converted, sparks.dud, + sparks.gcd, sparks.fizzled); } #endif |