diff options
| -rw-r--r-- | gdb/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/valops.c | 14 |
2 files changed, 19 insertions, 0 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 59ec071..c23d07c 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,8 @@ +Tue Jul 11 19:45:42 2000 Andrew Cagney <cagney@b1.cygnus.com> + + * valops.c (value_cast): Allow cast from INT, ENUM or RANGE to + POINTER. + 2000-07-11 Scott Bambrough <scottb@netwinder.org> * command.c (do_setshow_command): Fix typo in var_auto_boolean diff --git a/gdb/valops.c b/gdb/valops.c index 114a035..a32db08 100644 --- a/gdb/valops.c +++ b/gdb/valops.c @@ -290,6 +290,20 @@ value_cast (type, arg2) return value_from_longest (type, convert_to_boolean ? (LONGEST) (longest ? 1 : 0) : longest); } + else if (code1 == TYPE_CODE_PTR && (code2 == TYPE_CODE_INT || + code2 == TYPE_CODE_ENUM || + code2 == TYPE_CODE_RANGE)) + { + int ptr_bit = HOST_CHAR_BIT * TYPE_LENGTH (type); + LONGEST longest = value_as_long (arg2); + if (ptr_bit < sizeof (LONGEST) * HOST_CHAR_BIT) + { + if (longest >= ((LONGEST) 1 << ptr_bit) + || longest <= -((LONGEST) 1 << ptr_bit)) + warning ("value truncated"); + } + return value_from_longest (type, longest); + } else if (TYPE_LENGTH (type) == TYPE_LENGTH (type2)) { if (code1 == TYPE_CODE_PTR && code2 == TYPE_CODE_PTR) |