author | Claus Gittinger <cg@exept.de> |
Fri, 14 Jul 2017 11:44:42 +0200 | |
changeset 4164 | b79eeaec03d8 |
parent 4163 | 00ff0d34f206 |
child 4165 | e8783528724e |
--- a/Parser.st Thu Jul 13 16:23:48 2017 +0200 +++ b/Parser.st Fri Jul 14 11:44:42 2017 +0200 @@ -11048,9 +11048,11 @@ expr isAssignment ifTrue:[ expr := expr expression. ]. - (expr isConstant or:[expr isSelf]) ifTrue:[ + (expr notNil and:[expr isConstant or:[expr isSelf]]) ifTrue:[ returnedValues add:expr ]. + + "Modified: / 14-07-2017 / 10:43:43 / cg" ! rememberSelectorPossiblyUsed:sel