The Trunk: 51Deprecated-bf.19.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: 51Deprecated-bf.19.mcz

commits-2
Bert Freudenberg uploaded a new version of 51Deprecated to project The Trunk:
http://source.squeak.org/trunk/51Deprecated-bf.19.mcz

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

Name: 51Deprecated-bf.19
Author: bf
Time: 22 February 2016, 3:15:42.896692 pm
UUID: 1e6194ef-cd0d-4c13-beef-208cf40f190b
Ancestors: 51Deprecated-bf.18

Use actual old version for deprecation

=============== Diff against 51Deprecated-bf.18 ===============

Item was changed:
  ----- Method: DateAndTime class>>nowWithOffset: (in category '*51deprecated') -----
  nowWithOffset: aDuration
+
+ | clockValue nanos |
  self deprecated: 'use (... now offset: ...) instead'.
+ 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.
+ ^self basicNew
+ setJdn: clockValue // SecondsInDay + SqueakEpoch
+ seconds: clockValue \\ SecondsInDay
+ nano: nanos
- ^ self
- now: self clock localMicrosecondClockWithOffset first
  offset: aDuration!