diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/ada-lang.c | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index deec62d..480763c 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2008-09-10 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (ada_evaluate_subexp) [OP_ATR_SIZE]: Use + archecture-neutral builtin_type_int32 instead of builtin_type_int. + +2008-09-10 Joel Brobecker <brobecker@adacore.com> + * ada-lang.c (ada_evaluate_subexp) [BINOP_ADD, BINOP_SUB]: Add special handling for pointer types. diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index fa163c4..05ea466 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -9074,9 +9074,9 @@ ada_evaluate_subexp (struct type *expect_type, struct expression *exp, if (noside == EVAL_SKIP) goto nosideret; else if (noside == EVAL_AVOID_SIDE_EFFECTS) - return value_zero (builtin_type_int, not_lval); + return value_zero (builtin_type_int32, not_lval); else - return value_from_longest (builtin_type_int, + return value_from_longest (builtin_type_int32, TARGET_CHAR_BIT * TYPE_LENGTH (value_type (arg1))); |