* tree.h: Remove prototype.
* varasm.c (assemble_external): Use value_member instead.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@151534
138bc75d-0d04-0410-961f-
82ee72b054a4
+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
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). */
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);
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