Jan van Oosterwijk wrote:
[snip]
>
> One thing I would have liked is the disappearance of the restriction
> of boz constants to DATA statements and INTEGERs ,
> though the use of for example, REAL(Z'abcd') is a work around.
>
BOZ constants can now be used as arguments to DBLE, REAL, INT, and
CMPLX. What happens is defined in the INT and REAL funtion
descriptions--basically the bit pattern is copied and, if necessary,
converted to the result KIND using "normal" tyep conversions.
One of the arguments against allowing them directly in an expression
without the type conversion function was that there are different
implementations of what something like
X = z'aaaa' + z'bbbb' + 3.14
means. Some vendors do the first add as an integer add, others do it
as a floating point add.
Dick Hendrickson
|