diff options
author | Simon Marlow <marlowsd@gmail.com> | 2013-02-14 10:06:44 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2013-02-14 10:06:53 +0000 |
commit | 65a0e1eb88fb48d085f8da498a7acc2fd345c2a8 (patch) | |
tree | 3d5c6489c1b51d085a9f8b313aae5daa3330bcf2 /rts/Stats.h | |
parent | e5085db5d16f904f9307445fbafc206283f630c7 (diff) | |
download | haskell-65a0e1eb88fb48d085f8da498a7acc2fd345c2a8.tar.gz |
Simplify the allocation stats accounting
We were doing it in two different ways and asserting that the results
were the same. In most cases they were, but I found one case where
they weren't: the GC itself allocates some memory for running
finalizers, and this memory was accounted for one way but not the
other.
It was simpler to remove the old way of counting allocation that to
try to fix it up, so I did that.
Diffstat (limited to 'rts/Stats.h')
-rw-r--r-- | rts/Stats.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Stats.h b/rts/Stats.h index 0961f3faf1..9839e5cf2a 100644 --- a/rts/Stats.h +++ b/rts/Stats.h @@ -29,7 +29,7 @@ void stat_endInit(void); void stat_startGC(Capability *cap, struct gc_thread_ *_gct); void stat_endGC (Capability *cap, struct gc_thread_ *_gct, - W_ alloc, W_ live, W_ copied, W_ slop, nat gen, + W_ live, W_ copied, W_ slop, nat gen, nat n_gc_threads, W_ par_max_copied, W_ par_tot_copied); void stat_gcWorkerThreadStart (struct gc_thread_ *_gct); @@ -52,7 +52,7 @@ void stat_endHeapCensus(void); void stat_startExit(void); void stat_endExit(void); -void stat_exit(int alloc); +void stat_exit(void); void stat_workerStop(void); void initStats0(void); |