OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* ada-lang.c (ada_evaluate_subexp) <BINOP_DIV>: make sure to 

promote the operands when noside is EVAL_AVOID_SIDE_EFFECTS.
This commit is contained in:
Joel Brobecker 2009-03-13 02:15:01 +00:00
parent 2360f94a42
commit 9c2be529f5
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ChangeLog
View File

@ -1,3 +1,8 @@
2009-03-12 Joel Brobecker <brobecker@adacore.com>
* ada-lang.c (ada_evaluate_subexp) <BINOP_DIV>: make sure to
promote the operands when noside is EVAL_AVOID_SIDE_EFFECTS.
2009-03-12 Joel Brobecker <brobecker@adacore.com>
* ada-tasks.c (ada_task_is_alive): Move up and make static.

5
gdb/ada-lang.c
View File

@ -8458,7 +8458,10 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp,
goto nosideret;
else if (noside == EVAL_AVOID_SIDE_EFFECTS
&& (op == BINOP_DIV || op == BINOP_REM || op == BINOP_MOD))
return value_zero (value_type (arg1), not_lval);
{
binop_promote (exp->language_defn, exp->gdbarch, &arg1, &arg2);
return value_zero (value_type (arg1), not_lval);
}
else
{
type = builtin_type (exp->gdbarch)->builtin_double;