diff options
author | hubicka <hubicka@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-03-30 08:03:55 +0000 |
---|---|---|
committer | hubicka <hubicka@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-03-30 08:03:55 +0000 |
commit | 5615be0fbc66201b0bc5d99d3557f3f06e7ef1f4 (patch) | |
tree | c769955fda0ddd702dbc5211fce66e9f31aa7ad9 /gcc/dwarf2out.c | |
parent | 337d8bc191742db06b76214d37c05d9147c771fe (diff) | |
download | gcc-5615be0fbc66201b0bc5d99d3557f3f06e7ef1f4.tar.gz |
PR middle-end/PR30700
* dwarf2out.c (reference_to_unused): Ask cgraph for functions
availablility; add more sanity checking; ask varpool only about
VAR_DECL.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@123358 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/dwarf2out.c')
-rw-r--r-- | gcc/dwarf2out.c | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index fa00452e594..57c8617a1f2 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -10121,12 +10121,24 @@ reference_to_unused (tree * tp, int * walk_subtrees, if (DECL_P (*tp) && ! TREE_PUBLIC (*tp) && ! TREE_USED (*tp) && ! TREE_ASM_WRITTEN (*tp)) return *tp; - else if (DECL_P (*tp) && TREE_CODE (*tp) != FUNCTION_DECL) + else if (!flag_unit_at_a_time) + return NULL_TREE; + else if (!cgraph_global_info_ready + && (TREE_CODE (*tp) == VAR_DECL || TREE_CODE (*tp) == FUNCTION_DECL)) + gcc_unreachable (); + else if (DECL_P (*tp) && TREE_CODE (*tp) == VAR_DECL) { struct varpool_node *node = varpool_node (*tp); if (!node->needed) return *tp; } + else if (DECL_P (*tp) && TREE_CODE (*tp) == FUNCTION_DECL + && (!DECL_EXTERNAL (*tp) || DECL_DECLARED_INLINE_P (*tp))) + { + struct cgraph_node *node = cgraph_node (*tp); + if (!node->output) + return *tp; + } return NULL_TREE; } |