--- Comment #3 from dominiq at lps dot ens dot fr 2008-10-01 21:24 ---
The ICE also disappears if 'l' is replaced by say 'l1' in the module data_C.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37706
--- Comment #2 from dominiq at lps dot ens dot fr 2008-10-01 20:26 ---
Confirmed, reduced code:
module data_C
integer, dimension(200) :: l
integer :: l0
integer :: l24, l27, l28, l29
equivalence ( l(1), l0 )
end module data_C
subroutine nuda
--- Comment #1 from pinskia at gcc dot gnu dot org 2008-10-01 20:10 ---
Reduced testcase:
module data_C
integer, dimension(200) :: l
integer ::v
equivalence ( l(1), l0 )
end module data_C
subroutine nudata(a, l)
USE data_C, only: v