*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sat, 11 Jan 1997 18:35:21 +0100
changeset 2149 622f01b8ce2f
parent 2148 f0a95dd96db5
child 2150 3daace4e5fbc
*** empty log message ***
ProcSched.st
ProcessorScheduler.st
--- a/ProcSched.st	Sat Jan 11 15:06:17 1997 +0100
+++ b/ProcSched.st	Sat Jan 11 18:35:21 1997 +0100
@@ -842,6 +842,7 @@
                     ' (' errorPrint. p name errorPrint. ')' errorPrint.
                 ].
                 '; hard-terminate it.' errorPrintCR.
+	    'Processor [info]: cleanup may take a while if stack is huge' infoPrintCR.
             p state:#suspended.
             self terminateNoSignal:p.
         ]
@@ -2330,6 +2331,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.107 1997-01-10 18:17:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.108 1997-01-11 17:35:21 cg Exp $'
 ! !
 ProcessorScheduler initialize!
--- a/ProcessorScheduler.st	Sat Jan 11 15:06:17 1997 +0100
+++ b/ProcessorScheduler.st	Sat Jan 11 18:35:21 1997 +0100
@@ -842,6 +842,7 @@
                     ' (' errorPrint. p name errorPrint. ')' errorPrint.
                 ].
                 '; hard-terminate it.' errorPrintCR.
+	    'Processor [info]: cleanup may take a while if stack is huge' infoPrintCR.
             p state:#suspended.
             self terminateNoSignal:p.
         ]
@@ -2330,6 +2331,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.107 1997-01-10 18:17:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.108 1997-01-11 17:35:21 cg Exp $'
 ! !
 ProcessorScheduler initialize!