X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.c;h=f4f49f329ffdf2b1f706d34ce9824e51515035c4;hb=c91f650b47f33cfbd4b7ed45dbfa7eb012c7e6fb;hp=ea1b5dba19d3ba23fe83674605f41bca9dee621f;hpb=0b0ca44889e637251cb5f2dbf3c7fdc4ec8b9bd7;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);