M2compiler-V2/tests/t_for.LST

Listing:

    1  MODULE T;
    2  VAR r : REAL;
    3      i : INTEGER;
    4  BEGIN
    5    FOR r := 1 TO 10 DO i := i + 1 END
*****        ^ FOR needs integer variable and bounds
    6  END T.

    1 error