From: Tobias Burnus Date: Mon, 3 Sep 2012 14:06:27 +0000 (+0200) Subject: re PR fortran/54467 (f951: internal compiler error: in gfc_add_component_ref, at... X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=bda2b772170fcafd0adbcc1c022373f8247a7be7;p=gcc.git re PR fortran/54467 (f951: internal compiler error: in gfc_add_component_ref, at fortran/class.c:213) 2012-09-03 Tobias Burnus PR fortran/54467 * class.c (gfc_find_derived_vtab): Fix disabling of _final by continuing to generate normal type-bound procedures. From-SVN: r190892 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 3c1b1966af3..c1de9833629 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2012-09-03 Tobias Burnus + + PR fortran/54467 + * class.c (gfc_find_derived_vtab): Fix disabling of _final + by continuing to generate normal type-bound procedures. + 2012-09-03 Tobias Burnus * class.c (gfc_find_derived_vtab): Disable ABI-breaking diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index 5943ab835bb..dca2cfc1cda 100644 --- a/gcc/fortran/class.c +++ b/gcc/fortran/class.c @@ -1634,10 +1634,10 @@ gfc_find_derived_vtab (gfc_symbol *derived) c->tb = XCNEW (gfc_typebound_proc); c->tb->ppc = 1; generate_finalization_wrapper (derived, ns, tname, c); + } /* Add procedure pointers for type-bound procedures. */ add_procs_to_declared_vtab (derived, vtype); - } } have_vtype: