m_const.mod 114 B

12345678
  1. MODULE MConst;
  2. MODULE M EXPORT C;
  3. CONST C = 7;
  4. END M;
  5. VAR ExitCode : INTEGER;
  6. BEGIN
  7. ExitCode := M.C
  8. END MConst.