https://gcc.gnu.org/bugzilla/show_bug.cgi?id=92050
--- Comment #3 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- On Thu, Oct 10, 2019 at 05:25:10PM +0000, sgk at troutmask dot apl.washington.edu wrote: > --- Comment #2 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- > This patch allows the code to compile, but I have no idea > if it is correct. > > Index: trans-expr.c > =================================================================== > --- trans-expr.c (revision 276837) > +++ trans-expr.c (working copy) > @@ -7031,8 +7031,10 @@ gfc_conv_procedure_call (gfc_se * se, gfc_symbol * sym > gfc_allocate_lang_decl (result); > GFC_DECL_SAVED_DESCRIPTOR (result) = parmse.expr; > gfc_free_expr (class_expr); > - gcc_assert (parmse.pre.head == NULL_TREE > - && parmse.post.head == NULL_TREE); > + if ((gfc_option.rtcheck & GFC_RTCHECK_BOUNDS) > + && parmse.pre.head == NULL_TREE) > + gcc_unreachable (); > + gcc_assert (parmse.post.head == NULL_TREE); > } Bummer patch causes regression. The only fix seems to be to remove the assert that parmse.pre.head == NULL_TREE.
