On Thu, Dec 12, 2013 at 08:25:15AM +0100, Tobias Burnus wrote:
> A rather simple patch to ensure that the die is generated. Without,
> one runs into an ICE. That's a follow up to my namelist debug patch
> (and the ICE is caused by it).
>
> Build on x86-64-gnu-linux and lightly tested. Full regtest currently
> running.
> OK for the trunk, when it succeeds?
> 2013-12-12 Tobias Burnus <bur...@net-b.de>
>
> PR fortran/59440
> * trans-decl.c (generate_namelist_decl): Ensure debug DIE
> is created by setting DECL_IGNORED_P to 0.
>
> 2013-12-12 Tobias Burnus <bur...@net-b.de>
>
> PR fortran/59440
> * gfortran.dg/namelist_83.f90: New.
> * gfortran.dg/namelist_83_2.f90: New.
Ok.
> --- a/gcc/fortran/trans-decl.c
> +++ b/gcc/fortran/trans-decl.c
> @@ -4164,6 +4164,7 @@ generate_namelist_decl (gfc_symbol * sym)
> nml->sym->attr.referenced = 1;
> nml->sym->backend_decl = gfc_get_symbol_decl (nml->sym);
> }
> + DECL_IGNORED_P (nml->sym->backend_decl) = 0;
> CONSTRUCTOR_APPEND_ELT (nml_decls, NULL_TREE, nml->sym->backend_decl);
> }
>
> +module mo_t_datum
> + implicit none
> + integer :: qbit_conv = 0
> +end module mo_t_datum
> +
> +! { dg-final { cleanup-modules "gfcbug126" } }
Shouldn't this be
! { dg-final { cleanup-modules "mo_t_datum gfcbug126" } }
though?
Jakub
