@@ -0,0 +1,8 @@
+static char m[] = "Warning: FOR-loop control variable was changed in the body";
+_forloopchk(a,b)
+ unsigned a, b;
+{
+ if (a != b) {
+ Traps_Message(m , 0, sizeof(m) - 2, 1);
+ }
+}
@@ -16,6 +16,7 @@ Semaphores.mod
random.mod
Strings.mod
catch.c
+FORchk.c
Traps.mod
Arguments.c
LtoUset.e