https://gcc.gnu.org/bugzilla/show_bug.cgi?id=107959
--- Comment #1 from Gaius Mulley <gaius at gcc dot gnu.org> ---
Now fixed in git.
$ gm2 -fiso badipv4.mod
badipv4.mod:7:12: error: In procedure ‘ForeachIndiceInIndexDo’: expecting CHAR
datatype and not ‘127’ a ‘Modula-2 base Z’ in the 0th component of the ‘IPV4’
array
7 | Loopback = IPV4 {127, 0, 0, 1} ;
| ~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
badipv4.mod:7:12: error: expecting CHAR datatype and not ‘1’ a ‘Modula-2 base
Z’ in the 3rd component of the ‘IPV4’ array
badipv4.mod:7:12: error: expecting CHAR datatype and not ‘0’ a ‘Modula-2 base
Z’ in the 2nd component of the ‘IPV4’ array
badipv4.mod:7:12: error: expecting CHAR datatype and not ‘0’ a ‘Modula-2 base
Z’ in the 1st component of the ‘IPV4’ array