X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.c;h=f4f49f329ffdf2b1f706d34ce9824e51515035c4;hb=301d4553a2c1496905a6f29a8acfbc028813dedf;hp=ea1b5dba19d3ba23fe83674605f41bca9dee621f;hpb=dfba1c409a4c698f17456783ec0a141a9b3d41de;p=pspp

diff --git a/src/language/stats/examine.c b/src/language/stats/examine.c
index ea1b5dba19..f4f49f329f 100644
--- a/src/language/stats/examine.c
+++ b/src/language/stats/examine.c
@@ -2278,6 +2278,8 @@ cmd_examine (struct lexer *lexer, struct dataset *ds)
 
   caseproto_unref (examine.ex_proto);
 
+  for (i = 0; i < examine.n_iacts; ++i)
+    interaction_destroy (examine.iacts[i]);
   free (examine.ptiles);
   free (examine.dep_vars);
   pool_destroy (examine.pool);