(popup_message): Refer to files that contain commands as "syntax"

[pspp] / src / math / linreg / linreg.c

diff --git a/src/math/linreg/linreg.c b/src/math/linreg/linreg.c
index 3c086a98f22ce1868ac581e1cdc4bc359671483f..4fc3b20a74d55bb5d284e5269764edf861312eed 100644 (file)
--- a/src/math/linreg/linreg.c
+++ b/src/math/linreg/linreg.c
@@ -184,10 +184,12 @@ pspp_linreg_cache_free (void *m)
       gsl_vector_free (c->indep_std);
       gsl_vector_free (c->ss_indeps);
       gsl_matrix_free (c->cov);
+      gsl_vector_free (c->ssx);
       for (i = 0; i < c->n_coeffs; i++)
        {
          pspp_coeff_free (c->coeff[i]);
        }
+      free (c->coeff);
       free (c);
     }
   return true;
@@ -203,7 +205,7 @@ pspp_linreg (const gsl_vector * Y, const gsl_matrix * X,
             const pspp_linreg_opts * opts, pspp_linreg_cache * cache)
 {
   int rc;
-  gsl_matrix *design;
+  gsl_matrix *design = NULL;
   gsl_matrix_view xtx;
   gsl_matrix_view xm;
   gsl_matrix_view xmxtx;