--- a/ProcessorScheduler.st	Wed Jul 19 18:14:59 2006 +0200
+++ b/ProcessorScheduler.st	Thu Jul 20 22:43:19 2006 +0200
@@ -2872,7 +2872,7 @@
 !
 
 timeoutHandlerProcess
-    timeoutHandlerProcess isNil ifTrue:[
+    (timeoutHandlerProcess isNil or:[timeoutHandlerProcess isDead]) ifTrue:[
         timeoutHandlerProcess := 
                 [ 
                     [
@@ -2885,7 +2885,7 @@
     ].
     ^ timeoutHandlerProcess.
 
-    "Modified: / 19-07-2006 / 18:14:49 / cg"
+    "Modified: / 20-07-2006 / 09:52:27 / cg"
 !
 
 timeoutHandlerProcessLoop
@@ -3335,7 +3335,7 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.231 2006-07-19 16:14:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.232 2006-07-20 20:43:19 cg Exp $'
 ! !
 
 ProcessorScheduler initialize!