[Help-smalltalk] Re: [bug] Build failure on alpha

[Thomas Girard]

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


st> (FloatE emin - FloatE precision - 1 to: FloatE emax - 1) collect:
[:i | p := (FloatE coerce: 1) timesTwoPower: i. (FloatE coerce: p
asExactFraction) = p]"Global garbage collection... done"
(true false false false false false false false false false false false
false false false false false false false false false false false false
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true true true true true true true true true true true true true
true true )


where emin is -125, precision is 24 and emax is 128. The first failing
is -149:


st> p:= (FloatE coerce: 1) timesTwoPower: -149.
2.6524948e-315
st> p asExactFraction
"Global garbage collection... done"
1/377003575316277553052632783947358479815640765734281611362288441560101396530857955835685848633641608981764089063400052322800846281248691448694119974860434438887084693231743502178167752441192448774799271819130974018130465379775860716808779827596916922071594850183201524526501846714374614008118077197384100897810808832
st> FloatE coerce: p asExactFraction
0.0