[Patch, Fortran, OOP] PR 44044: SELECT TYPE with class-valued function

[Tobias Burnus]

On 05/09/2010 09:36 PM, Janus Weil wrote:
> Hi all,
>
> here is my fix for a problem with SELECT TYPE. It basically moves an
> error message from parsing to resolution stage. For the test case in
> the PR the checking came too early, since the function's interface is
> not yet known when parsing the SELECT TYPE statement. As a consequence
> of the moved error message, I had to slightly modify two testcases.
>
> Btw, the patch only fixes comment #0 in the PR. I have started to work
> on comments #1 to #3, but have not yet fixed them fully (will do
> soon).
>
> The patch was regtested on x86_64-unknown-linux-gnu. Ok for trunk?
>   

OK. Thanks for the patch!

Tobias

> 2010-05-09  Janus Weil  <janus@gcc.gnu.org>
>
> 	PR fortran/44044
> 	* match.c (gfc_match_select_type): Move error message to
> 	resolve_select_type.
> 	* resolve.c (resolve_select_type): Error message moved here from
> 	gfc_match_select_type. Correctly set type of temporary.
>
>
> 2010-05-09  Janus Weil  <janus@gcc.gnu.org>
>
> 	PR fortran/44044
> 	* gfortran.dg/class_7.f03: Modified.
> 	* gfortran.dg/select_type_1.f03: Modified.
> 	* gfortran.dg/select_type_12.f03: New.
>