This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[lto] Use num_parm_types and nth_parm_type in start_function.
- From: Kazu Hirata <kazu at codesourcery dot com>
- To: gcc-patches at gcc dot gnu dot org
- Date: Thu, 13 Jul 2006 22:29:58 -0700
- Subject: [lto] Use num_parm_types and nth_parm_type in start_function.
Hi,
Attached is a patch to use num_parm_types and nth_parm_type in
start_function.
The patch makes ARGCT start with 0 instead of 1 so that it can be fed
to nth_parm_type.
Tested on x86_64-pc-linux-gnu. Committed to the LTO branch as
obvious.
Kazu Hirata
2006-07-14 Kazu Hirata <kazu@codesourcery.com>
* c-decl.c (start_function): Use num_parm_types and
nth_parm_type.
Index: c-decl.c
===================================================================
--- c-decl.c (revision 115362)
+++ c-decl.c (working copy)
@@ -6074,30 +6074,31 @@ start_function (struct c_declspecs *decl
/* Warn for unlikely, improbable, or stupid declarations of `main'. */
if (warn_main > 0 && MAIN_NAME_P (DECL_NAME (decl1)))
{
- tree args;
+ tree parm_types;
+ int len;
int argct = 0;
if (TYPE_MAIN_VARIANT (TREE_TYPE (TREE_TYPE (decl1)))
!= integer_type_node)
pedwarn ("return type of %q+D is not %<int%>", decl1);
- for (args = TYPE_ARG_TYPES (TREE_TYPE (decl1)); args;
- args = TREE_CHAIN (args))
+ parm_types = TYPE_ARG_TYPES (TREE_TYPE (decl1));
+ len = num_parm_types (parm_types);
+ for (argct = 0; argct < len; argct++)
{
- tree type = args ? TREE_VALUE (args) : 0;
+ tree type = nth_parm_type (parm_types, argct);
if (type == void_type_node)
break;
- ++argct;
switch (argct)
{
- case 1:
+ case 0:
if (TYPE_MAIN_VARIANT (type) != integer_type_node)
pedwarn ("first argument of %q+D should be %<int%>", decl1);
break;
- case 2:
+ case 1:
if (TREE_CODE (type) != POINTER_TYPE
|| TREE_CODE (TREE_TYPE (type)) != POINTER_TYPE
|| (TYPE_MAIN_VARIANT (TREE_TYPE (TREE_TYPE (type)))
@@ -6106,7 +6107,7 @@ start_function (struct c_declspecs *decl
decl1);
break;
- case 3:
+ case 2:
if (TREE_CODE (type) != POINTER_TYPE
|| TREE_CODE (TREE_TYPE (type)) != POINTER_TYPE
|| (TYPE_MAIN_VARIANT (TREE_TYPE (TREE_TYPE (type)))