1 "{ Package: 'stx:goodies/petitparser' }"

     1 "{ Package: 'stx:goodies/petitparser' }"

     2 

     4 

     3 PPParser subclass:#PPDelegateParser

     5 PPParser subclass:#PPDelegateParser

     4 	instanceVariableNames:'parser'

     6 	instanceVariableNames:'parser'

     5 	classVariableNames:''

     7 	classVariableNames:''

     6 	poolDictionaries:''

     8 	poolDictionaries:''

    11 !PPDelegateParser class methodsFor:'instance creation'!

    13 !PPDelegateParser class methodsFor:'instance creation'!

    12 

    14 

    13 on: aParser

    15 on: aParser

    14 	^ self new setParser: aParser

    16 	^ self new setParser: aParser

    15 ! !

    17 ! !

    16 

    20 

    17 

    21 

    18 !PPDelegateParser methodsFor:'accessing'!

    22 !PPDelegateParser methodsFor:'accessing'!

    19 

    23 

    20 children

    24 children