contrib/gcc/c-decl.c

1022 match_builtin_function_types (tree newtype, tree oldtype)
1029   oldrettype = TREE_TYPE (oldtype);
1035   oldargs = TYPE_ARG_TYPES (oldtype);
1054   return build_type_attribute_variant (trytype, TYPE_ATTRIBUTES (oldtype));
1062 			   tree newtype, tree oldtype)
1067       || !comptypes (TREE_TYPE (oldtype), TREE_TYPE (newtype))
1068       || !((TYPE_ARG_TYPES (oldtype) == 0 && DECL_INITIAL (olddecl) == 0)
1073   t = TYPE_ARG_TYPES (oldtype);
1102 validate_proto_after_old_defn (tree newdecl, tree newtype, tree oldtype)
1109   oldargs = TYPE_ACTUAL_ARG_TYPES (oldtype);
1193   tree newtype, oldtype;
1205   *oldtypep = oldtype = TREE_TYPE (olddecl);
1207   if (oldtype == error_mark_node || newtype == error_mark_node)
1239   if (!comptypes (oldtype, newtype))
1246 	  tree trytype = match_builtin_function_types (newtype, oldtype);
1249 	    *oldtypep = oldtype = trytype;
1275 	       && TYPE_MAIN_VARIANT (TREE_TYPE (oldtype)) == void_type_node
1281 	  TREE_TYPE (newdecl) = *newtypep = newtype = oldtype;
1289 	       && TYPE_MAIN_VARIANT (TREE_TYPE (oldtype)) == integer_type_node
1294 	  TREE_TYPE (olddecl) = *oldtypep = oldtype = newtype;
1299 	  if (TYPE_QUALS (newtype) != TYPE_QUALS (oldtype))
1303 	  diagnose_arglist_conflict (newdecl, olddecl, newtype, oldtype);
1377 	       && !TYPE_ARG_TYPES (oldtype) && TYPE_ARG_TYPES (newtype)
1378 	       && TYPE_ACTUAL_ARG_TYPES (oldtype)
1379 	       && !validate_proto_after_old_defn (newdecl, newtype, oldtype))
1654 merge_decls (tree newdecl, tree olddecl, tree newtype, tree oldtype)
1692     = composite_type (newtype, oldtype);
1695   if (!comptypes (oldtype, TREE_TYPE (newdecl)))
1979   tree newtype = NULL, oldtype = NULL;
1981   if (!diagnose_mismatched_decls (newdecl, olddecl, &newtype, &oldtype))
1988   merge_decls (newdecl, olddecl, newtype, oldtype);