1! { dg-do compile } 2! { dg-timeout-factor 4 } 3! PR20923 gfortran slow for large array constructors. 4! Test case prepared from PR by Jerry DeLisle <jvdelisle@gcc.gnu.org> 5program sel 6 implicit none 7 integer(kind=4),parameter :: n=1000 8 integer(kind=4) :: i,j 9 real(kind=4),dimension(n*n) :: vect 10 vect(:) = (/ ((( (i+j+3)),i=1,n),j=1,n) /) 11end 12