--- a/ProcessorScheduler.st Mon Mar 05 16:19:44 2007 +0100
+++ b/ProcessorScheduler.st Mon Mar 05 22:36:04 2007 +0100
@@ -1509,22 +1509,20 @@
|id|
id := self class threadCreate:aProcess withId:nil.
- id isNil ifTrue:[^ false].
-
aProcess setId:id state:#light. "meaning: has no stack yet"
self remember:aProcess.
- ^ true
!
newProcessFor:aProcess withId:idWant
"private entry for Process restart - do not use in your program"
idWant isNil ifTrue:[
- ^ self newProcessFor:aProcess
+ self newProcessFor:aProcess.
+ ^ true.
].
(self class threadCreate:aProcess withId:idWant) ~~ idWant ifTrue:[
- ^ false
+ ^ false
].
aProcess state:#light. "meaning: has no stack yet"
@@ -3343,7 +3341,7 @@
!ProcessorScheduler class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.237 2006-12-07 18:47:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.238 2007-03-05 21:36:04 stefan Exp $'
! !
ProcessorScheduler initialize!