diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-08-08 10:31:10 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-08-08 10:31:10 +0000 |
| commit | 9f2ceb4da7dfbc1cfd09ce54610ebe64288b9007 (patch) | |
| tree | c8a72bc8d7e4663c9b5f789d54a6a69bfbba4340 /rts/Stats.c | |
| parent | 3098d2143a5865f8f1fba1d7d72132b140f2de94 (diff) | |
| download | haskell-9f2ceb4da7dfbc1cfd09ce54610ebe64288b9007.tar.gz | |
Remember to free() memory on exit
Patch mostly from Lennart Augustsson in #803, with additions to
Task.c by me.
Diffstat (limited to 'rts/Stats.c')
| -rw-r--r-- | rts/Stats.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/Stats.c b/rts/Stats.c index ec8d5838fb..248b0af58a 100644 --- a/rts/Stats.c +++ b/rts/Stats.c @@ -537,6 +537,9 @@ stat_exit(int alloc) statsFlush(); statsClose(); } + if (GC_coll_times) + stgFree(GC_coll_times); + GC_coll_times = NULL; } /* ----------------------------------------------------------------------------- |