aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoel Brobecker <brobecker@gnat.com>2008-09-10 16:19:38 +0000
committerJoel Brobecker <brobecker@gnat.com>2008-09-10 16:19:38 +0000
commit6d2e05aaf9498296a82e15d26998e9670fc2a1b1 (patch)
treecfa3069636f3d4776a2ad076325c134528ffb91f
parent2ac8a782d97ff325b3873a02672c79b5a33a3a0c (diff)
downloadgdb-6d2e05aaf9498296a82e15d26998e9670fc2a1b1.zip
gdb-6d2e05aaf9498296a82e15d26998e9670fc2a1b1.tar.gz
gdb-6d2e05aaf9498296a82e15d26998e9670fc2a1b1.tar.bz2
* ada-lang.c (ada_evaluate_subexp) [OP_ATR_SIZE]: Use
archecture-neutral builtin_type_int32 instead of builtin_type_int.
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/ada-lang.c4
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)));