compiler/PPCTokenizingVisitor.st
changeset 525 751532c8f3db
parent 516 3b81c9e53352
parent 524 f6f68d32de73
equal deleted inserted replaced
523:09afcf28ed60 525:751532c8f3db
   118     
   118     
   119     self assert: node acceptsEpsilon not description: 'Sorry, but the epsilon tokens are not allowed'.
   119     self assert: node acceptsEpsilon not description: 'Sorry, but the epsilon tokens are not allowed'.
   120     
   120     
   121     ^ PPCTokenConsumeNode new
   121     ^ PPCTokenConsumeNode new
   122         child: node;
   122         child: node;
       
   123         name: node name;
   123         yourself.
   124         yourself.
   124 !
   125 !
   125 
   126 
   126 visitTrimmingTokenNode: node
   127 visitTrimmingTokenNode: node
   127     self change.
   128     self change.