From: John Darrington <john@darrington.wattle.id.au>
Date: Fri, 16 Dec 2005 01:14:39 +0000 (+0000)
Subject: Fixed buglet which manifested itself when running two consecutive EXAMINE
X-Git-Tag: v0.6.0~1121
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c8e41f19f9af4d4bac023c63192484b970381027;p=pspp-builds.git

Fixed buglet which manifested itself when running two consecutive EXAMINE
commands.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 98bd9d09..d95bf559 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+Fri Dec 16 09:11:48 WST 2005 John Darrington <john@darrington.wattle.id.au>
+
+	* examine.q: Fixed buglet when cleaning up at end of procedure.
+
 Tue Dec 13 22:34:42 2005  Ben Pfaff  <blp@gnu.org>
 
 	Move global initialization and cleanup code into main.c.
diff --git a/src/examine.q b/src/examine.q
index fc0c0c9a..43ecc130 100644
--- a/src/examine.q
+++ b/src/examine.q
@@ -233,6 +233,7 @@ cmd_examine(void)
 	hsh_destroy ( ff->fstats ) ;
 	free ( ff ) ;
       }
+    factors = 0;
   }
 
   subc_list_double_destroy(&percentile_list);
@@ -663,9 +664,6 @@ factor_calc(struct ccase *c, int case_no, double weight, int case_missing)
 
 }
 
-
-
-
 static void 
 run_examine(const struct casefile *cf, void *cmd_ )
 {
@@ -677,7 +675,6 @@ run_examine(const struct casefile *cf, void *cmd_ )
 
   /* Make sure we haven't got rubbish left over from a 
      previous split */
-
   struct factor *fctr = factors;
   while (fctr) 
     {