aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gdb/ChangeLog5
-rw-r--r--gdb/ada-valprint.c2
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 3f47aff..a96b342 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,10 @@
2014-01-27 Joel Brobecker <brobecker@adacore.com>
+ * ada-valprint.c (print_optional_low_bound): Get index_type's
+ target type for as long as it is a TYPE_CODE_RANGE.
+
+2014-01-27 Joel Brobecker <brobecker@adacore.com>
+
* procfs.c (procfs_make_note_section): Remove assertion and
associated comment.
diff --git a/gdb/ada-valprint.c b/gdb/ada-valprint.c
index 8f2219f..b7b3a9c 100644
--- a/gdb/ada-valprint.c
+++ b/gdb/ada-valprint.c
@@ -79,7 +79,7 @@ print_optional_low_bound (struct ui_file *stream, struct type *type,
index_type = TYPE_INDEX_TYPE (type);
- if (TYPE_CODE (index_type) == TYPE_CODE_RANGE)
+ while (TYPE_CODE (index_type) == TYPE_CODE_RANGE)
{
/* We need to know what the base type is, in order to do the
appropriate check below. Otherwise, if this is a subrange