X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fglm.c;h=862f49cea24300a7f4f158e72933cf8e613b0165;hb=3c5fcaa67efcee56981c16b543fb9f679787a486;hp=678ecce78dad8c82ce15f71ada57630cf22004c9;hpb=44a9abb173e2b0f33b011a853ae1603fda0ce29b;p=pspp-builds.git

diff --git a/src/language/stats/glm.c b/src/language/stats/glm.c
index 678ecce7..862f49ce 100644
--- a/src/language/stats/glm.c
+++ b/src/language/stats/glm.c
@@ -263,6 +263,8 @@ run_glm (const struct glm_spec *cmd, struct casereader *input, const struct data
     reg_sweep (cm, 0);
 
     dump_matrix (cm);
+
+    gsl_matrix_free (cm);
   }
 
   if (!taint_has_tainted_successor (taint))