summaryrefslogtreecommitdiff
path: root/gdb/p-valprint.c
diff options
context:
space:
mode:
authorPierre Muller <muller@ics.u-strasbg.fr>2011-02-18 14:17:37 +0000
committerPierre Muller <muller@ics.u-strasbg.fr>2011-02-18 14:17:37 +0000
commita74d7e323498f3235ad3fe84b9ae5e5547f26f8e (patch)
treedf0eb8ee11af387d23b20a1b39a34331cd5e918e /gdb/p-valprint.c
parentb928c0d60394697b23e0f5fc8d1bd62c0fe69060 (diff)
downloadgdb-a74d7e323498f3235ad3fe84b9ae5e5547f26f8e.tar.gz
* c-valprint.c (c_val_print): Add embedded_offset to address
for arrays of unspecified length. * p-valprint.c (pascal_val_print): Likewise.
Diffstat (limited to 'gdb/p-valprint.c')
-rw-r--r--gdb/p-valprint.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c
index fc50e2a3140..ee765421eeb 100644
--- a/gdb/p-valprint.c
+++ b/gdb/p-valprint.c
@@ -128,7 +128,7 @@ pascal_val_print (struct type *type, const gdb_byte *valaddr,
break;
}
/* Array of unspecified length: treat like pointer to first elt. */
- addr = address;
+ addr = address + embedded_offset;
goto print_unpacked_pointer;
case TYPE_CODE_PTR: