s_bad_long.mod 89 B

12345
  1. MODULE SBadLong;
  2. VAR s : ARRAY [1 .. 1] OF CHAR;
  3. BEGIN
  4. s := "abcdefghij"
  5. END SBadLong.