Commit 50b04185 by Richard Kenner Committed by Richard Kenner

* tree-cfg.c (verify_expr): Use CHECK_OK in binary case.

From-SVN: r84114
parent 8963a517
2004-07-05 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
* tree-cfg.c (verify_expr): Use CHECK_OK in binary case.
* function.c, langhooks-def.h, langhooks.h: Move max_size hook
to type hooks; remove bogus PARAMS.
......
......@@ -3151,7 +3151,9 @@ verify_expr (tree *tp, int *walk_subtrees, void *data ATTRIBUTE_UNUSED)
if (TYPE_P (t))
*walk_subtrees = 0;
/* Check operand N for being valid GIMPLE and give error MSG if not. */
/* Check operand N for being valid GIMPLE and give error MSG if not.
We check for constants explicitly since they are not considered
gimple invariants if they overflowed. */
#define CHECK_OP(N, MSG) \
do { if (TREE_CODE_CLASS (TREE_CODE (TREE_OPERAND (t, N))) != 'c' \
&& !is_gimple_val (TREE_OPERAND (t, N))) \
......@@ -3300,24 +3302,8 @@ verify_expr (tree *tp, int *walk_subtrees, void *data ATTRIBUTE_UNUSED)
case BIT_IOR_EXPR:
case BIT_XOR_EXPR:
case BIT_AND_EXPR:
x = TREE_OPERAND (t, 0);
/* We check for constants explicitly since they are not considered
gimple invariants if they overflowed. */
if (TREE_CODE_CLASS (TREE_CODE (x)) != 'c'
&& !is_gimple_val (x))
{
error ("Invalid operand to binary operator");
return x;
}
x = TREE_OPERAND (t, 1);
/* We check for constants explicitly since they are not considered
gimple invariants if they overflowed. */
if (TREE_CODE_CLASS (TREE_CODE (x)) != 'c'
&& !is_gimple_val (x))
{
error ("Invalid operand to binary operator");
return x;
}
CHECK_OP (0, "Invalid operand to binary operator");
CHECK_OP (1, "Invalid operand to binary operator");
break;
default:
......
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