From: Jim Blandy Date: Tue, 10 Jul 2001 21:15:28 +0000 (+0000) Subject: * valops.c (value_cast): When casting a pointer to an integer, X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=2bf1f4a12e3577f7483aaa185c6917d8ba94a9bc;p=binutils-gdb.git * valops.c (value_cast): When casting a pointer to an integer, don't convert it to an address. --- diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 81098a8d946..f439aedfa95 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,8 @@ +2001-07-10 Jim Blandy + + * valops.c (value_cast): When casting a pointer to an integer, + don't convert it to an address. + 2001-07-10 Andrew Cagney * remote-utils.h (struct serial): Declare as opaque. Remove diff --git a/gdb/valops.c b/gdb/valops.c index 7cc025d4eff..dc987c4aba8 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -281,7 +281,18 @@ value_cast (struct type *type, register value_ptr arg2) break; /* fall out and go to normal handling */ } } - longest = value_as_long (arg2); + + /* When we cast pointers to integers, we mustn't use + POINTER_TO_ADDRESS to find the address the pointer + represents, as value_as_long would. GDB should evaluate + expressions just as the compiler would --- and the compiler + sees a cast as a simple reinterpretation of the pointer's + bits. */ + if (code2 == TYPE_CODE_PTR) + longest = extract_unsigned_integer (VALUE_CONTENTS (arg2), + TYPE_LENGTH (type2)); + else + longest = value_as_long (arg2); return value_from_longest (type, convert_to_boolean ? (LONGEST) (longest ? 1 : 0) : longest); }