[Bug fortran/43492] [fortran-dev Regression] ICE in gfc_add_component_ref, at fortran/expr.c:352

[janus at gcc dot gnu dot org]

------- Comment #5 from janus at gcc dot gnu dot org  2010-04-20 21:56 -------
Here is a preliminary patch:

Index: gcc/fortran/resolve.c
===================================================================
--- gcc/fortran/resolve.c       (revision 158513)
+++ gcc/fortran/resolve.c       (working copy)
@@ -5174,7 +5174,7 @@ resolve_typebound_generic_call (gfc_expr* e, const
              /* Pass along the name for CLASS methods, where the vtab
                 procedure pointer component has to be referenced.  */
              if (name)
-               *name = target->name;
+               *name = g->specific_st->name;
              goto success;
            }
        }

It fixes the test case, but I haven't regtested it yet.


-- 

janus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |janus at gcc dot gnu dot org
                   |dot org                     |
             Status|NEW                         |ASSIGNED
   Last reconfirmed|2010-04-19 11:07:19         |2010-04-20 21:56:13
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43492