m_const.LST 196 B

1234567891011121314
  1. Listing:
  2. 1 MODULE MConst;
  3. 2 MODULE M EXPORT C;
  4. 3 CONST C = 7;
  5. 4 END M;
  6. 5 VAR ExitCode : INTEGER;
  7. 6 BEGIN
  8. 7 ExitCode := M.C
  9. 8 END MConst.
  10. 0 errors