# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 854409733 -3600
# Node ID e1c0e8ada72fbe5e2e2eaffc97e1da6506f21c8c
# Parent  af7652b824043b77acda96aa60910ee2247ad7b5
can wait forEver, if there is nothing to do

diff -r af7652b82404 -r e1c0e8ada72f ProcSched.st
--- a/ProcSched.st	Tue Jan 28 01:01:36 1997 +0100
+++ b/ProcSched.st	Tue Jan 28 01:02:13 1997 +0100
@@ -2487,7 +2487,7 @@
     ].
 
     millis isNil ifTrue:[
-	millis := 9999.
+	millis := 999999.
     ] ifFalse:[
 	millis := millis rounded
     ].
@@ -2500,6 +2500,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.118 1997-01-27 19:09:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ProcSched.st,v 1.119 1997-01-28 00:02:13 cg Exp $'
 ! !
 ProcessorScheduler initialize!
diff -r af7652b82404 -r e1c0e8ada72f ProcessorScheduler.st
--- a/ProcessorScheduler.st	Tue Jan 28 01:01:36 1997 +0100
+++ b/ProcessorScheduler.st	Tue Jan 28 01:02:13 1997 +0100
@@ -2487,7 +2487,7 @@
     ].
 
     millis isNil ifTrue:[
-	millis := 9999.
+	millis := 999999.
     ] ifFalse:[
 	millis := millis rounded
     ].
@@ -2500,6 +2500,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.118 1997-01-27 19:09:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.119 1997-01-28 00:02:13 cg Exp $'
 ! !
 ProcessorScheduler initialize!