diff options
Diffstat (limited to 'gdb/f-lang.c')
| -rw-r--r-- | gdb/f-lang.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c index 6771758..bbece50 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -1404,7 +1404,7 @@ fortran_adjust_dynamic_array_base_address_hack (struct type *type, tmp_type = check_typedef (tmp_type); struct type *range_type = tmp_type->index_type (); LONGEST lowerbound, upperbound, stride; - if (get_discrete_bounds (range_type, &lowerbound, &upperbound) < 0) + if (!get_discrete_bounds (range_type, &lowerbound, &upperbound)) error ("failed to get range bounds"); /* Figure out the stride for this dimension. */ |