equal
deleted
inserted
replaced
156 ( #( @ ) includes:selector) ifTrue:[ |
156 ( #( @ ) includes:selector) ifTrue:[ |
157 canFold := (folding == #full) |
157 canFold := (folding == #full) |
158 ] |
158 ] |
159 ]. |
159 ]. |
160 (recVal isInteger and:[argVal isInteger]) ifTrue:[ |
160 (recVal isInteger and:[argVal isInteger]) ifTrue:[ |
161 ( #( bitShift: bitOr: ) includes:selector) ifTrue:[ |
161 ( #( bitShift: bitOr: bitAnd: ) includes:selector) ifTrue:[ |
162 canFold := true |
162 canFold := true |
163 ] |
163 ] |
164 ]. |
164 ]. |
165 (recVal isMemberOf:String) ifTrue:[ |
165 (recVal isMemberOf:String) ifTrue:[ |
166 (argVal isInteger and:[selector == #at:]) ifTrue:[ |
166 (argVal isInteger and:[selector == #at:]) ifTrue:[ |
2789 ! ! |
2789 ! ! |
2790 |
2790 |
2791 !MessageNode class methodsFor:'documentation'! |
2791 !MessageNode class methodsFor:'documentation'! |
2792 |
2792 |
2793 version |
2793 version |
2794 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.106 1999-11-16 20:51:09 cg Exp $' |
2794 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.107 2000-01-08 00:20:34 cg Exp $' |
2795 ! ! |
2795 ! ! |