--- a/ProcessorScheduler.st	Fri Jul 11 19:53:47 2003 +0200
+++ b/ProcessorScheduler.st	Sat Jul 12 10:25:04 2003 +0200
@@ -2022,7 +2022,7 @@
          (we cannot destroy the chair we are sitting on ... :-)
         "
         zombie notNil ifTrue:[
-            self halt:'should not happen'.
+            self error:'should not happen' mayProceed:true.
             self class threadDestroy:zombie.
         ].
 
@@ -2960,6 +2960,9 @@
             ].
         ]
     ] ifFalse:[
+        nSelected > resultFdArray size ifTrue:[
+            nSelected := resultFdArray size.
+        ].
         1 to:nSelected do:[:fdIndex| |fd|
             fd := resultFdArray at:fdIndex.
 
@@ -3236,7 +3239,7 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.210 2003-07-11 17:52:44 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.211 2003-07-12 08:25:04 stefan Exp $'
 ! !
 
 ProcessorScheduler initialize!