X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Floop.c;h=ce80f665ab17e397c6ef23d33149ea75f1fc9325;hb=8eac4df36306cd357bba29ffbfaddc537fc0be47;hp=1bb044e6ecf4d499b17e171dbff26c108b1389f6;hpb=e40c90b1b6dbd03ce58046ada7f4ddb5a6b4b354;p=pspp-builds.git

diff --git a/src/language/control/loop.c b/src/language/control/loop.c
index 1bb044e6..ce80f665 100644
--- a/src/language/control/loop.c
+++ b/src/language/control/loop.c
@@ -79,7 +79,7 @@ struct loop_trns
     int past_END_LOOP_index;    /* Just past END LOOP transformation. */
   };
 
-static struct ctl_class loop_class;
+static const struct ctl_class loop_class;
 
 static trns_finalize_func loop_trns_finalize;
 static trns_proc_func loop_trns_proc, end_loop_trns_proc, break_trns_proc;
@@ -371,7 +371,7 @@ break_trns_proc (void *loop_, struct ccase *c UNUSED, casenum_t case_num UNUSED)
 }
 
 /* LOOP control structure class definition. */
-static struct ctl_class loop_class =
+static const struct ctl_class loop_class =
   {
     "LOOP",
     "END LOOP",