X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fprocedure.c;h=98414a2b0478dbb5e44f306e0f99d90684b86003;hb=cc6a060446e71cace2d828a864c85702e04aba7c;hp=278077e7db93bf3e8786308c85adcac9fe55f78a;hpb=91dc088ddff7486a9d7bdc397761f6b0bcecf41c;p=pspp-builds.git

diff --git a/src/data/procedure.c b/src/data/procedure.c
index 278077e7..98414a2b 100644
--- a/src/data/procedure.c
+++ b/src/data/procedure.c
@@ -137,7 +137,7 @@ proc_execute (struct dataset *ds)
   return proc_commit (ds) && ok;
 }
 
-static struct casereader_class proc_casereader_class;
+static const struct casereader_class proc_casereader_class;
 
 /* Opens dataset DS for reading cases with proc_read.
    proc_commit must be called when done. */
@@ -344,7 +344,7 @@ proc_commit (struct dataset *ds)
 }
 
 /* Casereader class for procedure execution. */
-static struct casereader_class proc_casereader_class =
+static const struct casereader_class proc_casereader_class =
   {
     proc_casereader_read,
     proc_casereader_destroy,