Extension { #name : 'PPDelegateParser' } { #category : '*petitcompiler' } PPDelegateParser >> asCompilerNode [ self class == PPDelegateParser ifTrue: [ ^ PPCForwardNode new name: self name; child: parser; yourself ]. ^ super asCompilerNode "Modified: / 22-05-2015 / 21:53:28 / Jan Vrany " ] { #category : '*petitcompiler' } PPDelegateParser >> firstCharSet [ ^ parser firstCharSet ] { #category : '*PetitCompiler-Analysis' } PPDelegateParser >> neverFails [ "TODO JK: I can do better here, should be implemented as the PPCNodes hierarchy" ^ false ]