The Trunk: 51Deprecated-eem.14.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-eem.14.mcz

commits-2
Eliot Miranda uploaded a new version of 51Deprecated to project The Trunk:
http://source.squeak.org/trunk/51Deprecated-eem.14.mcz

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

Name: 51Deprecated-eem.14
Author: eem
Time: 5 January 2016, 1:28:26.744217 pm
UUID: 9ee28680-3763-46a9-8c2c-1c81f4d6b917
Ancestors: 51Deprecated-mt.13

Deprecates obsolete time primitives and secondsWhenClockTicks.

=============== Diff against 51Deprecated-mt.13 ===============

Item was added:
+ ----- Method: Time class>>primLocalMicrosecondClock (in category '*51Deprecated-primitives') -----
+ primLocalMicrosecondClock
+ "Answer the local microseconds since the Smalltalk epoch. The value is derived from the Posix epoch with a constant offset corresponding to elapsed microseconds between the two epochs according to RFC 868, and with an offset duration corresponding to the current offset of local time from UTC."
+
+ <primitive: 241>
+ ^0!

Item was added:
+ ----- Method: Time class>>primMicrosecondClock (in category '*51Deprecated-primitives') -----
+ primMicrosecondClock
+ "Answer the number of microseconds since the microsecond clock
+ was last reset or rolled over. Answer zero if the primitive fails."
+
+ <primitive: 'primitiveMicrosecondClock'>
+ ^ 0!

Item was added:
+ ----- Method: Time class>>primMillisecondClock (in category '*51Deprecated-primitives') -----
+ primMillisecondClock
+ "Primitive. Answer the number of milliseconds since the millisecond clock
+ was last reset or rolled over. Answer zero if the primitive fails.
+ Optional. See Object documentation whatIsAPrimitive."
+
+ <primitive: 135>
+ ^ 0!

Item was added:
+ ----- Method: Time class>>primMillisecondClockMask (in category '*51Deprecated-primitives') -----
+ primMillisecondClockMask
+ "Answer the mask value used for millisecond clock rollover in the
+ virtual machine, or nil if the VM cannot support the request."
+
+ <primitive: 'primitiveMillisecondClockMask'>
+ ^nil!

Item was added:
+ ----- Method: Time class>>primSecondsClock (in category '*51Deprecated-primitives') -----
+ primSecondsClock
+ "Answer the number of seconds since 00:00 on the morning of
+ January 1, 1901 (a 32-bit unsigned number).
+ Essential. See Object documentation whatIsAPrimitive. "
+
+ <primitive: 137>
+ self primitiveFailed!

Item was added:
+ ----- Method: Time class>>primUTCMicrosecondClock (in category '*51Deprecated-primitives') -----
+ primUTCMicrosecondClock
+ "Answer the UTC microseconds since the Smalltalk epoch. The value is derived from the Posix epoch with a constant offset corresponding to elapsed microseconds between the two epochs according to RFC 868."
+
+ <primitive: 240>
+ ^0!

Item was added:
+ ----- Method: Time class>>secondsWhenClockTicks (in category '*51Deprecated-primitives') -----
+ secondsWhenClockTicks
+
+ "waits for the moment when a new second begins"
+
+ | lastSecond delay |
+
+ delay :=  Delay forMilliseconds: 1.
+ lastSecond := self primSecondsClock.
+ [ lastSecond = self primSecondsClock ] whileTrue: [ delay wait ].
+  
+ ^ lastSecond + 1!