# HG changeset patch # User Claus Gittinger # Date 1580125863 -3600 # Node ID 9978e42e49f0958014da5afc45696a4249273f16 # Parent d6ef2da6ea69a686d80263ebe478e3f805279d52 #BUGFIX by exept class: Parser changed: #returnStatement diff -r d6ef2da6ea69 -r 9978e42e49f0 Parser.st --- 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.