This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
What does GFC_STD_F77 do?
- From: Steve Kargl <sgk at troutmask dot apl dot washington dot edu>
- To: fortran at gcc dot gnu dot org
- Date: Wed, 26 Jan 2005 18:18:56 -0800
- Subject: What does GFC_STD_F77 do?
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.
--
Steve