[Bug fortran/29821] ICE in gfc_typenode_for_spec, at fortran/trans-types.c:666ans-types.c:666

[fxcoudert at gcc dot gnu dot org]

------- Comment #3 from fxcoudert at gcc dot gnu dot org  2006-11-14 06:31 -------
Still more reduced testcase:

module gfcbug45
  implicit none
contains
  subroutine foo 
    integer :: i
    real    :: a
    real, parameter :: eps(1) = (/ 1 /)
    i = 1
    a = sum (eps(i:i) * eps)
  end subroutine foo
end module gfcbug45

If the "implicit none" or the "module ... end module" is removed, the ICE goes
away. Probably worth running using a non-optimized front-end under valgrind.


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |fxcoudert at gcc dot gnu dot
                   |                            |org
   Last reconfirmed|2006-11-13 21:39:59         |2006-11-14 06:31:49
               date|                            |
            Summary|ICE in                      |ICE in
                   |gfc_typenode_for_spec, at   |gfc_typenode_for_spec, at
                   |fortran/trans-types.c:666   |fortran/trans-
                   |ans-types.c:666             |types.c:666ans-types.c:666


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