equal
deleted
inserted
replaced
138 "Answer a predicate parser named after the receiving symbol. Possible symbols are the method selectors on the class-side of PPPredicateObjectParser." |
138 "Answer a predicate parser named after the receiving symbol. Possible symbols are the method selectors on the class-side of PPPredicateObjectParser." |
139 |
139 |
140 ^ PPPredicateObjectParser perform: self |
140 ^ PPPredicateObjectParser perform: self |
141 ! ! |
141 ! ! |
142 |
142 |
143 !Symbol methodsFor:'Compatibility-Squeak'! |
|
144 |
|
145 value:anObject |
|
146 ^ anObject perform: self. |
|
147 |
|
148 "Created: / 18-12-2010 / 16:47:22 / Jan Kurs <kurs.jan@post.cz>" |
|
149 ! ! |
|
150 |
|
151 !Text methodsFor:'*petitparser-core'! |
143 !Text methodsFor:'*petitparser-core'! |
152 |
144 |
153 asPetitStream |
145 asPetitStream |
154 ^ string asPetitStream |
146 ^ string asPetitStream |
155 ! ! |
147 ! ! |
163 ! ! |
155 ! ! |
164 |
156 |
165 !stx_goodies_petitparser class methodsFor:'documentation'! |
157 !stx_goodies_petitparser class methodsFor:'documentation'! |
166 |
158 |
167 extensionsVersion_CVS |
159 extensionsVersion_CVS |
168 ^ '$Header: /cvs/stx/stx/goodies/petitparser/extensions.st,v 1.12 2014-03-04 20:29:55 cg Exp $' |
160 ^ '$Header$' |
169 ! ! |
161 ! ! |
170 |
162 |