Listing:

    1  MODULE MBadMActual;
    2  MODULE M EXPORT Add;
    3  PROCEDURE Add(x : INTEGER);
    4  BEGIN
    5  END Add;
    6  END M;
    7  VAR ExitCode : INTEGER;
    8  BEGIN
    9    M.Add("s");
*****          ^ invalid procedure call
   10    ExitCode := 0
   11  END MBadMActual.

    1 error