equal
deleted
inserted
replaced
102 visitStarMessagePredicateNode: node |
102 visitStarMessagePredicateNode: node |
103 ^ self markForInline: node |
103 ^ self markForInline: node |
104 ! |
104 ! |
105 |
105 |
106 visitTokenConsumeNode: node |
106 visitTokenConsumeNode: node |
107 super visitTokenConsumeNode: node. |
107 "super visitTokenConsumeNode: node." |
|
108 |
108 node name isNil ifTrue: [ |
109 node name isNil ifTrue: [ |
109 self markForInline: node |
110 self flag: 'temporarily disabled'. |
|
111 "self markForInline: node" |
110 ]. |
112 ]. |
|
113 |
111 ^ node |
114 ^ node |
112 ! |
115 ! |
113 |
116 |
114 visitTokenStarMessagePredicateNode: node |
117 visitTokenStarMessagePredicateNode: node |
115 ^ self markForInline: node |
118 ^ self markForInline: node |
124 self markForInline: node. |
127 self markForInline: node. |
125 ^ node |
128 ^ node |
126 ! |
129 ! |
127 |
130 |
128 visitTokenizingParserNode: node |
131 visitTokenizingParserNode: node |
129 self visit: node tokenizer. |
132 "skip tokens" |
|
133 "skip whitespace" |
|
134 "self visit: node whitespace." |
|
135 |
130 self visit: node parser. |
136 self visit: node parser. |
|
137 |
131 ^ node |
138 ^ node |
132 ! ! |
139 ! ! |
133 |
140 |
134 !PPCInliningVisitor class methodsFor:'documentation'! |
141 !PPCInliningVisitor class methodsFor:'documentation'! |
135 |
142 |