Re: [PATCH] PR 16917: Add DFLOAT to gfortran

[Steve Kargl <sgk at troutmask dot apl dot washington dot edu>]

On Wed, Aug 11, 2004 at 12:13:06PM +0100, Paul Brook wrote:
> On Wednesday 11 August 2004 07:07, Steve Kargl wrote:
> > The attached patch adds support for DFLOAT to gfortran.  This
> > is required for compatibility with g77 and several other vendor's
> > f77 implementations (e.g, f2c and HP-UX).  This also fixes
> > PR 16917
> 
> ChangeLog? Testcase?

See below.  Note, I don't know the procedure for adding testcases
to the testsuite.  Do you just put a new file in the
gfortran.fortran-torture/execute and it is automatically found?
I've added a test case below, but you may need to tweak it.

> 
> Besides which patch looks wrong. You declare GFC_ISYM_DFLOAT, but don't use 
> it. gfc_simplify_dfloat is never used.

Whoops. Fixed.

> 
> Looks like you changed your mind half way through :)
> 

I didn't change my mind.  I started thinking about how 
I'm going to add j0, j0f, j1, j1f, y0, y0f, y1, and y1f
and completely forgot to double check the patch.

2004-08-11  Steven G. Kargl  <kargls@comcast.net>

        * check.c (gfc_check_dfloat): New function.
        * gfortran.h (GFC_ISYM_DFLOAT): New symbol.
        * intrinsic.c: Add DFLOAT to list of intrinsic functions.
        * intrinsic.h: Prototypes for gfc_check_dfloat and gfc_simplify_dfloat.
        * simplify.c (gfc_simplify_dfloat): New function.

2004-08-11  Steven G. Kargl  <kargls@comcast.net>
 
        * dfloat.f90: Test case for DFLOAT intrinsic.

-- 
Steve

Attachment: dfloat.diff
Description: Text document

Attachment: dfloat.f90
Description: Text document