equal
deleted
inserted
replaced
6 poolDictionaries:'' |
6 poolDictionaries:'' |
7 category:'PetitParser-Parsers' |
7 category:'PetitParser-Parsers' |
8 ! |
8 ! |
9 |
9 |
10 |
10 |
|
11 !PPOptionalParser methodsFor:'*petitanalyzer-testing'! |
|
12 |
|
13 isNullable |
|
14 ^ true |
|
15 ! ! |
|
16 |
11 !PPOptionalParser methodsFor:'parsing'! |
17 !PPOptionalParser methodsFor:'parsing'! |
12 |
18 |
13 parseOn: aStream |
19 parseOn: aStream |
14 | element | |
20 | element | |
15 element := parser parseOn: aStream. |
21 element := parser parseOn: aStream. |
16 ^ element isPetitFailure ifFalse: [ ^ element ] |
22 ^ element isPetitFailure ifFalse: [ element ] |
17 ! ! |
23 ! ! |
18 |
24 |
19 !PPOptionalParser class methodsFor:'documentation'! |
25 !PPOptionalParser class methodsFor:'documentation'! |
20 |
26 |
21 version_SVN |
27 version_SVN |
22 ^ '§Id: PPOptionalParser.st 4 2010-12-18 17:02:23Z kursjan §' |
28 ^ '$Id: PPOptionalParser.st,v 1.4 2014-03-04 14:33:10 cg Exp $' |
23 ! ! |
29 ! ! |
|
30 |