Issue status update for
http://smalltalk.gnu.org/project/issue/154
Post a follow up:
http://smalltalk.gnu.org/project/comments/add/154
Project: GNU Smalltalk
Version: <none>
Component: Testsuite
Category: bug reports
Priority: normal
Assigned to: Unassigned
Reported by: tgg
Updated by: tgg
Status: active
On alpha, without GMP, with -mieee (and devo--2.2--patch-558 applied):
st> | p |
st> p := 1 bitShift: FloatE precision - 1.
8388608
st> p printNl.
8388608
8388608
st> "Should be p+1"
st> (FloatE coerce: p+0+(3/4)) asExactFraction printNl.
8388609
8388609
st> (FloatE coerce: p+1+(1/4)) asExactFraction printNl.
8388609
8388609
Likewise without -mieee.
But:
st> (FloatE emin - FloatE precision - 1 to: FloatE emax - 1)
allSatisfy: [:i | p := (FloatE coerce: 1) timesTwoPower: i. (FloatE
coerce: p asExactFraction) = p]
false
_______________________________________________
help-smalltalk mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/help-smalltalk