ONEWAY: Fix memory leak in run_oneway.

Bug #39070.

diff --git a/src/language/stats/oneway.c b/src/language/stats/oneway.c
index f9476d5c951bc4b732c09f10613af0de3a96838c..0fc6e1fcb27604447832d4d1080b10f363aa03a6 100644 (file)
--- a/src/language/stats/oneway.c
+++ b/src/language/stats/oneway.c
@@ -841,6 +841,7 @@ run_oneway (const struct oneway_spec *cmd,
       reg_sweep (cm, 0);
 
       pvw->sse = gsl_matrix_get (cm, 0, 0);
       reg_sweep (cm, 0);
 
       pvw->sse = gsl_matrix_get (cm, 0, 0);

+      gsl_matrix_free (cm);

 
       pvw->ssa = pvw->sst - pvw->sse;
 
 
       pvw->ssa = pvw->sst - pvw->sse;