--- a/ProcessorScheduler.st	Tue Jul 09 16:12:27 2002 +0200
+++ b/ProcessorScheduler.st	Tue Jul 09 16:56:23 2002 +0200
@@ -936,22 +936,22 @@
      what to do now. Blocking is enabled.
      This is only used with win32's native threads."
 
-    |id pri l s|
+    |pri l s|
 
     OperatingSystem interruptsBlocked ifFalse:[
-	MiniDebugger 
-	    enterWithMessage:'immediateInterrupt with no interruptsBlocked'
-	    mayProceed:true.
+        MiniDebugger 
+            enterWithMessage:'immediateInterrupt with no interruptsBlocked'
+            mayProceed:true.
     ].
 
     (why == 2) ifTrue:[
-	 s := #wrapWait.
+         s := #wrapWait.
     ] ifFalse:[
-	(why == 3) ifTrue:[
-	    s := #osWait.
-	] ifFalse:[
-	    s := #stopped.
-	].
+        (why == 3) ifTrue:[
+            s := #osWait.
+        ] ifFalse:[
+            s := #stopped.
+        ].
     ].
     activeProcess setStateTo:s if:#active.
 
@@ -962,9 +962,9 @@
      the ifAbsent block, because [] is a shared cheap block, created at compile time
     "
     (l isNil or:[(l remove:activeProcess ifAbsent:nil) isNil]) ifTrue:[
-	"/ 'Processor [warning]: bad immediateInterrupt: not on run list' errorPrintCR.
-	MiniDebugger enterWithMessage:'bad immediateInterrupt: not on run list' mayProceed:true.
-	^ self
+        "/ 'Processor [warning]: bad immediateInterrupt: not on run list' errorPrintCR.
+        MiniDebugger enterWithMessage:'bad immediateInterrupt: not on run list' mayProceed:true.
+        ^ self
     ].
 
 "/    id := scheduler id.
@@ -3141,6 +3141,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.199 2002-07-09 14:12:27 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.200 2002-07-09 14:56:23 stefan Exp $'
 ! !
 ProcessorScheduler initialize!