git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

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:
Tobias Burnus 2013-12-12 20:41:11 +01:00 committed by Tobias Burnus
parent 4201f42320
commit 96d91784e5
5 changed files with 57 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -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> 2013-12-11 Janus Weil <janus@gcc.gnu.org>
PR fortran/58916 PR fortran/58916

1
gcc/fortran/trans-decl.c
View File

@ -4164,6 +4164,7 @@ generate_namelist_decl (gfc_symbol * sym)
nml->sym->attr.referenced = 1; nml->sym->attr.referenced = 1;
nml->sym->backend_decl = gfc_get_symbol_decl (nml->sym); 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); CONSTRUCTOR_APPEND_ELT (nml_decls, NULL_TREE, nml->sym->backend_decl);
} }

6
gcc/testsuite/ChangeLog
View File

@ -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> 2013-12-12 Jakub Jelinek <jakub@redhat.com>
PR middle-end/59470 PR middle-end/59470

22
gcc/testsuite/gfortran.dg/namelist_83.f90 Normal file
View File

@ -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" } }

22
gcc/testsuite/gfortran.dg/namelist_83_2.f90 Normal file
View File

@ -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