diff options
| author | Tobias Burnus <burnus@net-b.de> | 2012-09-03 16:06:27 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2012-09-03 16:06:27 +0200 |
| commit | bda2b772170fcafd0adbcc1c022373f8247a7be7 (patch) | |
| tree | a452a92e70d60136c48cc6fa83e97726ed6e9326 /gcc | |
| parent | 6cadda8be2f75200026930e24075868718f4843e (diff) | |
| download | gcc-bda2b772170fcafd0adbcc1c022373f8247a7be7.zip gcc-bda2b772170fcafd0adbcc1c022373f8247a7be7.tar.gz gcc-bda2b772170fcafd0adbcc1c022373f8247a7be7.tar.bz2 | |
re PR fortran/54467 (f951: internal compiler error: in gfc_add_component_ref, at fortran/class.c:213)
2012-09-03 Tobias Burnus <burnus@net-b.de>
PR fortran/54467
* class.c (gfc_find_derived_vtab): Fix disabling of _final
by continuing to generate normal type-bound procedures.
From-SVN: r190892
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/fortran/class.c | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 3c1b196..c1de983 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,11 @@ 2012-09-03 Tobias Burnus <burnus@net-b.de> + 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 <burnus@net-b.de> + * class.c (gfc_find_derived_vtab): Disable ABI-breaking generation of the "_final" subroutine for now. diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index 5943ab8..dca2cfc 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: |