https://gcc.gnu.org/bugzilla/show_bug.cgi?id=94192
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever confirmed|0 |1
Last reconfirmed| |2020-03-16
CC| |kargl at gcc dot gnu.org
--- Comment #1 from kargl at gcc dot gnu.org ---
Quite silly to have an assert if compiler has already issued an error.
Index: gcc/fortran/simplify.c
===================================================================
--- gcc/fortran/simplify.c (revision 280157)
+++ gcc/fortran/simplify.c (working copy)
@@ -4154,12 +4189,6 @@ simplify_bound (gfc_expr *array, gfc_expr *dim, gfc_ex
|| (as->type == AS_ASSUMED_SHAPE && upper)))
return NULL;
- gcc_assert (!as
- || (as->type != AS_DEFERRED
- && array->expr_type == EXPR_VARIABLE
- && !gfc_expr_attr (array).allocatable
- && !gfc_expr_attr (array).pointer));
-
if (dim == NULL)
{
/* Multi-dimensional bounds. */
