tree.c (free_lang_data_in_decl): Free DECL_FCONTEXT.

2009-10-15 Richard Guenther <rguenther@suse.de> * tree.c (free_lang_data_in_decl): Free DECL_FCONTEXT. From-SVN: r152841

tree.c (free_lang_data_in_decl): Free DECL_FCONTEXT.
2009-10-15 Richard Guenther <rguenther@suse.de> * tree.c (free_lang_data_in_decl): Free DECL_FCONTEXT. From-SVN: r152841
23503efc · Richard Guenther · Richard Biener · b44dd043 · 23503efc · 23503efc
Commit 23503efc authored Oct 15, 2009 by Richard Guenther Committed by Richard Biener Oct 15, 2009
Hide whitespace changes
Inline Side-by-side

Showing with 8 additions and 0 deletions

gcc/ChangeLog
+4 -0

gcc/tree.c
+4 -0

No files found.
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
+2009-10-15  Richard Guenther  <rguenther@suse.de>
+
+	* tree.c (free_lang_data_in_decl): Free DECL_FCONTEXT.
+
 2009-10-15  Jakub Jelinek  <jakub@redhat.com>

 	* config/rs6000/option-defaults.h (OPTION_DEFAULT_SPECS): Don't
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -4402,6 +4402,10 @@ free_lang_data_in_decl (tree decl)
 	  && DECL_FIELD_OFFSET (decl)
 	  && TREE_CODE (DECL_FIELD_OFFSET (decl)) != INTEGER_CST)
 	DECL_FIELD_OFFSET (decl) = NULL_TREE;
+
+      /* DECL_FCONTEXT is only used for debug info generation.  */
+      if (TREE_CODE (decl) == FIELD_DECL)
+	DECL_FCONTEXT (decl) = NULL_TREE;
    }
  else if (TREE_CODE (decl) == FUNCTION_DECL)
    {