parse.y (verify_constructor_super): Use loop variable m_arg_type' initialized with mdecl_arg_type'.

2000-06-29  Alexandre Petit-Bianco  <apbianco@cygnus.com>

	* parse.y (verify_constructor_super): Use loop variable
	`m_arg_type' initialized with `mdecl_arg_type'.

From-SVN: r34800
This commit is contained in:
Alexandre Petit-Bianco 2000-06-30 02:22:15 +00:00 committed by Alexandre Petit-Bianco
parent ffaff4147a
commit cf1b227457
3 changed files with 19 additions and 12 deletions

View File

@ -1,3 +1,8 @@
2000-06-29 Alexandre Petit-Bianco <apbianco@cygnus.com>
* parse.y (verify_constructor_super): Use loop variable
`m_arg_type' initialized with `mdecl_arg_type'.
2000-06-29 Tom Tromey <tromey@cygnus.com>
* parse.y (resolve_field_access): Handle case where `type_found'

View File

@ -11078,18 +11078,19 @@ verify_constructor_super (mdecl)
for (sdecl = TYPE_METHODS (class); sdecl; sdecl = TREE_CHAIN (sdecl))
if (DECL_CONSTRUCTOR_P (sdecl))
{
tree m_arg_type;
tree arg_type = TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (sdecl)));
if (super_inner)
arg_type = TREE_CHAIN (arg_type);
for (; (arg_type != end_params_node
&& mdecl_arg_type != end_params_node);
for (m_arg_type = mdecl_arg_type;
(arg_type != end_params_node
&& m_arg_type != end_params_node);
arg_type = TREE_CHAIN (arg_type),
mdecl_arg_type = TREE_CHAIN (mdecl_arg_type))
if (TREE_VALUE (arg_type) != TREE_VALUE (mdecl_arg_type))
m_arg_type = TREE_CHAIN (m_arg_type))
if (TREE_VALUE (arg_type) != TREE_VALUE (m_arg_type))
break;
if (arg_type == end_params_node &&
mdecl_arg_type == end_params_node)
if (arg_type == end_params_node && m_arg_type == end_params_node)
return 0;
}
}

View File

@ -8380,18 +8380,19 @@ verify_constructor_super (mdecl)
for (sdecl = TYPE_METHODS (class); sdecl; sdecl = TREE_CHAIN (sdecl))
if (DECL_CONSTRUCTOR_P (sdecl))
{
tree m_arg_type;
tree arg_type = TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (sdecl)));
if (super_inner)
arg_type = TREE_CHAIN (arg_type);
for (; (arg_type != end_params_node
&& mdecl_arg_type != end_params_node);
for (m_arg_type = mdecl_arg_type;
(arg_type != end_params_node
&& m_arg_type != end_params_node);
arg_type = TREE_CHAIN (arg_type),
mdecl_arg_type = TREE_CHAIN (mdecl_arg_type))
if (TREE_VALUE (arg_type) != TREE_VALUE (mdecl_arg_type))
m_arg_type = TREE_CHAIN (m_arg_type))
if (TREE_VALUE (arg_type) != TREE_VALUE (m_arg_type))
break;
if (arg_type == end_params_node &&
mdecl_arg_type == end_params_node)
if (arg_type == end_params_node && m_arg_type == end_params_node)
return 0;
}
}