[Bug fortran/70072] New: ICE in gfc_find_array_ref(): No ref found

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

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

            Bug ID: 70072
           Summary: ICE in gfc_find_array_ref(): No ref found
           Product: gcc
           Version: 6.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

A short test case :


$ cat z1.f90
program p
   type t
      integer :: n
   end type
   class(t), parameter :: z(2,3) = t(1)
   print *, size(z, dim=1)
   print *, lbound(z, dim=1)
   print *, ubound(z, dim=1)
end


$ gfortran-6 z1.f90
f951: internal compiler error: gfc_find_array_ref(): No ref found