[Bug fortran/42274] [fortran-dev Regression] ICE: segmentation fault

[janus at gcc dot gnu dot org]

------- Comment #11 from janus at gcc dot gnu dot org  2009-12-05 15:14 -------
(In reply to comment #8)
> With the patch in comment #7 the tests in pr41829 and the following ones
> segfault at runtime.

Since these run fine with a clean fortran-dev, this is a regression of my
patch, more exactly of the following part:

Index: gcc/fortran/symbol.c
===================================================================
--- gcc/fortran/symbol.c        (revision 154956)
+++ gcc/fortran/symbol.c        (working copy)
@@ -4751,6 +4751,7 @@ add_proc_component (gfc_component *c, gfc_symbol *
   if (!c->tb)
     c->tb = XCNEW (gfc_typebound_proc);
   *c->tb = *st->n.tb;
+  c->tb->ppc = 1;
   c->attr.procedure = 1;
   c->attr.proc_pointer = 1;
   c->attr.flavor = FL_PROCEDURE;

However, I fail to see why. Paul, do you have an idea?


-- 


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