From: bernard URBAN <Bernard.U<rban@me...> - 2000-07-27 16:29:30
Here a serious bug:
"2000-03-06 (March 2000)"
> (eql -3.14159s0 3.14159s0)
> (eql -3.14159e0 3.14159e0)
> (eql -3.14159d0 3.14159d0)
> (eql -3.14159l0 3.14159l0)
> (eql (- pi) pi)
This bug is also the probable cause of bug 104646, as the declaration
(real (* -2 pi) (* 2 pi)) becomes (real (* -2 pi) (* -2 pi)).
The reason seems that in the case of long float, the sign bit is not
tested (it appears not to be in the mantissa as for the other float