Re: [Patch, Fortran, OOP] Cleaning up generic TBPs

[Janus Weil <janus at gcc dot gnu dot org>]

> The patch was regtested on x86_64-unknown-linux-gnu with no failures.
> Ok for trunk?
>
> (Before committing I will add test cases from the four above-mentioned PRs.)


As promised, here go the test cases. I left out the test case of PR
44869 since it is quite large (too large for the test suite to my
taste). I think three out of four is enough anyway.

Cheers,
Janus


2010-07-12  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/44434
	PR fortran/44565
	PR fortran/43945
	PR fortran/44869
	* gfortran.h (gfc_find_derived_vtab): Modified prototype.
	* class.c (gfc_build_class_symbol): Modified call to
	'gfc_find_derived_vtab'.
	(add_proc_component): Removed, moved code into 'add_proc_comp'.
	(add_proc_comps): Renamed to 'add_proc_comp', removed treatment of
	generics.
	(add_procs_to_declared_vtab1): Removed unnecessary argument 'resolved'.
	Removed treatment of generics.
	(copy_vtab_proc_comps): Removed unnecessary argument 'resolved'.
	Call 'add_proc_comp' instead of duplicating code.
	(add_procs_to_declared_vtab): Removed unnecessary arguments 'resolved'
	and 'declared'. Do not recurse to all super types, but copy all PPCs
	directly from the parent.
	(add_generic_specifics,add_generics_to_declared_vtab): Removed.
	(gfc_find_derived_vtab): Removed unnecessary argument 'resolved'.
	Removed treatment of generics.
	* iresolve.c (gfc_resolve_extends_type_of): Modified call to
	'gfc_find_derived_vtab'.
	* resolve.c (resolve_typebound_function,resolve_typebound_subroutine):
	Remove treatment of generics.
	(resolve_select_type,resolve_fl_derived): Modified call to
	'gfc_find_derived_vtab'.
	* trans-decl.c (gfc_get_symbol_decl): Ditto.
	* trans-expr.c (gfc_conv_derived_to_class,gfc_trans_class_assign):
	Ditto.
	* trans-stmt.c (gfc_trans_allocate): Ditto.

2010-07-12  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/44434
	PR fortran/44565
	PR fortran/43945
	PR fortran/44869
	* gfortran.dg/dynamic_dispatch_1.f03: Fixed invalid test case.
	* gfortran.dg/dynamic_dispatch_2.f03: Ditto.
	* gfortran.dg/dynamic_dispatch_3.f03: Ditto.
	* gfortran.dg/generic_tbp_1.f03: New.
	* gfortran.dg/generic_tbp_2.f03: New.
	* gfortran.dg/generic_tbp_3.f03: New.

Attachment: generic_tbp_1.f03
Description: Binary data

Attachment: generic_tbp_2.f03
Description: Binary data

Attachment: generic_tbp_3.f03
Description: Binary data