author | Claus Gittinger <cg@exept.de> |
Tue, 08 Nov 2016 18:58:04 +0100 | |
changeset 20917 | 711f52ea357e |
parent 20916 | 9aa6e3cf1f14 |
child 20918 | 0abe093586f3 |
--- a/ReadEvalPrintLoop.st Tue Nov 08 18:57:00 2016 +0100 +++ b/ReadEvalPrintLoop.st Tue Nov 08 18:58:04 2016 +0100 @@ -382,6 +382,7 @@ 'fn is ' errorPrint. filename errorPrintCR. newInput := filename readStream. +self halt. 'newInput is' errorPrint. newInput errorPrintCR. newInput isNil ifTrue:[ ('Could not find file: "',filename pathName,'"') errorPrintCR.