s_bad_cmp.mod 93 B

12345
  1. MODULE SBadCmp;
  2. VAR a, b : ARRAY [1 .. 3] OF INTEGER;
  3. BEGIN
  4. IF a = b THEN END
  5. END SBadCmp.