# HG changeset patch # User Stefan Vogel # Date 1502443368 -7200 # Node ID 1bb3bfa5212b533860cdd4ff64fe6e96735a6b1c # Parent 62eb67b4365f4f361dbaa635c17c1afb71212153 #TUNING by stefan class: ProcessorScheduler changed: #startTimeSlicing #timeoutHandlerProcessLoop Send Semaphore>>#name: instead of Semaphore new name: diff -r 62eb67b4365f -r 1bb3bfa5212b ProcessorScheduler.st --- a/ProcessorScheduler.st Fri Aug 11 11:22:28 2017 +0200 +++ b/ProcessorScheduler.st Fri Aug 11 11:22:48 2017 +0200 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 1993 by Claus Gittinger All Rights Reserved @@ -2342,7 +2340,7 @@ timeSliceProcess notNil ifTrue: [^ self]. - timeSliceNeededSemaphore := Semaphore new name:'timeSlice needed'. + timeSliceNeededSemaphore := Semaphore name:'timeSlice needed'. timeSliceProcess := [ [ @@ -3398,7 +3396,7 @@ |mySema| - mySema := Semaphore new name:'timeoutHandler'. + mySema := Semaphore name:'timeoutHandler'. [ [ mySema wait.