diff options
author | lkrupp <lkrupp@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-26 19:18:08 +0000 |
---|---|---|
committer | lkrupp <lkrupp@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-26 19:18:08 +0000 |
commit | ef8ded2296e85a9188ff60139561d0911cb19aa0 (patch) | |
tree | f41ac17695569bc67b62d585d4e84326662be4a5 /gcc/fortran/gfortran.h | |
parent | 3a52cf750bd9da06cffa7d642f1e74e77bfd8a8c (diff) |
2015-10-26 Louis Krupp <louis.krupp@zoho.com>
PR fortran/66056
* fortran.h: Include namespace pointer in statement label
structure.
* symbol.c (gfc_get_st_label): Store pointer to namespace
that owns the statement label tree in each label.
(gfc_free_st_label): Use namespace owning statement label
tree when deleting statement label.
* io.c: Initialize format_asterisk with NULL namespace pointer.
2015-10-26 Louis Krupp <louis.krupp@zoho.com>
PR fortran/66056
* gfortran.dg/empty_label_typedecl.f90: New test
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@229390 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/gfortran.h')
-rw-r--r-- | gcc/fortran/gfortran.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index b2894cc22c4..90f63cf4807 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -1291,6 +1291,8 @@ typedef struct gfc_st_label tree backend_decl; locus where; + + gfc_namespace *ns; } gfc_st_label; |