Cleaning up freeing of regression coefficients

[pspp-builds.git] / lib / linreg / linreg.c

diff --git a/lib/linreg/linreg.c b/lib/linreg/linreg.c
index 1fe4a79e5784aff1868c09e6c3d1aa56463508df..17833e57db0dd0bd877a395de00bfd5d8d6a3c0d 100644 (file)
--- a/lib/linreg/linreg.c
+++ b/lib/linreg/linreg.c
@@ -118,12 +118,7 @@ pspp_linreg_cache_free (pspp_linreg_cache * c)
   gsl_vector_free (c->indep_std);
   gsl_vector_free (c->ss_indeps);
   gsl_matrix_free (c->cov);
-#if 0  
-  for (i = 1; i < c->n_coeffs; i++)
-    {
-      pspp_linreg_coeff_free (c->coeff + i);
-    }
-#endif
+  pspp_linreg_coeff_free (c->coeff);
   free (c);
 }