http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60341
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargl at gcc dot gnu.org
--- Comment #4 from kargl at gcc dot gnu.org ---
Reduced testcase
subroutine modelg(ncm)
implicit none
integer, parameter :: pc = 30, pm = pc - 1
integer i
character*4 catt(pm,2)
integer ncm,iatt(pm,pc)
do i=1,ncm
if (catt(i,1)//catt(i,2).eq.'central') exit
end do
iatt(i,4)=1
end
