This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/80766] [7/8 Regression] [OOP] ICE with type-bound procedure returning an array


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

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |jvdelisle at gcc dot gnu.org

--- Comment #9 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
(In reply to janus from comment #8)
> (In reply to janus from comment #5)
> > This rather simple patch fixes the ICE on trunk:
> > 
> > Index: gcc/fortran/resolve.c
> > ===================================================================
> > --- gcc/fortran/resolve.c	(revision 247818)
> > +++ gcc/fortran/resolve.c	(working copy)
> > @@ -13833,6 +13833,9 @@ resolve_fl_derived (gfc_symbol *sym)
> >  	  gcc_assert (vtab);
> >  	  vptr->ts.u.derived = vtab->ts.u.derived;
> >  	}
> > +
> > +      if (!resolve_fl_derived0 (vptr->ts.u.derived))
> > +	return false;
> >      }
> >  
> >    if (!resolve_fl_derived0 (sym))
> 
> This shows one ICE in the testsuite:
> 
> FAIL: gfortran.dg/typebound_proc_32.f90   -O  (internal compiler error)


Is this before or after submission of patch to list?

Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]