diff options
author | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 22:12:24 +0000 |
---|---|---|
committer | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 22:12:24 +0000 |
commit | a75a8790410ce3ffb439bfd0b7c3999e7df72eb1 (patch) | |
tree | 426e006bbb3fc173cbe2bd615d947ecd5c782f01 /rts/sm/GC.h | |
parent | 96195367ad299bc3be251535bcff7fb75d097e07 (diff) | |
download | haskell-a75a8790410ce3ffb439bfd0b7c3999e7df72eb1.tar.gz |
improvements to +RTS -s output
- count and report number of parallel collections
- calculate bytes scanned in addition to bytes copied per thread
- calculate "work balance factor"
- tidy up the formatting a bit
Diffstat (limited to 'rts/sm/GC.h')
-rw-r--r-- | rts/sm/GC.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/sm/GC.h b/rts/sm/GC.h index 5a9cb98c48..0e0d90a48e 100644 --- a/rts/sm/GC.h +++ b/rts/sm/GC.h @@ -126,7 +126,7 @@ typedef struct gc_thread_ { StgClosure* static_objects; // live static objects StgClosure* scavenged_static_objects; // static objects scavenged so far - lnat gc_count; // number of gc's this thread has done + lnat gc_count; // number of GCs this thread has done // -------------------- // evacuate flags @@ -157,6 +157,7 @@ typedef struct gc_thread_ { // stats lnat copied; + lnat scanned; lnat any_work; lnat no_work; lnat scav_find_work; |