equal
deleted
inserted
replaced
79 "not reached - parser has already checked this" |
79 "not reached - parser has already checked this" |
80 |
80 |
81 ^ self error:'store into self - cannot happen' |
81 ^ self error:'store into self - cannot happen' |
82 ! ! |
82 ! ! |
83 |
83 |
84 !SelfNode methodsFor:'enumeration'! |
84 !SelfNode methodsFor:'enumerating'! |
85 |
85 |
86 nodeDo:anEnumerator |
86 nodeDo:anEnumerator |
87 "helper for parse tree walking" |
87 "helper for parse tree walking" |
88 |
88 |
89 ^ anEnumerator doVariable:self name:'self' |
89 ^ anEnumerator doVariable:self name:'self' |
90 |
90 |
91 "Created: 19.6.1997 / 17:20:02 / cg" |
91 "Created: 19.6.1997 / 17:20:02 / cg" |
92 ! ! |
92 ! ! |
93 |
93 |
94 !SelfNode methodsFor:'evaluating'! |
94 !SelfNode methodsFor:'evaluation'! |
95 |
95 |
96 evaluate |
96 evaluate |
97 ^ value |
97 ^ value |
98 ! |
98 ! |
99 |
99 |
128 ! ! |
128 ! ! |
129 |
129 |
130 !SelfNode class methodsFor:'documentation'! |
130 !SelfNode class methodsFor:'documentation'! |
131 |
131 |
132 version |
132 version |
133 ^ '$Header: /cvs/stx/stx/libcomp/SelfNode.st,v 1.16 1999-06-23 22:21:33 cg Exp $' |
133 ^ '$Header: /cvs/stx/stx/libcomp/SelfNode.st,v 1.17 2000-02-12 15:32:27 cg Exp $' |
134 ! ! |
134 ! ! |