M2compiler-V1/tests/r_bad_open.LST

Listing:

    1  MODULE RBadOpen;
    2  TYPE R = RECORD a : ARRAY OF INTEGER END;
*****                               ^ not supported in this phase
    3  VAR r : R;
    4  BEGIN
    5  END RBadOpen.

    1 error