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