From: palves <palves>
Date: Tue, 25 Jan 2011 17:43:28 +0000 (+0000)
Subject: 	* m2-valprint.c (print_unbounded_array): Pass
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=98bd97df2e5906b1716da5a75adfff7211c4cb78;p=pf3gnuchains%2Fpf3gnuchains4x.git

	* m2-valprint.c (print_unbounded_array): Pass
	value_contents_for_printing rather than value_contents, to
	m2_print_array_contents.  Also pass in the value.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 6565d190dd..3ad1b843a4 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2011-01-25  Pedro Alves  <pedro@codesourcery.com>
+
+	* m2-valprint.c (print_unbounded_array): Pass
+	value_contents_for_printing rather than value_contents, to
+	m2_print_array_contents.  Also pass in the value.
+
 2011-01-25  Jan Kratochvil  <jan.kratochvil@redhat.com>
 
 	* dwarf2read.c (dwarf2_read_index, write_psymtabs_to_index)
diff --git a/gdb/m2-valprint.c b/gdb/m2-valprint.c
index 0cf9602632..192c71b892 100644
--- a/gdb/m2-valprint.c
+++ b/gdb/m2-valprint.c
@@ -201,9 +201,10 @@ m2_print_unbounded_array (struct type *type, const gdb_byte *valaddr,
   len = unpack_field_as_long (type, valaddr + embedded_offset, 1);
 
   fprintf_filtered (stream, "{");  
-  m2_print_array_contents (value_type (val), value_contents(val),
+  m2_print_array_contents (value_type (val),
+			   value_contents_for_printing (val),
 			   value_embedded_offset (val), addr, stream,
-			   recurse, NULL, options, len);
+			   recurse, val, options, len);
   fprintf_filtered (stream, ", HIGH = %d}", (int) len);
 }