148         predicate: charSet;

   148         predicate: charSet;

   149         yourself.

   149         yourself.

   150 !

   150 !

   151 

   151 

   152 visitStarNode: node

   152 visitStarNode: node

   154     self visitChildren: node.

   153     self visitChildren: node.

   155 

   154 

   156     (node child isKindOf: PPCMessagePredicateNode) ifTrue: [ 

   155     (node child isKindOf: PPCMessagePredicateNode) ifTrue: [ 

   157         self change.

   156         self change.

   158         ^ PPCStarMessagePredicateNode new

   157         ^ PPCStarMessagePredicateNode new

   186     "Let the Scanner to handle this stuff"

   185     "Let the Scanner to handle this stuff"

   187     ^ node

   186     ^ node

   188 !

   187 !

   189 

   188 

   190 visitTokenizingParserNode: node

   189 visitTokenizingParserNode: node

   192     self visitChild: node parser of: node.

   190     self visitChild: node parser of: node.

   193     ^ node

   191     ^ node

   194 !

   192 !

   195 

   193 

   196 visitTrimmingTokenNode: node

   194 visitTrimmingTokenNode: node