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

--- Comment #6 from kargls at comcast dot net ---
(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.

Reply via email to