equal
deleted
inserted
replaced
192 ^ ParseErrorNode errorString:'error in constant expression (' , ex description , ')' |
192 ^ ParseErrorNode errorString:'error in constant expression (' , ex description , ')' |
193 ] do:[ |
193 ] do:[ |
194 result := recVal perform:selector with:argVal. |
194 result := recVal perform:selector with:argVal. |
195 ]. |
195 ]. |
196 ^ ConstantNode type:(ConstantNode typeOfConstant:result) value:result |
196 ^ ConstantNode type:(ConstantNode typeOfConstant:result) value:result |
|
197 from: recNode startPosition to: argNode endPosition |
197 ] |
198 ] |
198 ] |
199 ] |
199 ]. |
200 ]. |
200 |
201 |
201 "/ |
202 "/ |
210 ]. |
211 ]. |
211 ]. |
212 ]. |
212 |
213 |
213 ^ (self basicNew) receiver:recNode selector:selectorString args:(Array with:argNode) lineno:0 |
214 ^ (self basicNew) receiver:recNode selector:selectorString args:(Array with:argNode) lineno:0 |
214 |
215 |
215 "Modified: / 16.11.1999 / 21:50:33 / cg" |
216 "Modified: / 16-11-1999 / 21:50:33 / cg" |
|
217 "Modified: / 28-07-2011 / 09:58:32 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
216 ! |
218 ! |
217 |
219 |
218 receiver:recNode selector:selectorString args:anArray |
220 receiver:recNode selector:selectorString args:anArray |
219 ^ self receiver:recNode selector:selectorString args:anArray fold:nil |
221 ^ self receiver:recNode selector:selectorString args:anArray fold:nil |
220 ! |
222 ! |
3060 ! ! |
3062 ! ! |
3061 |
3063 |
3062 !MessageNode class methodsFor:'documentation'! |
3064 !MessageNode class methodsFor:'documentation'! |
3063 |
3065 |
3064 version_CVS |
3066 version_CVS |
3065 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.184 2011-07-27 15:00:21 vrany Exp $' |
3067 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.185 2011-07-28 14:57:44 vrany Exp $' |
3066 ! |
3068 ! |
3067 |
3069 |
3068 version_SVN |
3070 version_SVN |
3069 ^ '§ Id §' |
3071 ^ '§ Id §' |
3070 ! ! |
3072 ! ! |