[Pspp-cvs] pspp/src/language/stats ChangeLog regression.q

[Jason H Stover]

CVSROOT:        /sources/pspp
Module name:    pspp
Branch:         
Changes by:     Jason H Stover <address@hidden> 06/04/19 14:11:35

Modified files:
        src/language/stats: ChangeLog regression.q 

Log message:
        fixed look up of the number of variables

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/language/stats/ChangeLog.diff?tr1=1.9&tr2=1.10&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/language/stats/regression.q.diff?tr1=1.14&tr2=1.15&r1=text&r2=text

Patches:
Index: pspp/src/language/stats/ChangeLog
diff -u pspp/src/language/stats/ChangeLog:1.9 
pspp/src/language/stats/ChangeLog:1.10
--- pspp/src/language/stats/ChangeLog:1.9       Wed Apr 19 01:17:50 2006
+++ pspp/src/language/stats/ChangeLog   Wed Apr 19 14:11:35 2006
@@ -1,3 +1,8 @@
+2006-04-19  Jason Stover  <address@hidden>
+
+       * regression.q (regression_trns_proc): Fixed the look-up of the
+       number of variables.
+
 2006-04-18  Jason Stover  <address@hidden>
 
        * regression.q (regression_trns_proc): Look up the residual
Index: pspp/src/language/stats/regression.q
diff -u pspp/src/language/stats/regression.q:1.14 
pspp/src/language/stats/regression.q:1.15
--- pspp/src/language/stats/regression.q:1.14   Wed Apr 19 01:17:50 2006
+++ pspp/src/language/stats/regression.q        Wed Apr 19 14:11:35 2006
@@ -516,14 +516,15 @@
   assert (model->depvar != NULL);
   assert (model->resid != NULL);
   
-  vals = xnmalloc (n_variables, sizeof (*vals));
   dict_get_vars (default_dict, &vars, &n_vars, 1u << DC_ORDINARY);
+  vals = xnmalloc (n_vars, sizeof (*vals));
+  assert (vals != NULL);
   output = case_data_rw (c, model->resid->fv);
   assert (output != NULL);
 
   for (i = 0; i < n_vars; i++)
     {
-      /* Do not use the residual variable as a predictor. */
+      /* Do not use the residual variable. */
       if (vars[i]->index != model->resid->index) 
        {
          /* Do not use the dependent variable as a predictor. */