This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]
Other format:	[Raw text]

Re: 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: Thu, 27 Jan 2005 12:19:12 -0800
Subject: Re: What does GFC_STD_F77 do?
References: <20050127021856.GA40626@troutmask.apl.washington.edu>

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

References:
- What does GFC_STD_F77 do?
  - From: Steve Kargl

Index Nav:	[Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav:	[Date Prev] [Date Next]	[Thread Prev] [Thread Next]