Nicolas Cellier uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-nice.152.mcz==================== Summary ====================
Name: KernelTests-nice.152
Author: nice
Time: 12 June 2010, 12:52:39.183 am
UUID: d1ddd8db-685a-8945-a23c-a5f597be719d
Ancestors: KernelTests-nice.151
Correct obviously broken #testLn case (shame on me !).
Since no one noticed, I don't think I'll pay a beer though
Add corresponding #testLog tests.
=============== Diff against KernelTests-nice.151 ===============
Item was added:
+ ----- Method: IntegerTest>>testLog (in category 'tests - mathematical functions') -----
+ testLog
+ self assert: (100 log closeTo: 2).
+ self assert: ((2 raisedTo: Float emax + 3) log closeTo: 2 log*(Float emax + 3)) description: 'Integer>>log should not overflow'!
Item was added:
+ ----- Method: FractionTest>>testLog (in category 'tests - mathematical functions') -----
+ testLog
+ self assert: ((1/100) log closeTo: -2).
+ self assert: (((2 raisedTo: Float emax + 11)/3) log closeTo: (Float emax + 11)*2 log - 3 log) description: 'Fraction>>log should not overflow'.
+ self assert: ((3/(2 raisedTo: Float precision - Float emin)) log closeTo: (Float emin - Float precision)*2 log + 3 log) description: 'Fraction>>log should not underflow'!
Item was changed:
----- Method: FractionTest>>testLn (in category 'tests - mathematical functions') -----
testLn
+ self assert: ((1/100) ln closeTo: -2 * 10 ln).
- self assert: ((1/100) ln closeTo: -2/2 ln).
self assert: (((2 raisedTo: Float emax + 11)/3) ln closeTo: (Float emax + 11)*2 ln - 3 ln) description: 'Fraction>>ln should not overflow'.
self assert: ((3/(2 raisedTo: Float precision - Float emin)) ln closeTo: (Float emin - Float precision)*2 ln + 3 ln) description: 'Fraction>>ln should not underflow'!