ack/lang/m2/libm2/FORchk.c

9 lines
177 B
C
Raw Normal View History

1987-09-10 15:56:28 +00:00
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);
}
}