(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