equal
deleted
inserted
replaced
1 "{ Package: 'stx:goodies/petitparser' }" |
1 "{ Package: 'stx:goodies/petitparser' }" |
|
2 |
|
3 "{ NameSpace: Smalltalk }" |
2 |
4 |
3 PPParser subclass:#PPListParser |
5 PPParser subclass:#PPListParser |
4 instanceVariableNames:'parsers' |
6 instanceVariableNames:'parsers' |
5 classVariableNames:'' |
7 classVariableNames:'' |
6 poolDictionaries:'' |
8 poolDictionaries:'' |
59 |
61 |
60 !PPListParser methodsFor:'copying'! |
62 !PPListParser methodsFor:'copying'! |
61 |
63 |
62 copyWith: aParser |
64 copyWith: aParser |
63 ^ self species withAll: (parsers copyWith: aParser) |
65 ^ self species withAll: (parsers copyWith: aParser) |
64 ! |
66 ! ! |
|
67 |
|
68 !PPListParser methodsFor:'copying-private'! |
65 |
69 |
66 postCopy |
70 postCopy |
67 super postCopy. |
71 super postCopy. |
68 parsers := parsers copy |
72 parsers := parsers copy |
69 ! ! |
73 ! ! |
80 ! ! |
84 ! ! |
81 |
85 |
82 !PPListParser class methodsFor:'documentation'! |
86 !PPListParser class methodsFor:'documentation'! |
83 |
87 |
84 version |
88 version |
85 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPListParser.st,v 1.4 2014-03-04 14:32:58 cg Exp $' |
89 ^ '$Header$' |
86 ! |
90 ! |
87 |
91 |
88 version_CVS |
92 version_CVS |
89 ^ '$Header: /cvs/stx/stx/goodies/petitparser/PPListParser.st,v 1.4 2014-03-04 14:32:58 cg Exp $' |
93 ^ '$Header$' |
90 ! |
94 ! |
91 |
95 |
92 version_SVN |
96 version_SVN |
93 ^ '$Id: PPListParser.st,v 1.4 2014-03-04 14:32:58 cg Exp $' |
97 ^ '$Id$' |
94 ! ! |
98 ! ! |
95 |
99 |