author | Claus Gittinger <cg@exept.de> |
Mon, 17 Feb 2014 02:30:41 +0100 | |
changeset 149 | 41efe16c9c70 |
parent 25 | be0f50e43f2f |
child 172 | c446d835cbba |
permissions | -rw-r--r-- |
"{ Package: 'stx:goodies/petitparser' }" PPDelegateParser subclass:#PPOptionalParser instanceVariableNames:'' classVariableNames:'' poolDictionaries:'' category:'PetitParser-Parsers' ! !PPOptionalParser methodsFor:'parsing'! parseOn: aStream | element | element := parser parseOn: aStream. ^ element isPetitFailure ifFalse: [ ^ element ] ! ! !PPOptionalParser class methodsFor:'documentation'! version_SVN ^ '§Id: PPOptionalParser.st 4 2010-12-18 17:02:23Z kursjan §' ! !