https://gcc.gnu.org/bugzilla/show_bug.cgi?id=83246
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargl at gcc dot gnu.org
--- Comment #1 from kargl at gcc dot gnu.org ---
Reduce testcase.
program dusty_corner
implicit none
integer i
write(*,*) 'Block tests' ! If this line is comment out program works.
block
character(len=*), parameter :: &
& str(*) = [character(len=20) :: '1', '2', '3', '4', '5', 'xxxx' ]
open(10, status='scratch')
write(10, '(a)')(trim(str(i)), i=1, size(str))
close(10)
end block
end program dusty_corner
It seems that gfortran is having problems with an implicit-shaped-array.
