gcc/cp/name-lookup.c

450       /* The old binding was a type name.  It was placed in
560    Returns either X or an old decl for the same name.
561    If an old decl is returned, it may have been smashed
1136 	  warning (0, "  matches this %q+D under old rules", decl);
1894   tree old;
1900     old = namespace_binding (name, DECL_CONTEXT (decl));
1902     old = lookup_name_innermost_nonclass_level (name);
1904   if (old)
1906       if (TREE_CODE (old) == TYPE_DECL && DECL_ARTIFICIAL (old))
1908 	  tree t = TREE_TYPE (old);
1911 		  || ! DECL_IN_SYSTEM_HEADER (old)))
1913 	  old = NULL_TREE;
1915       else if (is_overloaded_fn (old))
1919 	  for (tmp = old; tmp; tmp = OVL_NEXT (tmp))
1942 	  if (TREE_CODE (old) == FUNCTION_DECL
1943 	      && DECL_ANTICIPATED (old)
1944 	      && !DECL_HIDDEN_FRIEND_P (old))
1945 	    old = NULL;
1947       else if (old == error_mark_node)
1949 	old = NULL_TREE;
1952 	  error ("previous non-function declaration %q+#D", old);
1958   if (old || TREE_CODE (decl) == TEMPLATE_DECL
1964       if (old && TREE_CODE (old) != OVERLOAD)
1965 	new_binding = ovl_cons (decl, ovl_cons (old, NULL_TREE));
1967 	new_binding = ovl_cons (decl, old);
1981 	 need to remove the old binding and replace it with the new
1985       if (TREE_CODE (new_binding) == OVERLOAD && old)
1992 	    if (*d == old
1994 		    && TREE_VALUE (*d) == old))
1997 		  /* Just replace the old binding with the new.  */
2217 	     The old value might be NULL_TREE, it might be a single
2692 	  /* If the old binding was from a base class, and was for a
2694 	     The old binding is still visible if explicitly qualified
2910   tree old, fn;
2931   old = lookup_qualified_name (scope, DECL_NAME (decl), false, true);
2932   if (old == error_mark_node)
2933     /* No old declaration at all.  */
2940   /* Since decl is a function, old should contain a function decl.  */
2941   if (!is_overloaded_fn (old))
2943   fn = OVL_CURRENT (old);
2959   if (is_overloaded_fn (old))
2961       for (; old; old = OVL_NEXT (old))
2962 	if (decls_match (decl, OVL_CURRENT (old)))
2965   else if (decls_match (decl, old))
3480    old is the current set of bindings, new the freshly-found binding.
3486 ambiguous_decl (tree name, struct scope_binding *old, cxx_binding *new,
3490   gcc_assert (old != NULL);
3522   if (!old->value)
3523     old->value = val;
3524   else if (val && val != old->value)
3526       if (is_overloaded_fn (old->value) && is_overloaded_fn (val))
3527 	old->value = merge_functions (old->value, val);
3530 	  old->value = tree_cons (NULL_TREE, old->value,
3532 	  TREE_TYPE (old->value) = error_mark_node;
3539   if (!old->type)
3540     old->type = type;
3541   else if (type && old->type != type)
3546 	  error ("%J  first type here", TYPE_MAIN_DECL (old->type));