M2compiler-V1/tests/s_bad_elem.LST

Listing:

    1  MODULE SBadElem;
    2  VAR s : SET OF [0 .. 7];
    3  BEGIN
    4    s := {1, "a"}
*****             ^ set operand mismatch
    5  END SBadElem.

    1 error