t_bad_undeclared.mod 61 B

1234
  1. MODULE Undecl;
  2. VAR x : INTEGER;
  3. BEGIN x := y + 1
  4. END Undecl.