147         predicate: charSet;

   147         predicate: charSet;

   148         yourself.

   148         yourself.

   149 !

   149 !

   150 

   150 

   151 visitStarNode: node

   151 visitStarNode: node

   153     self visitChildren: node.

   152     self visitChildren: node.

   154 

   153 

   155     (node child isKindOf: PPCMessagePredicateNode) ifTrue: [ 

   154     (node child isKindOf: PPCMessagePredicateNode) ifTrue: [ 

   156         self change.

   155         self change.

   157         ^ PPCStarMessagePredicateNode new

   156         ^ PPCStarMessagePredicateNode new

   185     "Let the Scanner to handle this stuff"

   184     "Let the Scanner to handle this stuff"

   186     ^ node

   185     ^ node

   187 !

   186 !

   188 

   187 

   189 visitTokenizingParserNode: node

   188 visitTokenizingParserNode: node

   191     self visitChild: node parser of: node.

   189     self visitChild: node parser of: node.

   192     ^ node

   190     ^ node

   193 !

   191 !

   194 

   192 

   195 visitTrimmingTokenNode: node

   193 visitTrimmingTokenNode: node