The Trunk: Kernel-dtl.990.mcz

David T. Lewis uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-dtl.990.mcz

==================== Summary ====================

Name: Kernel-dtl.990
Author: dtl
Time: 18 February 2016, 8:17:01.931516 pm
UUID: f078a14c-bc73-42dc-81c5-baf782c63164
Ancestors: Kernel-mt.989

DateAndTime class>>nowWithOffset: assumes that the VM reports wall clock time, not UTC. This is no longer the case. Adjust calculations accordingly.

=============== Diff against Kernel-mt.989 ===============

Item was changed:
  ----- Method: DateAndTime class>>nowWithOffset: (in category 'squeak protocol') -----
  nowWithOffset: aDuration
 
  | clockValue nanos |
  clockValue := Time utcMicrosecondClock.
  "Ensure that consecutive sends of this method return increasing values, by adding small values to the nanosecond part of the created object. The next few lines are assumed to be executed atomically - having no suspension points."
  ((LastClockValue ifNil: [ 0 ]) digitCompare: clockValue) = 0
  ifTrue: [ NanoOffset := NanoOffset + 1 ]
  ifFalse: [ NanoOffset := 0 ].
  LastClockValue := clockValue.
  nanos := clockValue \\ 1000000 * 1000 + NanoOffset.
+ clockValue := (clockValue // 1000000) + aDuration asSeconds.
- clockValue := clockValue // 1000000.
  ^self basicNew
  setJdn: clockValue // SecondsInDay + SqueakEpoch
  seconds: clockValue \\ SecondsInDay
  nano: nanos
  offset: aDuration!