RegressionTests__FloatTest.st
branchjv
changeset 1974 f2eaf05205d6
parent 1508 3837de42f3fe
equal deleted inserted replaced
1973:edac63045d4a 1974:f2eaf05205d6
       
     1 "
       
     2  COPYRIGHT (c) Claus Gittinger / eXept Software AG
       
     3  COPYRIGHT (c) 2016 Jan Vrany
       
     4               All Rights Reserved
       
     5 
       
     6  This software is furnished under a license and may be used
       
     7  only in accordance with the terms of that license and with the
       
     8  inclusion of the above copyright notice.   This software may not
       
     9  be provided or otherwise made available to, or used by, any
       
    10  other person.  No title to or ownership of the software is
       
    11  hereby transferred.
       
    12 "
     1 "{ Package: 'stx:goodies/regression' }"
    13 "{ Package: 'stx:goodies/regression' }"
     2 
    14 
     3 "{ NameSpace: RegressionTests }"
    15 "{ NameSpace: RegressionTests }"
     4 
    16 
     5 TestCase subclass:#FloatTest
    17 TestCase subclass:#FloatTest
     7 	classVariableNames:''
    19 	classVariableNames:''
     8 	poolDictionaries:''
    20 	poolDictionaries:''
     9 	category:'tests-Regression-Numbers'
    21 	category:'tests-Regression-Numbers'
    10 !
    22 !
    11 
    23 
       
    24 !FloatTest class methodsFor:'documentation'!
       
    25 
       
    26 copyright
       
    27 "
       
    28  COPYRIGHT (c) Claus Gittinger / eXept Software AG
       
    29  COPYRIGHT (c) 2016 Jan Vrany
       
    30               All Rights Reserved
       
    31 
       
    32  This software is furnished under a license and may be used
       
    33  only in accordance with the terms of that license and with the
       
    34  inclusion of the above copyright notice.   This software may not
       
    35  be provided or otherwise made available to, or used by, any
       
    36  other person.  No title to or ownership of the software is
       
    37  hereby transferred.
       
    38 "
       
    39 ! !
    12 
    40 
    13 !FloatTest methodsFor:'helpers'!
    41 !FloatTest methodsFor:'helpers'!
    14 
    42 
    15 actualPrecisionOf:aFloatClass
    43 actualPrecisionOf:aFloatClass
    16     "get the actual number of valid bits in the mantissa.
    44     "get the actual number of valid bits in the mantissa.