summaryrefslogtreecommitdiff
path: root/rts/Capability.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-12-01 11:34:48 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-12-01 11:34:48 +0000
commitcf036e5bd578769729fbbcbf67cb2277da9ba0bc (patch)
treee5693331cf2524626db49a3d546bca7462b4ddf9 /rts/Capability.c
parent9136c7f5b4165a9ec42c75c41adb5dd1737e4449 (diff)
downloadhaskell-cf036e5bd578769729fbbcbf67cb2277da9ba0bc.tar.gz
free cap->saved_mut_lists too
fixes some memory leakage at shutdown
Diffstat (limited to 'rts/Capability.c')
-rw-r--r--rts/Capability.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/Capability.c b/rts/Capability.c
index 9294949e5b..95050baaa9 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -830,6 +830,7 @@ static void
freeCapability (Capability *cap)
{
stgFree(cap->mut_lists);
+ stgFree(cap->saved_mut_lists);
#if defined(THREADED_RTS)
freeSparkPool(cap->sparks);
#endif