(j3.2006) nonstandard specifics of standard intrinsic generics
Bill Long
longb
Wed Apr 16 19:01:43 EDT 2008
Robert Corbett wrote:
> Can a standard-conforming processor provide nonstandard specific
> interfaces of a generic intrinsic interface in addition to the
> standard specific interfaces? Existing implementations do, but
> that can create conflicts with otherwise standard-conforming
> programs. In such a case, is the program or the processor
> nonconforming?
>
This is allowed. See [2:36-41] in f03.
> For example, suppose an implementation provides a nonstandard
> specific interface for the function SQRT that takes an INTEGER
> argument. Consider the program
>
> REAL FUNCTION SQRTI(I)
> SQRTI = SQRT(DBLE(I))
> END
>
> PROGRAM MAIN
> INTRINSIC SQRT
> INTERFACE SQRT
> REAL FUNCTION SQRTI(I)
> END FUNCTION
> END INTERFACE
> END
>
> If the processor reports a violation of constraint C547 of
> Section 5.1.2.8 of the Fortran 2003 standard for this program,
> is the processor nonconforming?
>
I don't see how this program is nonconforming. The conditions of C547
are met here, so no error. A processor that reports an error for this
code would seem to be nonconforming.
Cheers,
Bill
> Bob Corbett
> _______________________________________________
> J3 mailing list
> J3 at j3-fortran.org
> http://j3-fortran.org/mailman/listinfo/j3
>
--
Bill Long longb at cray.com
Fortran Technical Support & voice: 651-605-9024
Bioinformatics Software Development fax: 651-605-9142
Cray Inc., 1340 Mendota Heights Rd., Mendota Heights, MN, 55120
More information about the J3
mailing list