[patch, fortran] PR20923 gfortran slow for large array constructors

[Dominique Dhumieres]

Jerry,

Your patch seems to work as advertised. The only oddity is that the test

integer, parameter :: n=65536
integer, parameter :: i(n)=(/(mod(k,2),k=1,n)/)
integer, parameter :: m(n)=i(n:1:-1)
print *, i(1), m(1), i(n), m(n)
end

gives the error, but there is no error if you remove the print
statement. Do you understand why?

Thanks for the work.

Dominique