[Patch, Fortran] PR57496 use finiteq etc. for __float in write_float.def

[Tobias Burnus]

Regarding REAL(10): I tried to find out what goes wrong in that case, 
but I failed.

I would really appreciate some help. See PR57496. My feeling is that the 
error is related to x87 FPU vs. CPU handling, but I failed to understand 
why and when it happens.


Regarding REAL(16):

Tobias Burnus wrote:
> Found when looking at the issue of the PR, but unrelated. For 
> __float128, we have to use the libquadmath functions - not the "long 
> double" ones.

Actually, the patch *does* solve the problem for REAL(16). I have now 
attached a slighly updated version, which converts another "isfinite" 
which I missed in the previous patch.

> The patch is rather obvious, though I wonder whether it could clash 
> with some #defines of the system headers on some systems.
> Build and regtested on x86-64-gnu-linux.
> OK for the trunk?

OK?

Tobias
-------------- next part --------------
A non-text attachment was scrubbed...
Name: io-write-f128.diff
Type: text/x-patch
Size: 2078 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20130601/36c9ffb8/attachment.bin>