--- a/Parser.st	Fri Feb 15 16:30:20 2019 +0100
+++ b/Parser.st	Fri Feb 15 16:59:56 2019 +0100
@@ -8552,13 +8552,13 @@
     ] ifFalse:[
         tokenType == #String ifTrue:[
             self markStringFrom:pos to:source position.
-            source isInternalByteStream ifTrue:[
+            source isExternalStream ifFalse:[
                 source contents isString ifTrue:[
+                    "/ an expanded special string ? (not a quote at start)
                     (source contents at:pos) ~~ $' ifTrue:[
-                        "/ an expanded special string;
                         "/ remember the original, in case we want to rewrite the code.
                         "/ (or prettyPrint)
-                        val originalString:(source copyFrom:pos to:source position). 
+                        val originalString:(source contents copyFrom:pos to:source position). 
                     ].
                 ].    
             ].    
@@ -8575,7 +8575,7 @@
 
     "Modified: / 21-08-2011 / 08:10:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 26-07-2012 / 11:37:44 / cg"
-    "Modified (format): / 15-02-2019 / 16:05:29 / Claus Gittinger"
+    "Modified: / 15-02-2019 / 16:42:59 / Claus Gittinger"
 !
 
 primary_squeakComputedArray