* c-valprint.c (c_val_print): Add embedded_offset to address

	for arrays of unspecified length.
	* p-valprint.c (pascal_val_print): Likewise.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 9f935d31355602e30df1720006d76149144600aa..289c5e29cd6f6c8684781d5bd37175ee89d1cc7b 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2011-02-18  Pierre Muller  <muller@ics.u-strasbg.fr>
+
+       * c-valprint.c (c_val_print): Add embedded_offset to address
+       for arrays of unspecified length.
+       * p-valprint.c (pascal_val_print): Likewise.
+
 2011-02-11  Pedro Alves  <pedro@codesourcery.com>
 
        * infrun.c (proceed): Move switching out and in of tfind mode from

diff --git a/gdb/c-valprint.c b/gdb/c-valprint.c
index 85ca3543ef0c17307458358c4d8bf917a23e04ca..5ff65e2227b703958328709497034e6d666cdf9b 100644 (file)
--- a/gdb/c-valprint.c
+++ b/gdb/c-valprint.c
@@ -230,7 +230,7 @@ c_val_print (struct type *type, const gdb_byte *valaddr, int embedded_offset,
          break;
        }
       /* Array of unspecified length: treat like pointer to first elt.  */
-      addr = address;
+      addr = address + embedded_offset;
       goto print_unpacked_pointer;
 
     case TYPE_CODE_MEMBERPTR:

diff --git a/gdb/p-valprint.c b/gdb/p-valprint.c
index 4d39bed265b73a0097429e20d85e73bbd775961b..633a23396c87a52add64e876cca636c9bb8cd7af 100644 (file)
--- a/gdb/p-valprint.c
+++ b/gdb/p-valprint.c
@@ -132,7 +132,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: