M2compiler-V1/tests/d_basic.LST

Listing:

    1  MODULE DBasic;
    2  FROM DLib IMPORT v, P;
    3  VAR w : INTEGER;
    4  VAR ExitCode : INTEGER;
    5  BEGIN
    6    w := v + DLib.c;
    7    DLib.Q(w);
    8    ExitCode := P(w) + DLib.v
    9  END DBasic.

    0 errors