M2compiler-V1/tests/t_const.LST

Listing:

    1  MODULE TConst;
    2  CONST Max = 10; Neg = -5; Hex = 0AH;
    3  VAR ExitCode : INTEGER;
    4  BEGIN
    5    ExitCode := Max + Neg + Hex
    6  END TConst.

    0 errors