[Bug fortran/95584] ICE in generic_correspondence, at fortran/interface.c:1260

[kargl at gcc dot gnu.org]

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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Priority|P3                          |P4
                 CC|                            |kargl at gcc dot gnu.org

--- Comment #1 from kargl at gcc dot gnu.org ---
Index: gcc/fortran/interface.c
===================================================================
--- gcc/fortran/interface.c     (revision 280157)
+++ gcc/fortran/interface.c     (working copy)
@@ -1257,7 +1257,7 @@ generic_correspondence (gfc_formal_arglist *f1, gfc_fo

   while (f1)
     {
-      if (f1->sym->attr.optional)
+      if (!f1->sym || f1->sym->attr.optional)
        goto next;

       if (p1 && strcmp (f1->sym->name, p1) == 0)