t_bad_open.mod 63 B

1234
  1. MODULE TBadOpen;
  2. VAR x : ARRAY OF INTEGER;
  3. BEGIN
  4. END TBadOpen.