Commit d5df7223 by Jason Merrill Committed by Jason Merrill

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
parent 60adb641
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> 2009-09-08 Alexandre Oliva <aoliva@redhat.com>
* toplev.c (process_options): Choose default debugging type when * toplev.c (process_options): Choose default debugging type when
......
...@@ -2003,18 +2003,6 @@ tree_last (tree chain) ...@@ -2003,18 +2003,6 @@ tree_last (tree chain)
return 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, /* Reverse the order of elements in the chain T,
and return the new head of the chain (old last element). */ 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); ...@@ -4278,10 +4278,6 @@ extern tree tree_cons_stat (tree, tree, tree MEM_STAT_DECL);
extern tree tree_last (tree); 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. */ /* Reverse the order of elements in a chain, and return the new head. */
extern tree nreverse (tree); extern tree nreverse (tree);
......
...@@ -2328,11 +2328,11 @@ assemble_external (tree decl ATTRIBUTE_UNUSED) ...@@ -2328,11 +2328,11 @@ assemble_external (tree decl ATTRIBUTE_UNUSED)
for declarations that can be weak, it happens to be for declarations that can be weak, it happens to be
match. */ match. */
&& !TREE_STATIC (decl) && !TREE_STATIC (decl)
&& tree_find_value (weak_decls, decl) == NULL_TREE) && value_member (decl, weak_decls) == NULL_TREE)
weak_decls = tree_cons (NULL, decl, weak_decls); weak_decls = tree_cons (NULL, decl, weak_decls);
#ifdef ASM_OUTPUT_EXTERNAL #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 = tree_cons (NULL, decl,
pending_assemble_externals); pending_assemble_externals);
#endif #endif
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment