aboutsummaryrefslogtreecommitdiff
path: root/gdb/ada-lang.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/ada-lang.c')
-rw-r--r--gdb/ada-lang.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 24def95..8f90711 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -6687,7 +6687,7 @@ find_parallel_type_by_descriptive_type (struct type *type, const char *name)
older compilers, the descriptive type information is either absent or
irrelevant when it comes to packed arrays so the above lookup fails.
Fall back to using a parallel lookup by name in this case. */
- if (result == NULL && ada_is_packed_array_type (type))
+ if (result == NULL && ada_is_constrained_packed_array_type (type))
return ada_find_any_type (name);
return result;