[Pkg] The Trunk: Kernel-mt.1211.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Jan 22 12:51:55 UTC 2019
Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-mt.1211.mcz
==================== Summary ====================
Name: Kernel-mt.1211
Author: mt
Time: 22 January 2019, 1:51:49.258809 pm
UUID: 2bc71a1e-02c1-824a-ae49-4db30171e2f9
Ancestors: Kernel-eem.1210
1) Restart timer-interrupt watcher process during system-wide clean-up.
2) Extract idle-process into own method because that's what we usually do: EventSensor (interrupt watcher), EventSensor (event tickler), WeakArray (finalization), etc.
=============== Diff against Kernel-eem.1210 ===============
Item was added:
+ ----- Method: Delay class>>cleanUp (in category 'class initialization') -----
+ cleanUp
+
+ self initialize.!
Item was added:
+ ----- Method: ProcessorScheduler class>>installIdleProcess (in category 'background process') -----
+ installIdleProcess
+ "Install a background process of the lowest possible priority that is always runnable."
+ "Details: The virtual machine requires that there is aways some runnable process that
+ can be scheduled; this background process ensures that this is the case."
+
+ BackgroundProcess ifNotNil: [BackgroundProcess terminate].
+ BackgroundProcess := [self idleProcess] newProcess.
+ BackgroundProcess priority: SystemRockBottomPriority.
+ BackgroundProcess resume.!
Item was changed:
----- Method: ProcessorScheduler class>>startUp: (in category 'background process') -----
startUp: resuming
- "Install a background process of the lowest possible priority that is always runnable."
- "Details: The virtual machine requires that there is aways some runnable process that
- can be scheduled; this background process ensures that this is the case."
+ Smalltalk processPreemptionYields ifTrue: [
+ Smalltalk processPreemptionYields: false].
+
+ resuming ifTrue: [
+ Smalltalk installLowSpaceWatcher.
+ self installIdleProcess].!
- Smalltalk processPreemptionYields ifTrue:
- [Smalltalk processPreemptionYields: false].
- resuming ifTrue:
- [Smalltalk installLowSpaceWatcher.
- BackgroundProcess ifNotNil:
- [BackgroundProcess terminate].
- (BackgroundProcess := [self idleProcess] newProcess)
- priority: SystemRockBottomPriority;
- resume]!
More information about the Packages
mailing list