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-Tag: misc/gccgo-go1_1_2~1077 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=bda2b772170fcafd0adbcc1c022373f8247a7be7;p=thirdparty%2Fgcc.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 3c1b1966af33..c1de98336292 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 5943ab835bb9..dca2cfc1cdae 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: