equal
deleted
inserted
replaced
54 codeOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler |
54 codeOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler |
55 receiver codeForCascadeOn:aStream inBlock:b for:aCompiler. |
55 receiver codeForCascadeOn:aStream inBlock:b for:aCompiler. |
56 self codeSendOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler |
56 self codeSendOn:aStream inBlock:b valueNeeded:valueNeeded for:aCompiler |
57 ! ! |
57 ! ! |
58 |
58 |
59 !CascadeNode methodsFor:'enumeration'! |
59 !CascadeNode methodsFor:'enumerating'! |
60 |
60 |
61 nodeDo:anEnumerator |
61 nodeDo:anEnumerator |
62 "helper for parse tree walking" |
62 "helper for parse tree walking" |
63 |
63 |
64 "/ sigh; ST/X encodes things differently ... |
64 "/ sigh; ST/X encodes things differently ... |
88 |
88 |
89 "Created: 19.6.1997 / 16:39:17 / cg" |
89 "Created: 19.6.1997 / 16:39:17 / cg" |
90 "Modified: 19.6.1997 / 17:32:47 / cg" |
90 "Modified: 19.6.1997 / 17:32:47 / cg" |
91 ! ! |
91 ! ! |
92 |
92 |
93 !CascadeNode methodsFor:'evaluating'! |
93 !CascadeNode methodsFor:'evaluation'! |
94 |
94 |
95 evaluate |
95 evaluate |
96 |t argValueArray| |
96 |t argValueArray| |
97 |
97 |
98 selector := selector asSymbol. |
98 selector := selector asSymbol. |
184 ! ! |
184 ! ! |
185 |
185 |
186 !CascadeNode class methodsFor:'documentation'! |
186 !CascadeNode class methodsFor:'documentation'! |
187 |
187 |
188 version |
188 version |
189 ^ '$Header: /cvs/stx/stx/libcomp/CascadeNode.st,v 1.20 1999-06-23 22:17:55 cg Exp $' |
189 ^ '$Header: /cvs/stx/stx/libcomp/CascadeNode.st,v 1.21 2000-02-12 15:33:32 cg Exp $' |
190 ! ! |
190 ! ! |