OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

tree.h (type_num_arguments): Declare it. 

* tree.h (type_num_arguments): Declare it.
	* tree.c (type_num_arguments): New function.

From-SVN: r42418
This commit is contained in:
Mark Mitchell 2001-05-22 03:03:26 +00:00 committed by Mark Mitchell
parent ca29c7970a
commit f5d6a24c2e
3 changed files with 28 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ChangeLog
View File

@ -1,3 +1,8 @@
2001-05-21 Mark Mitchell <mark@codesourcery.com>
* tree.h (type_num_arguments): Declare it.
* tree.c (type_num_arguments): New function.
2001-05-21 Richard Henderson <rth@redhat.com>
* dwarf2out.c (current_funcdef_number): Move outside dwarf2

22
gcc/tree.c
View File

@ -3334,6 +3334,28 @@ type_list_equal (l1, l2)
return t1 == t2;
}
/* Returns the number of arguments to the FUNCTION_TYPE or METHOD_TYPE
given by TYPE. If the argument list accepts variable arguments,
then this function counts only the ordinary arguments. */
int
type_num_arguments (type)
tree type;
{
int i = 0;
tree t;
for (t = TYPE_ARG_TYPES (type); t; t = TREE_CHAIN (t))
/* If the function does not take a variable number of arguments,
the last element in the list will have type `void'. */
if (VOID_TYPE_P (TREE_VALUE (t)))
break;
else
++i;
return i;
}
/* Nonzero if integer constants T1 and T2
represent the same constant value. */

1
gcc/tree.h
View File

@ -2520,6 +2520,7 @@ extern tree get_set_constructor_bytes PARAMS ((tree,
unsigned char *, int));
extern tree get_callee_fndecl PARAMS ((tree));
extern void set_decl_assembler_name PARAMS ((tree));
extern int type_num_arguments PARAMS ((tree));
/* In stmt.c */