t_bad_mmod.LST 268 B

12345678910111213141516
  1. Listing:
  2. 1 MODULE TBadMMod;
  3. 2 MODULE M EXPORT cnt;
  4. 3 VAR cnt : INTEGER;
  5. 4 END M;
  6. 5 VAR x : M;
  7. ***** ^ not supported in this phase
  8. 6 VAR ExitCode : INTEGER;
  9. 7 BEGIN
  10. 8 ExitCode := 0
  11. 9 END TBadMMod.
  12. 1 error