[Bug fortran/77310] ICE on SELECT CASE with associate name

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |WAITING
   Last reconfirmed|                            |2016-08-21
     Ever confirmed|0                           |1

--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
I get the same ICE with the following code

subroutine ice_example
  type :: inner
    integer :: n
  end type
  type :: outer
    type(inner), allocatable :: array(:)
  end type
  type(outer) :: var
  associate (n_array => var%array%n)
    n_array(1)=1  ! <== ICE HERE
  end associate
end subroutine

I think it is a duplicate of pr70705 and pr49636.