equal
deleted
inserted
replaced
3 PPParser subclass:#PPLiteralParser |
3 PPParser subclass:#PPLiteralParser |
4 instanceVariableNames:'literal message' |
4 instanceVariableNames:'literal message' |
5 classVariableNames:'' |
5 classVariableNames:'' |
6 poolDictionaries:'' |
6 poolDictionaries:'' |
7 category:'PetitParser-Parsers' |
7 category:'PetitParser-Parsers' |
8 ! |
|
9 |
|
10 PPLiteralParser comment:'Abstract literal parser that parses some kind of literal type (to be specified by subclasses). |
|
11 Instance Variables: |
|
12 literal <Object> The literal object to be parsed. |
|
13 message <String> The error message to be generated. |
|
14 ' |
|
15 ! |
8 ! |
16 |
9 |
17 |
10 |
18 !PPLiteralParser class methodsFor:'instance creation'! |
11 !PPLiteralParser class methodsFor:'instance creation'! |
19 |
12 |
33 ^ literal |
26 ^ literal |
34 ! |
27 ! |
35 |
28 |
36 message |
29 message |
37 "Answer the failure message." |
30 "Answer the failure message." |
38 |
31 |
39 ^ message |
32 ^ message |
40 ! ! |
33 ! ! |
41 |
34 |
42 !PPLiteralParser methodsFor:'initialization'! |
35 !PPLiteralParser methodsFor:'initialization'! |
43 |
36 |
48 |
41 |
49 !PPLiteralParser methodsFor:'operators'! |
42 !PPLiteralParser methodsFor:'operators'! |
50 |
43 |
51 caseInsensitive |
44 caseInsensitive |
52 "Answer a parser that can parse the receiver case-insensitive." |
45 "Answer a parser that can parse the receiver case-insensitive." |
53 |
46 |
54 self subclassResponsibility |
47 self subclassResponsibility |
55 ! ! |
48 ! ! |
56 |
49 |
57 !PPLiteralParser methodsFor:'printing'! |
50 !PPLiteralParser methodsFor:'printing'! |
58 |
51 |
61 aStream nextPutAll: ', '; print: literal |
54 aStream nextPutAll: ', '; print: literal |
62 ! ! |
55 ! ! |
63 |
56 |
64 !PPLiteralParser class methodsFor:'documentation'! |
57 !PPLiteralParser class methodsFor:'documentation'! |
65 |
58 |
|
59 version |
|
60 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPLiteralParser.st,v 1.3 2012-05-04 22:04:55 vrany Exp $' |
|
61 ! |
|
62 |
|
63 version_CVS |
|
64 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPLiteralParser.st,v 1.3 2012-05-04 22:04:55 vrany Exp $' |
|
65 ! |
|
66 |
66 version_SVN |
67 version_SVN |
67 ^ '$Id: PPLiteralParser.st,v 1.2 2012-01-13 11:22:50 cg Exp $' |
68 ^ '§Id: PPLiteralParser.st 2 2010-12-17 18:44:23Z vranyj1 §' |
68 ! ! |
69 ! ! |