M2compiler-V1/tests/a_bad_asn.LST

Listing:

    1  MODULE ABadAsn;
    2  VAR a : ARRAY [1 .. 5] OF INTEGER; x : INTEGER;
    3  BEGIN
    4    x := 1;
    5    a := x
*****         ^ incompatible assignment
    6  END ABadAsn.

    1 error