M2compiler-V1/tests/m_bad_mactual.mod

MODULE MBadMActual;
MODULE M EXPORT Add;
PROCEDURE Add(x : INTEGER);
BEGIN
END Add;
END M;
VAR ExitCode : INTEGER;
BEGIN
  M.Add("s");
  ExitCode := 0
END MBadMActual.