p_bad_dispose.mod 73 B

12345
  1. MODULE PBadDispose;
  2. VAR x : INTEGER;
  3. BEGIN
  4. DISPOSE(x)
  5. END PBadDispose.