M2compiler-V2/tests/d_basic.LST

Listing:

    1  MODULE DBasic;
    2  FROM DLib IMPORT counter, Add;
*****                   ^ duplicate identifier
*****                            ^ duplicate identifier
    3  IMPORT DLib;
    4  VAR ExitCode : INTEGER;
*****      ^ duplicate identifier
    5  BEGIN
    6    counter := 20;
    7    Add(5);
    8    ExitCode := counter + DLib.Get()
    9  END DBasic.

    3 errors