https://gcc.gnu.org/bugzilla/show_bug.cgi?id=64173
janus at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |ASSIGNED
Assignee|unassigned at gcc dot gnu.org |janus at gcc dot gnu.org
--- Comment #4 from janus at gcc dot gnu.org ---
Turns out the fix is pretty much trivial:
Index: gcc/fortran/trans-array.c
===================================================================
--- gcc/fortran/trans-array.c (Revision 218782)
+++ gcc/fortran/trans-array.c (Arbeitskopie)
@@ -7775,7 +7775,7 @@ structure_alloc_comps (gfc_symbol * der_type, tree
break;
case NULLIFY_ALLOC_COMP:
- if (c->attr.pointer)
+ if (c->attr.pointer || c->attr.proc_pointer)
continue;
else if (c->attr.allocatable
&& (c->attr.dimension|| c->attr.codimension))
Will commit after regtesting ...
