[Bug fortran/84135] [8 Regression] ICE in gfc_trans_array_cobounds, at fortran/trans-array.c:6033

[gscfq@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84135

--- Comment #1 from G. Steinmetz <gscfq@t-online.de> ---

These analogous cases compile and work :


$ cat z2.f90
program p
   integer :: i
   integer :: x(3)[2,*]
   data (x(i:i+2:i+1), i=1,2) /1,2,3/
   print *, x
end


$ cat z3.f90
program p
   integer :: i
   integer :: x(3)
   data (x(i:i+2:i+1), i=1,2) /1,2,3/
   print *, x
end


$ gfortran-8-20180128 z2.f90 -static-libgfortran -fcoarray=single
$ a.out
           1           3           2


$ gfortran-8-20180128 z3.f90 -static-libgfortran
$ a.out
           1           3           2
$