[Pspp-cvs] Changes to pspp/src/print.c

[Ben Pfaff]

Index: pspp/src/print.c
diff -u pspp/src/print.c:1.15 pspp/src/print.c:1.16
--- pspp/src/print.c:1.15       Mon Nov 15 09:51:22 2004
+++ pspp/src/print.c    Mon Jan 24 07:05:36 2005
@@ -977,9 +977,10 @@
 static void
 print_trns_free (struct trns_header * t)
 {
+  struct print_trns *prt = (struct print_trns *) t;
   struct prt_out_spec *i, *n;
 
-  for (i = ((struct print_trns *) t)->spec; i; i = n)
+  for (i = prt->spec; i; i = n)
     {
       switch (i->type)
        {
@@ -998,7 +999,9 @@
       n = i->next;
       free (i);
     }
-  free (((struct print_trns *) t)->line);
+  if (prt->writer != NULL)
+    dfm_close_writer (prt->writer);
+  free (prt->line);
 }
 
 /* PRINT SPACE. */