--- a/ReadEvalPrintLoop.st	Tue Nov 08 18:55:26 2016 +0100
+++ b/ReadEvalPrintLoop.st	Tue Nov 08 18:57:00 2016 +0100
@@ -372,15 +372,17 @@
 
     currentDirectory := currentDirectory ? (Filename currentDirectory).
 
-'fn is' errorPrint. filename errorPrintCR.
+'fn is ' errorPrint. filename errorPrintCR.
     filename := filename asFilename.
-'fn is' errorPrint. filename errorPrintCR.
+'fn is ' errorPrint. filename errorPrintCR.
     filename isAbsolute ifFalse:[
+'not absolute ' errorPrintCR.
         filename := currentDirectory construct:filename.
     ].
-'fn is' errorPrint. filename errorPrintCR.
+'fn is ' errorPrint. filename errorPrintCR.
 
     newInput := filename readStream.
+'newInput is' errorPrint. newInput errorPrintCR.
     newInput isNil ifTrue:[
         ('Could not find file: "',filename pathName,'"') errorPrintCR.
         ^ self.