equal
deleted
inserted
replaced
1 "{ Package: 'stx:goodies/petitparser' }"! |
1 "{ Package: 'stx:goodies/petitparser' }"! |
2 |
2 |
3 !Block methodsFor:'*petitparser-core-converting'! |
3 !Block methodsFor:'*petitparser-core-converting'! |
4 |
4 |
5 asParser |
5 asParser |
|
6 "Answer a parser implemented in the receiving one-argument block." |
|
7 |
6 ^ PPPluggableParser on: self |
8 ^ PPPluggableParser on: self |
7 ! ! |
9 ! ! |
8 |
10 |
9 !BlockContext methodsFor:'*petitparser-core-converting'! |
11 !BlockContext methodsFor:'*petitparser-core-converting'! |
10 |
12 |
11 asParser |
13 asParser |
12 ^ PPPluggableParser on: self |
14 ^ PPPluggableParser on: self |
13 ! ! |
15 ! ! |
14 |
16 |
15 !Character methodsFor:'*petitparser-converting'! |
17 !Character methodsFor:'*petitparser-core-converting'! |
16 |
18 |
17 asParser |
19 asParser |
|
20 "Answer a parser that accepts the receiving character." |
|
21 |
18 ^ PPLiteralObjectParser on: self |
22 ^ PPLiteralObjectParser on: self |
19 ! ! |
23 ! ! |
20 |
24 |
21 !Character methodsFor:'arithmetic'! |
25 !Character methodsFor:'arithmetic'! |
22 |
26 |
45 ! ! |
49 ! ! |
46 |
50 |
47 !Object methodsFor:'*petitparser-core-converting'! |
51 !Object methodsFor:'*petitparser-core-converting'! |
48 |
52 |
49 asParser |
53 asParser |
|
54 "Answer a parser accepting the receiving object." |
|
55 |
50 ^ PPPredicateObjectParser expect: self |
56 ^ PPPredicateObjectParser expect: self |
51 ! ! |
57 ! ! |
52 |
58 |
53 !Object methodsFor:'*petitparser-core-testing'! |
59 !Object methodsFor:'*petitparser-core-testing'! |
54 |
60 |
107 ! ! |
113 ! ! |
108 |
114 |
109 !String methodsFor:'*petitparser-core-converting'! |
115 !String methodsFor:'*petitparser-core-converting'! |
110 |
116 |
111 asParser |
117 asParser |
|
118 "Answer a parser that accepts the receiving string." |
|
119 |
112 ^ PPLiteralSequenceParser on: self |
120 ^ PPLiteralSequenceParser on: self |
113 ! ! |
121 ! ! |
114 |
122 |
115 !Symbol methodsFor:'*petitparser-core-converting'! |
123 !Symbol methodsFor:'*petitparser-core-converting'! |
116 |
124 |
117 asParser |
125 asParser |
|
126 "Answer a predicate parser named after the receiving symbol. Possible symbols are the method selectors on the class-side of PPPredicateObjectParser." |
|
127 |
118 ^ PPPredicateObjectParser perform: self |
128 ^ PPPredicateObjectParser perform: self |
119 ! ! |
129 ! ! |
120 |
130 |
121 !Symbol methodsFor:'Compatibility-Squeak'! |
131 !Symbol methodsFor:'Compatibility-Squeak'! |
122 |
132 |
133 ! ! |
143 ! ! |
134 |
144 |
135 !UndefinedObject methodsFor:'*petitparser-converting'! |
145 !UndefinedObject methodsFor:'*petitparser-converting'! |
136 |
146 |
137 asParser |
147 asParser |
|
148 "Answer a parser that succeeds and does not consume anything." |
|
149 |
138 ^ PPEpsilonParser new |
150 ^ PPEpsilonParser new |
139 ! ! |
151 ! ! |
140 |
152 |
141 !stx_goodies_petitparser class methodsFor:'documentation'! |
153 !stx_goodies_petitparser class methodsFor:'documentation'! |
142 |
154 |
143 extensionsVersion_CVS |
155 extensionsVersion_CVS |
144 ^ '$Header: /cvs/stx/stx/goodies/petitparser/extensions.st,v 1.9 2014-02-17 15:08:38 cg Exp $' |
156 ^ '$Header: /cvs/stx/stx/goodies/petitparser/extensions.st,v 1.10 2014-03-04 15:53:53 cg Exp $' |
145 ! ! |
157 ! ! |
|
158 |