Fixed buglet which manifested itself when running two consecutive EXAMINE

commands.

diff --git a/src/ChangeLog b/src/ChangeLog
index 98bd9d092656ca72edc7b79ca4db12c583d998b9..d95bf55986a6f5605c6ef0bf543381f452163a78 100644 (file)
--- 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 fc0c0c9a94f8752aee67aeeded7b8b68553daa15..43ecc13037d3d6a2faf3ab0ae762a08cd78022ae 100644 (file)
--- 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) 
     {