#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Tue, 08 Nov 2016 18:44:07 +0100
changeset 20911 1c11be64f4a1
parent 20910 d97034358023
child 20912 fc5c40cbdb26
#BUGFIX by cg class: ReadEvalPrintLoop changed: #basicReadEvalPrintLoopWithInput:output:error:compiler:prompt:print: #readEvalPrintLoop
ReadEvalPrintLoop.st
--- a/ReadEvalPrintLoop.st	Tue Nov 08 18:40:26 2016 +0100
+++ b/ReadEvalPrintLoop.st	Tue Nov 08 18:44:07 2016 +0100
@@ -649,6 +649,8 @@
      A '#' character appearing in the first column of the first line turns off chunkmode,
      which allows for convenient shell scripts containing a #/bin/stx as the first line."
 
+    exitAction := [^ self].
+
     [
         |lines chunk|
 
@@ -774,8 +776,6 @@
      A '#' character appearing in the first column of the first line
      switches to chunkmode."
 
-    exitAction := [^ self].
-
     ControlInterrupt handle:[:ex |
         self errorStream nextPutLine:('Caught: ', ex description).
         self inputStream atEnd ifTrue:[