Chris Muller uploaded a new version of KernelTests to project The Trunk:
http://source.squeak.org/trunk/KernelTests-cmm.148.mcz==================== Summary ====================
Name: KernelTests-cmm.148
Author: cmm
Time: 8 April 2010, 12:20:39.349 pm
UUID: 876c66d0-c302-473c-903f-d2de1ead93fc
Ancestors: KernelTests-dtl.147
Added test exposing Duration bug.
=============== Diff against KernelTests-dtl.147 ===============
Item was changed:
----- Method: DurationTest>>testAsMilliSeconds (in category 'testing') -----
testAsMilliSeconds
+ self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
+ self assert: (Duration seconds: 1) asMilliSeconds = 1000.
+ self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
+ self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
+ self assert: aDuration asMilliSeconds = 93784000.
+ self assert: (Duration milliSeconds: 3775) asSeconds = 3.
+ self assert: (Duration milliSeconds: 3775) nanoSeconds = 775000000!
- self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
- self assert: (Duration seconds: 1) asMilliSeconds = 1000.
- self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
- self assert: (Duration nanoSeconds: 1000000) asMilliSeconds = 1.
- self assert: aDuration asMilliSeconds = 93784000.!