summaryrefslogtreecommitdiff
path: root/rts/Capability.h
diff options
context:
space:
mode:
authorDuncan Coutts <duncan@well-typed.com>2012-02-03 12:57:19 +0000
committerDuncan Coutts <duncan@well-typed.com>2012-04-04 19:10:44 +0100
commit8536f09c2f310a95297b339de6084f77cc4044c1 (patch)
tree5d558fb07d6c6c1abef09bfd64fac8a548aaa5e0 /rts/Capability.h
parentf9c2e8543cabd6661eec17d5be31469455a64e05 (diff)
downloadhaskell-8536f09c2f310a95297b339de6084f77cc4044c1.tar.gz
Calculate the total memory allocated on a per-capability basis
In addition to the existing global method. For now we just do it both ways and assert they give the same grand total. At some stage we can simplify the global method to just take the sum of the per-cap counters.
Diffstat (limited to 'rts/Capability.h')
-rw-r--r--rts/Capability.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Capability.h b/rts/Capability.h
index 64273c758b..1a2e7fd8bc 100644
--- a/rts/Capability.h
+++ b/rts/Capability.h
@@ -122,6 +122,8 @@ struct Capability_ {
// Stats on spark creation/conversion
SparkCounters spark_stats;
#endif
+ // Total words allocated by this cap since rts start
+ lnat total_allocated;
// Per-capability STM-related data
StgTVarWatchQueue *free_tvar_watch_queues;