equal
deleted
inserted
replaced
10 |
10 |
11 !PPPluggableParser class methodsFor:'instance creation'! |
11 !PPPluggableParser class methodsFor:'instance creation'! |
12 |
12 |
13 on: aBlock |
13 on: aBlock |
14 ^ self new initializeOn: aBlock |
14 ^ self new initializeOn: aBlock |
|
15 ! ! |
|
16 |
|
17 !PPPluggableParser methodsFor:'*petitanalyzer-matching'! |
|
18 |
|
19 match: aParser inContext: aDictionary seen: anIdentitySet |
|
20 ^ (super match: aParser inContext: aDictionary seen: anIdentitySet) and: [ self block = aParser block ] |
15 ! ! |
21 ! ! |
16 |
22 |
17 !PPPluggableParser methodsFor:'accessing'! |
23 !PPPluggableParser methodsFor:'accessing'! |
18 |
24 |
19 block |
25 block |
40 ! ! |
46 ! ! |
41 |
47 |
42 !PPPluggableParser class methodsFor:'documentation'! |
48 !PPPluggableParser class methodsFor:'documentation'! |
43 |
49 |
44 version |
50 version |
45 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPPluggableParser.st,v 1.3 2012-05-04 22:10:02 vrany Exp $' |
51 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPPluggableParser.st,v 1.4 2014-03-04 14:33:12 cg Exp $' |
46 ! |
52 ! |
47 |
53 |
48 version_CVS |
54 version_CVS |
49 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPPluggableParser.st,v 1.3 2012-05-04 22:10:02 vrany Exp $' |
55 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPPluggableParser.st,v 1.4 2014-03-04 14:33:12 cg Exp $' |
50 ! |
56 ! |
51 |
57 |
52 version_SVN |
58 version_SVN |
53 ^ '§Id: PPPluggableParser.st 2 2010-12-17 18:44:23Z vranyj1 §' |
59 ^ '$Id: PPPluggableParser.st,v 1.4 2014-03-04 14:33:12 cg Exp $' |
54 ! ! |
60 ! ! |
|
61 |