[Pspp-cvs] pspp/src/data sys-file-reader.c

[John Darrington]

CVSROOT:        /sources/pspp
Module name:    pspp
Changes by:     John Darrington <jmd>   07/07/14 06:25:24

Modified files:
        src/data       : sys-file-reader.c 

Log message:
        Only taint casereader if case size is unknown.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/src/data/sys-file-reader.c?cvsroot=pspp&r1=1.40&r2=1.41

Patches:
Index: sys-file-reader.c
===================================================================
RCS file: /sources/pspp/pspp/src/data/sys-file-reader.c,v
retrieving revision 1.40
retrieving revision 1.41
diff -u -b -r1.40 -r1.41
--- sys-file-reader.c   14 Jul 2007 05:47:46 -0000      1.40
+++ sys-file-reader.c   14 Jul 2007 06:25:23 -0000      1.41
@@ -1161,6 +1161,7 @@
                            sizeof (union value) * r->flt64_cnt))
         {
           case_destroy (c);
+         if ( r->case_cnt != -1 )
          read_error (reader, r);
           return false;
         }
@@ -1237,6 +1238,7 @@
       case_destroy (c);
       if (i != 0)
         partial_record (r);
+      if ( r->case_cnt != -1 )
       read_error (reader, r);
       return false;
     }