Commit ba523395 by Jason Merrill Committed by Jason Merrill

tree.c (walk_tree): Don't walk into default args.

        * tree.c (walk_tree): Don't walk into default args.

        * error.c (dump_expr): Use host_integerp.

From-SVN: r36984
parent ac758f96
2000-10-20 Jason Merrill <jason@redhat.com>
* tree.c (walk_tree): Don't walk into default args.
* error.c (dump_expr): Use host_integerp.
2000-10-20 David Edelsohn <edelsohn@gnu.org> 2000-10-20 David Edelsohn <edelsohn@gnu.org>
* typeck2.c (abstract_virtuals_error): Use "because" instead of * typeck2.c (abstract_virtuals_error): Use "because" instead of
......
...@@ -1609,8 +1609,7 @@ dump_expr (t, flags) ...@@ -1609,8 +1609,7 @@ dump_expr (t, flags)
else else
{ {
do_int: do_int:
if ((unsigned HOST_WIDE_INT) TREE_INT_CST_HIGH (t) if (! host_integerp (t, 0))
!= (TREE_INT_CST_LOW (t) >> (HOST_BITS_PER_WIDE_INT - 1)))
{ {
tree val = t; tree val = t;
......
...@@ -1388,7 +1388,13 @@ walk_tree (tp, func, data, htab) ...@@ -1388,7 +1388,13 @@ walk_tree (tp, func, data, htab)
case FUNCTION_TYPE: case FUNCTION_TYPE:
WALK_SUBTREE (TREE_TYPE (*tp)); WALK_SUBTREE (TREE_TYPE (*tp));
WALK_SUBTREE (TYPE_ARG_TYPES (*tp)); {
tree arg = TYPE_ARG_TYPES (*tp);
/* We never want to walk into default arguments. */
for (; arg; arg = TREE_CHAIN (arg))
WALK_SUBTREE (TREE_VALUE (arg));
}
break; break;
case ARRAY_TYPE: case ARRAY_TYPE:
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment