What does GFC_STD_F77 do?

[Steve Kargl]

On Wed, Jan 26, 2005 at 06:18:56PM -0800, Steve Kargl wrote:
> 
>        program costest
>        complex(4) z4
>        complex(8) z8
>        z4 = (1.e0,1.e0)
>        z8 = (1.d0,1.d0)
>        z4 = cos(z4)
>        z8 = cos(z8)
>        end
> 
> troutmask:sgk[201] gfc -o d d.f
> troutmask:sgk[202] gfc -o d -std=f77 d.f
> f951: error: unrecognized command line option "-std=f77"
> troutmask:sgk[203] gfc -o d -std=f95 d.f
>  In file d.f:7
> 
>        z8 = cos(z8)                                                     
>                1
> Error: Type of argument 'x' in call to 'cos' at (1) should be REAL(4), not COMPLEX(8)
> troutmask:sgk[204] gfc -o d -std=gnu d.f
> 
> This is clearly not good.
> 

I'm working on a patch for this type of error.

-- 
Steve