From: Simon Marlow <marlowsd@gmail.com>
Date: Tue, 1 Dec 2009 11:34:48 +0000 (+0000)
Subject: free cap->saved_mut_lists too
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=cf036e5bd578769729fbbcbf67cb2277da9ba0bc

free cap->saved_mut_lists too
fixes some memory leakage at shutdown
---

diff --git a/rts/Capability.c b/rts/Capability.c
index 9294949..95050ba 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