M2compiler-V1/tests/p_params.LST

Listing:

    1  MODULE PParams;
    2  VAR ExitCode : INTEGER;
    3  PROCEDURE Sum6(a, b, c, d, e, f : INTEGER) : INTEGER;
    4  BEGIN
    5    RETURN a + b + c + d + e + f
    6  END Sum6;
    7  BEGIN
    8    ExitCode := Sum6(1, 2, 3, 4, 5, 6)
    9  END PParams.

    0 errors