diff options
author | Joel Brobecker <brobecker@gnat.com> | 2008-09-10 16:19:38 +0000 |
---|---|---|
committer | Joel Brobecker <brobecker@gnat.com> | 2008-09-10 16:19:38 +0000 |
commit | 6d2e05aaf9498296a82e15d26998e9670fc2a1b1 (patch) | |
tree | cfa3069636f3d4776a2ad076325c134528ffb91f /gdb/ada-lang.c | |
parent | 2ac8a782d97ff325b3873a02672c79b5a33a3a0c (diff) | |
download | gdb-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.
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r-- | gdb/ada-lang.c | 4 |
1 files changed, 2 insertions, 2 deletions
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))); |