[Bug fortran/71688] ICE in analyze, at cgraphunit.c:632

[gerhard.steinmetz.fortran@t-online.de]

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

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
Modified a bit :


$ cat z2.f90
program p
   call s
contains
   subroutine s
      real :: x[*] = 1
      block
      end block
      x = 2
   end
end


$ gfortran-6 -fcoarray=lib z2.f90
z2.f90:1:0:

 program p

internal compiler error: in analyze, at cgraphunit.c:632