aboutsummaryrefslogtreecommitdiff
path: root/gdb
diff options
context:
space:
mode:
authorAndrew Cagney <cagney@redhat.com>2000-07-12 08:31:49 +0000
committerAndrew Cagney <cagney@redhat.com>2000-07-12 08:31:49 +0000
commit634acd5f8a2e36efa4eb98c71fc04519aa8abb26 (patch)
tree176e4adfd8ff57cc462bf2079bcd7b3318ab854c /gdb
parent0ba2a60ea96bb63756bfb01ccc2e20081aad3995 (diff)
downloadgdb-634acd5f8a2e36efa4eb98c71fc04519aa8abb26.zip
gdb-634acd5f8a2e36efa4eb98c71fc04519aa8abb26.tar.gz
gdb-634acd5f8a2e36efa4eb98c71fc04519aa8abb26.tar.bz2
* valops.c (value_cast): Allow cast from INT, ENUM or RANGE to
POINTER.
Diffstat (limited to 'gdb')
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/valops.c14
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)