equal
deleted
inserted
replaced
92 |
92 |
93 asPetitStream |
93 asPetitStream |
94 ^ PPStream on: self |
94 ^ PPStream on: self |
95 ! ! |
95 ! ! |
96 |
96 |
97 !Interval methodsFor:'*petitparser-core-converting'! |
|
98 |
|
99 asParser |
|
100 "Create a parser for any in a range of characters between start and stop." |
|
101 |
|
102 self assert:start isCharacter. |
|
103 self assert:stop isCharacter. |
|
104 self assert:step == 1. |
|
105 ^ PPPredicateObjectParser between: start and: stop |
|
106 |
|
107 " |
|
108 ($a to:$f) asParser parse:'a' |
|
109 ($a to:$f) asParser parse:'g' |
|
110 " |
|
111 ! ! |
|
112 |
|
113 !Set methodsFor:'*petitparser-core-converting'! |
97 !Set methodsFor:'*petitparser-core-converting'! |
114 |
98 |
115 asParser |
99 asParser |
116 ^ PPChoiceParser withAll: (self collect: [ :each | each asParser ]) |
100 ^ PPChoiceParser withAll: (self collect: [ :each | each asParser ]) |
117 ! ! |
101 ! ! |
155 ! ! |
139 ! ! |
156 |
140 |
157 !stx_goodies_petitparser class methodsFor:'documentation'! |
141 !stx_goodies_petitparser class methodsFor:'documentation'! |
158 |
142 |
159 extensionsVersion_CVS |
143 extensionsVersion_CVS |
160 ^ '$Header: /cvs/stx/stx/goodies/petitparser/extensions.st,v 1.8 2014-02-17 15:08:10 cg Exp $' |
144 ^ '$Header: /cvs/stx/stx/goodies/petitparser/extensions.st,v 1.9 2014-02-17 15:08:38 cg Exp $' |
161 ! ! |
145 ! ! |