--- a/ProcessorScheduler.st	Wed Mar 10 00:02:09 1999 +0100
+++ b/ProcessorScheduler.st	Thu Mar 11 00:14:46 1999 +0100
@@ -819,7 +819,9 @@
 
     anyTimeouts := false.
     dispatching := false.
-    exitWhenNoMoreUserProcesses := false. "/ mhmh - how about true ?
+    exitWhenNoMoreUserProcesses isNil ifTrue:[
+        exitWhenNoMoreUserProcesses := false. "/ mhmh - how about true ?
+    ].
     useIOInterrupts := OperatingSystem supportsIOInterrupts.
     gotIOInterrupt := false.
     osChildExitActions := Dictionary new.
@@ -2998,6 +3000,6 @@
 !ProcessorScheduler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.174 1999-03-08 12:40:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProcessorScheduler.st,v 1.175 1999-03-10 23:14:46 cg Exp $'
 ! !
 ProcessorScheduler initialize!