[Patch, fortran] PR33233 - Parent and contained procedure: Wrongly treated as generic procedures

["Paul Richard Thomas" <paul dot richard dot thomas at gmail dot com>]

:ADDPATCH fortran:

When I fixed the "50th anniversary bug", I missed completely another
underlying bug.  So much so that I checked for the incorrect behaviour
in the testcase host_assoc_function_1.f90!

This patch uses the same mechanism to fixup incorrectly host
associated symbols, where, in the meantime, a valid function symbol
has been generated.  It does this by doing the check even for singly
contained namespaces and starting the search for the new, function
symbol in the current namespace.

Bootstrapped and regtested on x86_ia64/FC5 and checked with tonto-2.3
- OK for trunk?

Cheers

Paul

2007-10-12  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/33233
	* resolve.c (check_host_association): Check singly contained
	namespaces and start search for symbol in current namespace.

2007-10-12  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/33233
	* gfortran.dg/host_assoc_function_1.f90: Correct references.
	* gfortran.dg/host_assoc_function_3.f90: New test.


-- 
The knack of flying is learning how to throw yourself at the ground and miss.
       --Hitchhikers Guide to the Galaxy

Attachment: submit.diff
Description: Binary data