--- a/ProcessorScheduler.st	Fri Apr 11 10:29:03 2014 +0200
+++ b/ProcessorScheduler.st	Fri Apr 11 11:14:17 2014 +0200
@@ -3136,7 +3136,7 @@
                 ]
             ].
             nReady := nReady - 1.
-            index := index + 1.
+            readyIndex := readyIndex + 1.
         ].
 
         readyIndex := 1.
@@ -3158,7 +3158,7 @@
                 ]
             ].
             nReady := nReady - 1.
-            index := index + 1.
+            readyIndex := readyIndex + 1.
         ].
     ].
     ^ newProcessMaybeReady
@@ -3407,11 +3407,11 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.284 2014-04-10 19:14:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.285 2014-04-11 09:14:17 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.284 2014-04-10 19:14:50 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.285 2014-04-11 09:14:17 stefan Exp $'
 ! !