2008-01-25 Pierre Muller <muller@ics.u-strasbg.fr>
* eval.c (evaluate_subexp_standard): Support BINOP_INTDIV opcode.
This commit is contained in:
parent
d118ef8764
commit
9b3442eed1
|
@ -1,3 +1,8 @@
|
||||||
|
2008-01-30 Pierre Muller <muller@ics.u-strasbg.fr>
|
||||||
|
|
||||||
|
* eval.c (evaluate_subexp_standard): Support
|
||||||
|
BINOP_INTDIV opcode.
|
||||||
|
|
||||||
2008-01-30 Paul N. Hilfinger <hilfinger@adacore.com>
|
2008-01-30 Paul N. Hilfinger <hilfinger@adacore.com>
|
||||||
|
|
||||||
* valarith.c (value_binop): Add floating-point BINOP_MIN and
|
* valarith.c (value_binop): Add floating-point BINOP_MIN and
|
||||||
|
|
|
@ -1496,6 +1496,7 @@ evaluate_subexp_standard (struct type *expect_type,
|
||||||
case BINOP_EXP:
|
case BINOP_EXP:
|
||||||
case BINOP_MUL:
|
case BINOP_MUL:
|
||||||
case BINOP_DIV:
|
case BINOP_DIV:
|
||||||
|
case BINOP_INTDIV:
|
||||||
case BINOP_REM:
|
case BINOP_REM:
|
||||||
case BINOP_MOD:
|
case BINOP_MOD:
|
||||||
case BINOP_LSH:
|
case BINOP_LSH:
|
||||||
|
@ -1510,7 +1511,8 @@ evaluate_subexp_standard (struct type *expect_type,
|
||||||
if (binop_user_defined_p (op, arg1, arg2))
|
if (binop_user_defined_p (op, arg1, arg2))
|
||||||
return value_x_binop (arg1, arg2, op, OP_NULL, noside);
|
return value_x_binop (arg1, arg2, op, OP_NULL, noside);
|
||||||
else if (noside == EVAL_AVOID_SIDE_EFFECTS
|
else if (noside == EVAL_AVOID_SIDE_EFFECTS
|
||||||
&& (op == BINOP_DIV || op == BINOP_REM || op == BINOP_MOD))
|
&& (op == BINOP_DIV || op == BINOP_REM || op == BINOP_MOD
|
||||||
|
|| op == BINOP_INTDIV))
|
||||||
return value_zero (value_type (arg1), not_lval);
|
return value_zero (value_type (arg1), not_lval);
|
||||||
else
|
else
|
||||||
return value_binop (arg1, arg2, op);
|
return value_binop (arg1, arg2, op);
|
||||||
|
|
Loading…
Reference in New Issue