tree.c (tree_find_value): Remove.
* tree.c (tree_find_value): Remove. * tree.h: Remove prototype. * varasm.c (assemble_external): Use value_member instead. From-SVN: r151534
This commit is contained in:
parent
60adb6417c
commit
d5df7223bf
|
@ -1,3 +1,9 @@
|
|||
2009-09-04 Jason Merrill <jason@redhat.com>
|
||||
|
||||
* tree.c (tree_find_value): Remove.
|
||||
* tree.h: Remove prototype.
|
||||
* varasm.c (assemble_external): Use value_member instead.
|
||||
|
||||
2009-09-08 Alexandre Oliva <aoliva@redhat.com>
|
||||
|
||||
* toplev.c (process_options): Choose default debugging type when
|
||||
|
|
12
gcc/tree.c
12
gcc/tree.c
|
@ -2003,18 +2003,6 @@ tree_last (tree chain)
|
|||
return chain;
|
||||
}
|
||||
|
||||
/* Return the node in a chain of nodes whose value is x, NULL if not found. */
|
||||
|
||||
tree
|
||||
tree_find_value (tree chain, tree x)
|
||||
{
|
||||
tree list;
|
||||
for (list = chain; list; list = TREE_CHAIN (list))
|
||||
if (TREE_VALUE (list) == x)
|
||||
return list;
|
||||
return NULL;
|
||||
}
|
||||
|
||||
/* Reverse the order of elements in the chain T,
|
||||
and return the new head of the chain (old last element). */
|
||||
|
||||
|
|
|
@ -4278,10 +4278,6 @@ extern tree tree_cons_stat (tree, tree, tree MEM_STAT_DECL);
|
|||
|
||||
extern tree tree_last (tree);
|
||||
|
||||
/* Return the node in a chain whose TREE_VALUE is x, NULL if not found. */
|
||||
|
||||
extern tree tree_find_value (tree, tree);
|
||||
|
||||
/* Reverse the order of elements in a chain, and return the new head. */
|
||||
|
||||
extern tree nreverse (tree);
|
||||
|
|
|
@ -2328,11 +2328,11 @@ assemble_external (tree decl ATTRIBUTE_UNUSED)
|
|||
for declarations that can be weak, it happens to be
|
||||
match. */
|
||||
&& !TREE_STATIC (decl)
|
||||
&& tree_find_value (weak_decls, decl) == NULL_TREE)
|
||||
weak_decls = tree_cons (NULL, decl, weak_decls);
|
||||
&& value_member (decl, weak_decls) == NULL_TREE)
|
||||
weak_decls = tree_cons (NULL, decl, weak_decls);
|
||||
|
||||
#ifdef ASM_OUTPUT_EXTERNAL
|
||||
if (tree_find_value (pending_assemble_externals, decl) == NULL_TREE)
|
||||
if (value_member (decl, pending_assemble_externals) == NULL_TREE)
|
||||
pending_assemble_externals = tree_cons (NULL, decl,
|
||||
pending_assemble_externals);
|
||||
#endif
|
||||
|
|
Loading…
Reference in New Issue