[Bug fortran/60302] [4.9 Regression] ICE with c_f_pointer and android cross compiler

[janus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60302

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
                 CC|                            |janus at gcc dot gnu.org

--- Comment #2 from janus at gcc dot gnu.org ---
Slightly reduced test case:

  subroutine reshape_inplace_c2_c2 (new_shape)
    use, intrinsic :: iso_c_binding
    implicit none
    integer :: new_shape(:)
    complex, pointer :: ptr_x(:)
    type(c_ptr) :: loc_x
    call c_f_pointer (loc_x, ptr_x, new_shape)
  end subroutine

Same double-free ICE.