From: Ben Pfaff <blp@gnu.org>
Date: Mon, 8 May 2006 01:31:49 +0000 (+0000)
Subject: Fix memory leak in AGGREGATE.
X-Git-Tag: v0.6.0~866
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=6f135ae2a14a178f850c25cb4bad6c0aae88c920;p=pspp-builds.git

Fix memory leak in AGGREGATE.
---

diff --git a/src/language/stats/ChangeLog b/src/language/stats/ChangeLog
index 8794b875..b7c65e71 100644
--- a/src/language/stats/ChangeLog
+++ b/src/language/stats/ChangeLog
@@ -1,3 +1,10 @@
+Sun May  7 18:31:25 2006  Ben Pfaff  <blp@gnu.org>
+
+	Fix memory leak.
+	
+	* aggregate.c (cmd_aggregate): Free default_dict before replacing
+	it.
+
 Sun May  7 17:09:19 2006  Ben Pfaff  <blp@gnu.org>
 
 	* flip.c (flip_file): Check return value of pool_fclose().
diff --git a/src/language/stats/aggregate.c b/src/language/stats/aggregate.c
index cd301170..2497d064 100644
--- a/src/language/stats/aggregate.c
+++ b/src/language/stats/aggregate.c
@@ -288,6 +288,7 @@ cmd_aggregate (void)
             goto error;
         }
       discard_variables ();
+      dict_destroy (default_dict);
       default_dict = agr.dict;
       agr.dict = NULL;
       proc_set_source (agr.sink->class->make_source (agr.sink));