https://gcc.gnu.org/bugzilla/show_bug.cgi?id=116530

--- Comment #8 from anlauf at gcc dot gnu.org ---
(In reply to kargls from comment #6)
> (In reply to anlauf from comment #3)
> > Tentative obvious fix for NULL pointer dereference:
> > 
> > diff --git a/gcc/fortran/trans-io.cc b/gcc/fortran/trans-io.cc
> > index 7ab82fa2f5b..de38f4a808f 100644
> > --- a/gcc/fortran/trans-io.cc
> > +++ b/gcc/fortran/trans-io.cc
> > @@ -1692,7 +1692,8 @@ transfer_namelist_element (stmtblock_t * block, const
> > char * var_name,
> >    gcc_assert (sym || c);
> >  
> >    /* Build the namelist object name.  */
> > -  if (sym && !sym->attr.use_only && sym->attr.use_rename)
> > +  if (sym && !sym->attr.use_only && sym->attr.use_rename
> > +      && sym->ns->use_stmts->rename)
> >      string = gfc_build_cstring_const
> > (sym->ns->use_stmts->rename->local_name);
> >    else
> >      string = gfc_build_cstring_const (var_name);
> 
> Patch looks good.  If it passes regression testing, you can commit it you
> want.

Yes, it passed.  I was just packaging it for submission, but given your OK
I will push to master and inform the list.

Reply via email to