https://gcc.gnu.org/bugzilla/show_bug.cgi?id=105633
anlauf at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |anlauf at gcc dot gnu.org
Status|NEW |ASSIGNED
Assignee|unassigned at gcc dot gnu.org |anlauf at gcc dot
gnu.org
--- Comment #2 from anlauf at gcc dot gnu.org ---
(In reply to kargl from comment #1)
> diff --git a/gcc/fortran/expr.cc b/gcc/fortran/expr.cc
> index be94c18c836..eb1afb62e06 100644
> --- a/gcc/fortran/expr.cc
> +++ b/gcc/fortran/expr.cc
> @@ -1552,6 +1552,12 @@ find_array_section (gfc_expr *expr, gfc_ref *ref)
> lower = ref->u.ar.as->lower[d];
> upper = ref->u.ar.as->upper[d];
>
> + if (!lower || !upper)
> + {
> + t = false;
> + goto cleanup;
> + }
> +
> if (ref->u.ar.dimen_type[d] == DIMEN_VECTOR) /* Vector subscript. */
> {
> gfc_constructor *ci;
Taking it.
