[Bug fortran/59440] [4.9 Regression] ICE in force_decl_die, at dwarf2out.c:20111 with -g

[burnus at gcc dot gnu.org]

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

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |openmp

--- Comment #7 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Also the following variant fails, where the NAMELIST and the "grid" variable
are in the same subroutine - and only the NML read is in the internal
subroutine.


module gfcbug127
  implicit none
  type t
     integer :: grid = 0
  end type t
contains
  subroutine read_nml (nnml, s)
    integer, intent(in)  :: nnml
    type(t), intent(out) :: s
    integer              :: grid
    namelist /N/ grid
    call read_nml_type_2
    s%grid = grid
  contains
    subroutine read_nml_type_2
      read (nnml, nml=N)
    end subroutine read_nml_type_2
  end subroutine read_nml
end module gfcbug127