From: Jason Stover <jhs@math.gcsu.edu>
Date: Sun, 9 Apr 2006 14:00:41 +0000 (+0000)
Subject: fixed predict argument list
X-Git-Tag: v0.6.0~1000
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c172336a5f4c4f035af898cdc09988ef15a05f1b;p=pspp-builds.git

fixed predict argument list
---

diff --git a/src/language/stats/regression.q b/src/language/stats/regression.q
index 11a1f211..3037f72c 100644
--- a/src/language/stats/regression.q
+++ b/src/language/stats/regression.q
@@ -505,7 +505,6 @@ static void
 subcommand_save (int save, pspp_linreg_cache *lc, const struct casefile *cf, int *is_missing)
 {
   int i;
-  int k;
   int case_num;
   double residual;
   const union value **vals;
@@ -513,6 +512,8 @@ subcommand_save (int save, pspp_linreg_cache *lc, const struct casefile *cf, int
   struct ccase c;
 
   assert (lc != NULL);
+  assert (is_missing != NULL);
+
   if (save)
     {
       vals = xnmalloc (n_variables, sizeof (*vals));
@@ -526,7 +527,8 @@ subcommand_save (int save, pspp_linreg_cache *lc, const struct casefile *cf, int
 		{
 		  vals[i] = case_data (&c, v_variables[i]->fv);
 		}
-	      residual = (*lc->predict) (v_variables, vals, lc, n_variables);
+	      residual = (*lc->predict) ((const struct variable **) v_variables, 
+					 (const union value **) vals, lc, n_variables);
 	    }
 	}
       free (vals);