equal
deleted
inserted
replaced
1 "{ Package: 'stx:goodies/petitparser' }" |
1 "{ Package: 'stx:goodies/petitparser' }" |
|
2 |
|
3 "{ NameSpace: Smalltalk }" |
2 |
4 |
3 PPDelegateParser subclass:#PPCompositeParser |
5 PPDelegateParser subclass:#PPCompositeParser |
4 instanceVariableNames:'dependencies' |
6 instanceVariableNames:'dependencies' |
5 classVariableNames:'' |
7 classVariableNames:'' |
6 poolDictionaries:'' |
8 poolDictionaries:'' |
80 ! |
82 ! |
81 |
83 |
82 parse: anObject startingAt: aSymbol onError: aBlock |
84 parse: anObject startingAt: aSymbol onError: aBlock |
83 ^ (self newStartingAt: aSymbol) parse: anObject onError: aBlock |
85 ^ (self newStartingAt: aSymbol) parse: anObject onError: aBlock |
84 ! ! |
86 ! ! |
|
87 |
85 |
88 |
86 !PPCompositeParser methodsFor:'accessing'! |
89 !PPCompositeParser methodsFor:'accessing'! |
87 |
90 |
88 start |
91 start |
89 "Answer the production to start this parser with." |
92 "Answer the production to start this parser with." |