summaryrefslogtreecommitdiff
path: root/rts/Capability.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2010-11-11 13:27:27 +0000
committerSimon Marlow <marlowsd@gmail.com>2010-11-11 13:27:27 +0000
commit52567e9d746db8c523885b9491b79302064b4bd8 (patch)
tree0fca3fee64296f519d190100938588609e61f232 /rts/Capability.c
parentcc65b3682b688fb510e6458b4e4c4504430393db (diff)
downloadhaskell-52567e9d746db8c523885b9491b79302064b4bd8.tar.gz
count fizzled and GC'd sparks separately
Diffstat (limited to 'rts/Capability.c')
-rw-r--r--rts/Capability.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/Capability.c b/rts/Capability.c
index 9f7d1522a7..bffb735612 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -227,7 +227,8 @@ initCapability( Capability *cap, nat i )
cap->sparks_created = 0;
cap->sparks_dud = 0;
cap->sparks_converted = 0;
- cap->sparks_pruned = 0;
+ cap->sparks_gcd = 0;
+ cap->sparks_fizzled = 0;
#endif
cap->f.stgEagerBlackholeInfo = (W_)&__stg_EAGER_BLACKHOLE_info;