X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fcasewriter.c;h=7631d776d3d2ac59cf336eccde48446aa8832b80;hb=425d780e0e2cc08c58722145df4d3dd808f01d48;hp=f7760eca04a5ae5d1b78bf45c46c92676b63a0c7;hpb=3bbb4370239deb29ebbf813d258aef6249e2a431;p=pspp

diff --git a/src/data/casewriter.c b/src/data/casewriter.c
index f7760eca04..7631d776d3 100644
--- a/src/data/casewriter.c
+++ b/src/data/casewriter.c
@@ -99,6 +99,8 @@ casewriter_make_reader (struct casewriter *writer)
 {
   struct casereader *reader = writer->class->convert_to_reader (writer, writer->aux);
   taint_propagate (writer->taint, casereader_get_taint (reader));
+
+  caseproto_unref (writer->proto);
   taint_destroy (writer->taint);
   free (writer);
   return reader;