ProcessorScheduler.st
changeset 4036 f9ba781330ac
parent 4008 27a9c75eecdc
child 4042 526c79cadbf8
--- a/ProcessorScheduler.st	Mon Mar 08 12:22:32 1999 +0100
+++ b/ProcessorScheduler.st	Mon Mar 08 13:40:33 1999 +0100
@@ -983,7 +983,7 @@
         "if already running, ignore"
         l notNil ifTrue:[
             (l identityIndexOf:aProcess) ~~ 0 ifTrue:[
-                'oops - resumeImmIRQ for already running process' printCR.
+                'ProcSched [info]: oops - resumeImmIRQ for already running process' infoPrintCR.
                 ^ self
             ]
         ] ifFalse:[
@@ -993,7 +993,7 @@
         l addLast:aProcess.
         aProcess state:#run.
     ] ifFalse:[
-        'oops - resumeImmIRQ for unknown process' printCR.
+        'ProcSched [info]: oops - resumeImmIRQ for unknown process' infoPrintCR.
     ]
 
     "Modified: / 28.9.1998 / 11:36:53 / cg"
@@ -2998,6 +2998,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.173 1999-02-26 12:53:03 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.174 1999-03-08 12:40:33 cg Exp $'
 ! !
 ProcessorScheduler initialize!