equal
deleted
inserted
replaced
1 "{ Package: 'stx:goodies/petitparser/compiler' }" |
1 "{ Package: 'stx:goodies/petitparser/compiler' }" |
|
2 |
|
3 "{ NameSpace: Smalltalk }" |
2 |
4 |
3 PPCListNode subclass:#PPCTrimmingTokenNode |
5 PPCListNode subclass:#PPCTrimmingTokenNode |
4 instanceVariableNames:'tokenClass' |
6 instanceVariableNames:'tokenClass' |
5 classVariableNames:'' |
7 classVariableNames:'' |
6 poolDictionaries:'' |
8 poolDictionaries:'' |
7 category:'PetitCompiler-Nodes' |
9 category:'PetitCompiler-Nodes' |
8 ! |
10 ! |
9 |
|
10 !PPCTrimmingTokenNode class methodsFor:'instance creation'! |
|
11 |
|
12 new |
|
13 "return an initialized instance" |
|
14 |
|
15 ^ self basicNew initialize. |
|
16 ! ! |
|
17 |
11 |
18 !PPCTrimmingTokenNode methodsFor:'accessing'! |
12 !PPCTrimmingTokenNode methodsFor:'accessing'! |
19 |
13 |
20 child |
14 child |
21 |
15 |