M2compiler-V1/tests/m_arr.LST

Listing:

    1  MODULE MArr;
    2  MODULE M EXPORT arr;
    3  VAR arr : ARRAY [1..3] OF INTEGER;
    4  END M;
    5  VAR ExitCode : INTEGER;
    6  BEGIN
    7    M.arr[2] := 42;
    8    ExitCode := M.arr[2]
    9  END MArr.

    0 errors