t_mint.mod 150 B

12345678910
  1. MODULE TMInt;
  2. MODULE M EXPORT MyInt;
  3. TYPE MyInt = INTEGER;
  4. END M;
  5. VAR x : M.MyInt;
  6. VAR ExitCode : INTEGER;
  7. BEGIN
  8. x := 5;
  9. ExitCode := x
  10. END TMInt.