[Patch, fortran] PR37274(regression), 36374 and 36454

[Paul Richard Thomas]

Dominique,

On Thu, Sep 11, 2008 at 6:29 PM, Dominique Dhumieres <dominiq@lps.ens.fr> wrote:
> Works as advertised without regression (-m32 and -m64 on i686-apple-darwin9).
> I have one question: is it normal to get the (additional errors for the first
> code in pr35971?

I think so...

>
>> pr35971.f90:88.17:
>>
>>    type(C_FUNPTR) fp
>>                 1
>> Error: Derived type 'c_funptr' at (1) is being used before it is defined
>> pr35971.f90:90.5:

This was previously emerging from the abstract interface, which I am
sure is incorrect.  Otherwise, the private declaration prevents it
from propogating by use association.
>>
>>    fp = get_proc('Hello, world'//achar(0))
>>     1
>> Error: Symbol 'fp' at (1) has no IMPLICIT type
>

This is understandable because its declaration fails.

Cheers

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