M2compiler-V1/tests/t_bad_exit.LST

Listing:

    1  MODULE TBadExit;
    2  VAR ExitCode : INTEGER;
    3  BEGIN
    4    ExitCode := 1;
    5    EXIT
*****    ^ not supported in this phase
    6  END TBadExit.

    1 error