git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

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
This commit is contained in:
Tobias Burnus 2012-09-03 16:06:27 +02:00 committed by Tobias Burnus
parent 6cadda8be2
commit bda2b77217
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
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> 2012-09-03 Tobias Burnus <burnus@net-b.de>
* class.c (gfc_find_derived_vtab): Disable ABI-breaking * class.c (gfc_find_derived_vtab): Disable ABI-breaking

2
gcc/fortran/class.c
View File

@ -1634,10 +1634,10 @@ gfc_find_derived_vtab (gfc_symbol *derived)
c->tb = XCNEW (gfc_typebound_proc); c->tb = XCNEW (gfc_typebound_proc);
c->tb->ppc = 1; c->tb->ppc = 1;
generate_finalization_wrapper (derived, ns, tname, c); generate_finalization_wrapper (derived, ns, tname, c);
}
/* Add procedure pointers for type-bound procedures. */ /* Add procedure pointers for type-bound procedures. */
add_procs_to_declared_vtab (derived, vtype); add_procs_to_declared_vtab (derived, vtype);
}
} }
have_vtype: have_vtype: