--- a/Smalltalk.st	Sat Nov 05 12:15:25 2016 +0100
+++ b/Smalltalk.st	Sat Nov 05 12:20:43 2016 +0100
@@ -4449,7 +4449,7 @@
                 process beGroupLeader.
                 process resume.
 
-Processor exitWhenNoMoreUserProcesses:true.
+                Processor exitWhenNoMoreUserProcesses:true.
                 Processor dispatchLoop.
                 self exit
             ].
@@ -4524,13 +4524,6 @@
                     ]
                 ].
 
-"/                isRepl ifTrue:[
-"/                    self providingDisplayDo:[
-"/                        self readEvalPrint.
-"/                    ].    
-"/                    self exit.
-"/                ].
-                
                 Processor exitWhenNoMoreUserProcesses:true.
                 isRepl ifFalse:[
                     Debugging == true ifFalse:[
@@ -4542,6 +4535,7 @@
                 process := [
                     self providingDisplayDo:[
                         isRepl ifTrue:[
+                            Processor exitWhenNoMoreUserProcesses:false.
                             Processor activeProcess name:'repl'.
                             self readEvalPrint.
                             self exit.