Hi,

this code causes an ICE with -O and higher:

% cat cat gfcbug54.f90
module mod_foo
  integer :: param
end module mod_foo

program gfcbug54
  use mod_foo, only : param

  integer, parameter :: n = 5
  integer            :: j2a (-1-n:n+1), j2i (-1-n:n+1)

  if (param < 0) j2a = j2i
end program gfcbug54
% gfc -O gfcbug54.f90
gfcbug54.f90: In function 'MAIN__':
gfcbug54.f90:11: internal compiler error: in operand_equal_p, at
fold-const.c:2539


-- 
           Summary: [Optimization] ICE in operand_equal_p, at fold-
                    const.c:2539
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: anlauf at gmx dot de
  GCC host triplet: i686-pc-linux-gnu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30412

Reply via email to