#REFACTORING by stefan
class: ProcessorScheduler
changed: #evaluateTimeouts
avoid warning about (unused) global RecentHomeMethods
--- a/ProcessorScheduler.st Mon Jul 24 12:03:22 2017 +0200
+++ b/ProcessorScheduler.st Mon Jul 24 16:16:28 2017 +0200
@@ -3157,13 +3157,11 @@
"to support pure-events"
block := timeoutActionArray at:index.
block notNil ifTrue:[
- false ifTrue:[
- RecentHomeMethods isNil ifTrue:[
- RecentHomeMethods := OrderedCollection new.
- ].
- RecentHomeMethods add:block homeMethod.
- RecentHomeMethods size > 30 ifTrue:[ RecentHomeMethods removeFirst ].
- ].
+"/ RecentHomeMethods isNil ifTrue:[
+"/ RecentHomeMethods := OrderedCollection new.
+"/ ].
+"/ RecentHomeMethods add:block homeMethod.
+"/ RecentHomeMethods size > 30 ifTrue:[ RecentHomeMethods removeFirst ].
"/ usually (>99%), there is only one single timeout action to call;
"/ avoid creation of an OrderedCollection
@@ -3266,6 +3264,7 @@
].
"Modified: / 18-07-2017 / 15:30:39 / cg"
+ "Modified: / 24-07-2017 / 16:15:36 / stefan"
!
removeTimedBlock:aBlock