[Fortran] Committed fix for FLOAT intrinsics

[Manfred Schwarb]

Brooks,

> > Steve Kargl wrote: 
> > 
> > I've committed the following patch under the "Obviously
> > correct" rule to both trunk (3 days ago) and 4.1 (today).
> > This fixes a regression with respect to g77.
> > [...] 
> > 
> > +@node FLOAT
> > +@section @code{FLOAT} --- Convert integer to default real
> > +@findex @code{FLOAT} intrinsic
> > +@cindex floor
> > +
> > +@table @asis
> > +@item @emph{Description}:
> > +@code{FLOAT(I)} converts the integer @var{I} to a default real value.
> 
> It also occurs to me that this should probably reference the standard's >
REAL function, which provides a superset of the same functionality.
> 
> Perhaps add the following to the end of the extant description: "This
non-standard intrinsic is provided for compatibility with legacy code. New
code should use the standard @code{REAL} intrinsic."
> 

This is not a standard vs. non-standard question.
FLOAT is very much standard Fortran77.
Fortran has the concept of "Generic Names" and "Specific Names" 
for intrinsics.
For this case, REAL is the generic name, and REAL, FLOAT and SNGL
are the corresponding specific names.

The use of specific names is allowed in standard Fortran.
It may be archaic and/or legacy, but definitely not non-standard !


> (Apologies for not thinking of this before I sent the previous email!)
> 
> - Brooks

Regards,
Manfred

-- 
Bis zu 70% Ihrer Onlinekosten sparen: GMX SmartSurfer!
Kostenlos downloaden: http://www.gmx.net/de/go/smartsurfer