diff -r eebf3d210c09 -r c446d835cbba PPOptionalParser.st --- a/PPOptionalParser.st Tue Mar 04 15:33:03 2014 +0100 +++ b/PPOptionalParser.st Tue Mar 04 15:33:10 2014 +0100 @@ -8,16 +8,23 @@ ! +!PPOptionalParser methodsFor:'*petitanalyzer-testing'! + +isNullable + ^ true +! ! + !PPOptionalParser methodsFor:'parsing'! parseOn: aStream | element | element := parser parseOn: aStream. - ^ element isPetitFailure ifFalse: [ ^ element ] + ^ element isPetitFailure ifFalse: [ element ] ! ! !PPOptionalParser class methodsFor:'documentation'! version_SVN - ^ '§Id: PPOptionalParser.st 4 2010-12-18 17:02:23Z kursjan §' + ^ '$Id: PPOptionalParser.st,v 1.4 2014-03-04 14:33:10 cg Exp $' ! ! +