[patch] intrinsic.texi: 13 down

Steve Kargl sgk@troutmask.apl.washington.edu
Sat Aug 26 16:49:00 GMT 2006


On Sat, Aug 26, 2006 at 01:08:29PM +0200, Daniel Franke wrote:
> 
> While at it, I included the XOR intrinsic in this patch and extended the 
> description of AND, OR and XOR by:
> 
> "This intrinsic routine is provided for backwards compatibility with 
> GNU Fortran 77. In new code, programmers should consider to use the 
> @ref{xxx} intrinsic defined by the F95 standard."
> 
> where xxx is one of { IAND, IOR, IEOR }.
> 

OK, I checked the g77 manual.

For XOR, we have 

   XOr(I, J)
   XOr: `INTEGER' or `LOGICAL' function, the exact type being
   the result of cross-promoting the types of all the arguments.

   I: `INTEGER' or `LOGICAL'; scalar; INTENT(IN).
   J: `INTEGER' or `LOGICAL'; scalar; INTENT(IN).

For IEOR form F95 Standard, we have

     13.14.46   IEOR (I, J)
     Description.   Performs an exclusive OR.
     Class.         Elemental function.
     Arguments.
        I           shall be of type integer.
        J           shall be of type integer with the same kind typer
                    parameter as I.
     Result Characteristics. Same as I.

So, the semantics are different with respect to LOGICAL.  I rework
your text to note this distinction.

-- 
Steve



More information about the Fortran mailing list