gdb/

[external/binutils.git] / gdb / eval.c

diff --git a/gdb/eval.c b/gdb/eval.c
index 55582e0..7d48d7e 100644 (file)
--- a/gdb/eval.c
+++ b/gdb/eval.c
@@ -1404,13 +1404,15 @@ evaluate_subexp_standard (struct type *expect_type,
            {
              struct type *type_ptr
                = lookup_pointer_type (TYPE_DOMAIN_TYPE (type));
+             struct type *target_type_ptr
+               = lookup_pointer_type (TYPE_TARGET_TYPE (type));
 
              /* Now, convert these values to an address.  */
              arg2 = value_cast (type_ptr, arg2);
 
              mem_offset = value_as_long (arg1);
 
-             arg1 = value_from_pointer (type_ptr,
+             arg1 = value_from_pointer (target_type_ptr,
                                         value_as_long (arg2) + mem_offset);
              arg1 = value_ind (arg1);
              tem = 1;