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

["paul dot richard dot thomas at gmail dot com" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #26 from paul dot richard dot thomas at gmail dot com  2010-04-25 18:28 -------
Subject: Re:  [fortran-dev Regression] ICE: segmentation 
        fault

Dear Janus,

I thought that I would lend a helping hand, so I applied your latest
patch to my fortran-dev.  Since I had left some of my array reference
development in place, it failed to apply on

***************
*** 2486,2492 ****
      not to the class declared type.  */
    vtab = gfc_find_derived_vtab (e->ts.u.derived, true);
    gcc_assert (vtab);
-   gfc_trans_assign_vtab_procs (&parmse->pre, vtab);
    tmp = gfc_build_addr_expr (NULL_TREE, gfc_get_symbol_decl (vtab));
    gfc_add_modify (&parmse->pre, ctree,
                  fold_convert (TREE_TYPE (ctree), tmp));
--- 2486,2492 ----
      not to the class declared type.  */
    vtab = gfc_find_derived_vtab (e->ts.u.derived, true);
    gcc_assert (vtab);
+   gfc_trans_assign_vtab_procs (&parmse->pre, e->ts.u.derived, vtab);
    tmp = gfc_build_addr_expr (NULL_TREE, gfc_get_symbol_decl (vtab));
    gfc_add_modify (&parmse->pre, ctree,
                  fold_convert (TREE_TYPE (ctree), tmp));

Since this was a compilable source, even with the failure, I decided
to build it anyway. Lo and behold, the regressions have gone :-)

It's just now regtesting.

Please find the whole diff attached.

I hope that this helps.

Cheers

Paul


------- Comment #27 from paul dot richard dot thomas at gmail dot com  2010-04-25 18:28 -------
Created an attachment (id=20486)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=20486&action=view)


-- 


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