David T. Lewis uploaded a new version of KernelTests to project The Trunk: http://source.squeak.org/trunk/KernelTests-dtl.235.mcz
==================== Summary ====================
Name: KernelTests-dtl.235 Author: dtl Time: 4 November 2012, 1:08:04.014 pm UUID: de45cee9-3416-4fd8-a216-b5cafe70ee57 Ancestors: KernelTests-ul.234
As of Kernel-cmm.671 Timespans created in the context of an offset will start in that offset, and when no context is available the defaultOffset for a Timespan will be zero. This affects a TimeStamp created from a string representation of itself, which will now have zero offset (UTC). Update TimeStampTest to reflect to this behavior.
=============== Diff against KernelTests-ul.234 ===============
Item was changed: ----- Method: TimeStampTest>>testFromSeconds (in category 'Tests') ----- testFromSeconds + "A time stamp from seconds is created in the local time zone, so offset may + be non-zero. The test timestamp has offset zero (implying UTC). Comparison + to the test timestamp should succeed if and only if both time stamps are + created relative to the same time zone (UTC)."
+ | local utc | + local := self timestampClass fromSeconds: 3124958100. + local offset = Duration zero + ifTrue: [self assert: local = timestamp.] + ifFalse: [self deny: local = timestamp.]. + utc := local offset: Duration zero. + self assert: utc = timestamp.! - self - assert: (self timestampClass fromSeconds: 3124958100) = timestamp.!
Item was changed: ----- Method: TimeStampTest>>testReadFromA1 (in category 'testing') ----- testReadFromA1 + "Conversion to and from a string (with implied UTC offset) is equal if + and only if the time stamp has zero offset." |ts| + ts := TimeStamp current offset: Duration zero. "current as UTC" + self assert: (ts = (TimeStamp fromString: ts asString)). + ts := TimeStamp current offset: (Duration hours: 1). + self deny: (ts = (TimeStamp fromString: ts asString)). + ! - ts := TimeStamp current. - self assert: (ts = (TimeStamp fromString: ts asString)).!
squeak-dev@lists.squeakfoundation.org