--- a/Parser.st Mon Jan 06 04:27:03 2020 +0000
+++ b/Parser.st Mon Jan 27 12:51:03 2020 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -6522,7 +6520,7 @@
(expr == #Error) ifTrue:[^ #Error].
node := ReturnNode expression:expr.
- node startPosition:pos endPosition:(expr endPosition).
+ node startPosition:pos endPosition:(expr endPosition ? source position).
node home:self blockHome:currentBlock.
true "(lineNumberInfo == #full)" ifTrue:[node lineNumber:lnr].
self checkPlausibilityOf:node from:pos to:node endPosition.