re PR fortran/59440 (ICE in force_decl_die, at dwarf2out.c:20111 with -g)
2013-12-12 Tobias Burnus <burnus@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 <burnus@net-b.de> PR fortran/59440 * gfortran.dg/namelist_83.f90: New. * gfortran.dg/namelist_83_2.f90: New. From-SVN: r205939
This commit is contained in:
parent
4201f42320
commit
96d91784e5
|
@ -1,3 +1,9 @@
|
|||
2013-12-12 Tobias Burnus <burnus@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-11 Janus Weil <janus@gcc.gnu.org>
|
||||
|
||||
PR fortran/58916
|
||||
|
|
|
@ -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);
|
||||
}
|
||||
|
||||
|
|
|
@ -1,3 +1,9 @@
|
|||
2013-12-12 Tobias Burnus <burnus@net-b.de>
|
||||
|
||||
PR fortran/59440
|
||||
* gfortran.dg/namelist_83.f90: New.
|
||||
* gfortran.dg/namelist_83_2.f90: New.
|
||||
|
||||
2013-12-12 Jakub Jelinek <jakub@redhat.com>
|
||||
|
||||
PR middle-end/59470
|
||||
|
|
|
@ -0,0 +1,22 @@
|
|||
! { dg-do link }
|
||||
! { dg-options "-g" }
|
||||
! { dg-additional-sources namelist_83_2.f90 }
|
||||
!
|
||||
! Note: compilation would be sufficient, but "compile" cannot be combined
|
||||
! with dg-additional-sources.
|
||||
!
|
||||
! PR fortran/59440
|
||||
!
|
||||
! Contributed by Harald Anlauf
|
||||
!
|
||||
! Was ICEing during DWARF generation.
|
||||
!
|
||||
! This is the first file - dg-additional-sources contains the second one
|
||||
!
|
||||
|
||||
module mo_t_datum
|
||||
implicit none
|
||||
integer :: qbit_conv = 0
|
||||
end module mo_t_datum
|
||||
|
||||
! { dg-final { cleanup-modules "gfcbug126" } }
|
|
@ -0,0 +1,22 @@
|
|||
! { dg-do compile { target { ! *-*-* } } }
|
||||
!
|
||||
! To be compiled with "-g" via namelist_83.f90
|
||||
!
|
||||
! PR fortran/59440
|
||||
!
|
||||
! Contributed by Harald Anlauf
|
||||
!
|
||||
! Was ICEing during DWARF generation.
|
||||
!
|
||||
! This is the second file, the module is in namelist_83.f90
|
||||
!
|
||||
|
||||
!
|
||||
MODULE gfcbug126
|
||||
use mo_t_datum, only: qbit_conv
|
||||
implicit none
|
||||
namelist /OBSERVATIONS/ qbit_conv
|
||||
end module gfcbug126
|
||||
|
||||
! As we have to link, add an empty main program:
|
||||
end
|
Loading…
Reference in New Issue