[Patch, fortran] PR47203 Use of module with same name as subroutine

[Mikael Morin]

Hello,

a small, unexciting bug.
For the case:

    subroutine m()
       use m
    end subroutine m

the USE statement is rejected, but it is not if the subroutine is contained.
In the latter case, the namespace of the symbol of the subroutine is the 
parent namespace, which confuses the error condition in check_for_ambiguous.

Regression tested on x86_64-unknown-linux-gnu. OK for trunk?

Mikael

-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: pr47203.CL
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20130108/ad5f3db3/attachment.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: pr47203.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20130108/ad5f3db3/attachment-0001.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: pr47203-test.CL
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20130108/ad5f3db3/attachment-0002.ksh>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: use_28.f90
Type: text/x-fortran
Size: 368 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20130108/ad5f3db3/attachment.bin>