The Inbox: Kernel-ul.883.mcz

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

The Inbox: Kernel-ul.883.mcz

commits-2
A new version of Kernel was added to project The Inbox:
http://source.squeak.org/inbox/Kernel-ul.883.mcz

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

Name: Kernel-ul.883
Author: ul
Time: 26 October 2014, 1:45:11.609 am
UUID: 362f65e8-603d-452d-b26d-6df0bc85022b
Ancestors: Kernel-ul.880

- use ExternalSemaphoreTable instead of Smalltalk
- added #excessSignals accessor to Semaphore

=============== Diff against Kernel-ul.880 ===============

Item was changed:
  ----- Method: EventSensor>>shutDown (in category 'initialize') -----
  shutDown
+
  super shutDown.
  EventTicklerProcess ifNotNil: [
  EventTicklerProcess terminate.
  EventTicklerProcess := nil. ].
+ inputSemaphore ifNotNil:[
+ ExternalSemaphoreTable unregisterExternalObject: inputSemaphore ].
- inputSemaphore ifNotNil:[Smalltalk unregisterExternalObject: inputSemaphore].
  !

Item was changed:
  ----- Method: EventSensor>>startUp (in category 'initialize') -----
  startUp
  "Run the I/O process"
  self initialize.
+ self primSetInputSemaphore: (ExternalSemaphoreTable registerExternalObject: inputSemaphore).
- self primSetInputSemaphore: (Smalltalk registerExternalObject: inputSemaphore).
  super startUp.
  self installEventTickler.
  Smalltalk isMorphic ifTrue:[self flushAllButDandDEvents].
 
  "Attempt to discover whether the input semaphore is actually being signaled."
  hasInputSemaphore := false.
  inputSemaphore initSignals.
  !

Item was added:
+ ----- Method: Semaphore>>excessSignals (in category 'accessing') -----
+ excessSignals
+
+ ^excessSignals!