diff options
Diffstat (limited to 'gdb/ada-lang.c')
| -rw-r--r-- | gdb/ada-lang.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c index fdb89cb..1cfd843 100644 --- a/gdb/ada-lang.c +++ b/gdb/ada-lang.c @@ -1819,7 +1819,8 @@ desc_bounds_type (struct type *type) } /* If ARR is an array descriptor (fat or thin pointer), or pointer to - one, a pointer to its bounds data. Otherwise NULL. */ + one, a pointer to its bounds data. Otherwise, throw an + exception. */ static struct value * desc_bounds (struct value *arr) @@ -1870,7 +1871,7 @@ desc_bounds (struct value *arr) return p_bounds; } else - return NULL; + error (_("Not an array")); } /* If TYPE is the type of an array-descriptor (fat pointer), the bit |