[Pspp-cvs] pspp/src/data procedure.c [simpler-proc]

[Ben Pfaff]

CVSROOT:        /cvsroot/pspp
Module name:    pspp
Branch:         simpler-proc
Changes by:     Ben Pfaff <blp> 07/05/04 03:51:09

Modified files:
        src/data       : procedure.c 

Log message:
        Fix compile warnings.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/src/data/procedure.c?cvsroot=pspp&only_with_tag=simpler-proc&r1=1.25.2.3&r2=1.25.2.4

Patches:
Index: procedure.c
===================================================================
RCS file: /cvsroot/pspp/pspp/src/data/procedure.c,v
retrieving revision 1.25.2.3
retrieving revision 1.25.2.4
diff -u -b -r1.25.2.3 -r1.25.2.4
--- procedure.c 4 May 2007 03:48:47 -0000       1.25.2.3
+++ procedure.c 4 May 2007 03:51:09 -0000       1.25.2.4
@@ -37,6 +37,7 @@
 #include <libpspp/deque.h>
 #include <libpspp/misc.h>
 #include <libpspp/str.h>
+#include <libpspp/taint.h>
 
 struct dataset {
   /* Cases are read from source,
@@ -610,8 +611,8 @@
         }
       else 
         {
-          struct taint *taint = casereader_get_taint (ds->source);
-          taint_reset_successor_taint (taint);
+          const struct taint *taint = casereader_get_taint (ds->source);
+          taint_reset_successor_taint ((struct taint *) taint);
           assert (!taint_has_tainted_successor (taint));
         }
     }