author | Stefan Vogel <sv@exept.de> |
Fri, 11 Aug 2017 11:22:48 +0200 | |
changeset 22190 | 1bb3bfa5212b |
parent 22189 | 62eb67b4365f |
child 22191 | 23fe97ec8eb7 |
--- 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.