From: Ben Pfaff <blp@gnu.org>
Date: Wed, 18 May 2005 04:03:47 +0000 (+0000)
Subject: Fix double-free bug.
X-Git-Tag: v0.4.0~69
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5a33cc6d78fe87ff5e9bd32ea4af3f895e4ad2fc;p=pspp-builds.git

Fix double-free bug.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 3836660d..43f62729 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,10 @@
+Tue May 17 21:00:57 2005  Ben Pfaff  <blp@gnu.org>
+
+	* data-list.c: (data_list_trns_free) Don't free the argument
+	because cancel_transformations() will do that itself.
+	(data_list_source_destroy) Destroy the argument to
+	data_list_trns_free(), because it no longer does so itself.
+
 Tue May 17 18:29:35 2005  Ben Pfaff  <blp@gnu.org>
 
 	* data-out.c: (format_and_round) Don't output leading `-' if value
diff --git a/src/data-list.c b/src/data-list.c
index 66fab631..92eaab9a 100644
--- a/src/data-list.c
+++ b/src/data-list.c
@@ -1238,7 +1238,6 @@ data_list_trns_free (struct trns_header *pgm)
   free (dls->delims);
   destroy_dls_var_spec (dls->first);
   dfm_close_reader (dls->reader);
-  free (pgm);
 }
 
 /* Handle DATA LIST transformation T, parsing data into C. */
@@ -1313,6 +1312,7 @@ static void
 data_list_source_destroy (struct case_source *source)
 {
   data_list_trns_free (source->aux);
+  free (source->aux);
 }
 
 const struct case_source_class data_list_source_class =