[Bug modula2/114294] New: expression causes ICE

[gaius at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=114294

            Bug ID: 114294
           Summary: expression causes ICE
           Product: gcc
           Version: 14.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: modula2
          Assignee: gaius at gcc dot gnu.org
          Reporter: gaius at gcc dot gnu.org
  Target Milestone: ---

gm2 ICE occurs if:


MODULE example ;

FROM NumberIO IMPORT WriteInt ;

TYPE
   multidimarray = ARRAY [0..2] OF ARRAY [0..2] OF REAL ;

PROCEDURE foo (VAR c : multidimarray) ;
BEGIN
  WriteInt(1 + HIGH(c[0]), 0)
END foo ;

VAR
   bar: multidimarray ;
BEGIN
   foo (bar)
END example.