equal
deleted
inserted
replaced
1 "{ Package: 'stx:goodies/petitparser/compiler' }" |
1 "{ Package: 'stx:goodies/petitparser/compiler' }" |
|
2 |
|
3 "{ NameSpace: Smalltalk }" |
2 |
4 |
3 PPCNilNode subclass:#PPCSentinelNode |
5 PPCNilNode subclass:#PPCSentinelNode |
4 instanceVariableNames:'' |
6 instanceVariableNames:'' |
5 classVariableNames:'' |
7 classVariableNames:'' |
6 poolDictionaries:'' |
8 poolDictionaries:'' |
7 category:'PetitCompiler-Nodes' |
9 category:'PetitCompiler-Nodes' |
8 ! |
10 ! |
9 |
11 |
|
12 PPCSentinelNode class instanceVariableNames:'Instance' |
|
13 |
|
14 " |
|
15 No other class instance variables are inherited by this class. |
|
16 " |
|
17 ! |
|
18 |
10 !PPCSentinelNode class methodsFor:'as yet unclassified'! |
19 !PPCSentinelNode class methodsFor:'as yet unclassified'! |
11 |
20 |
12 instance |
21 instance |
13 ^ Instance ifNil: [ Instance := self basicNew ] |
22 ^ Instance ifNil: [ Instance := self basicNew ] |
14 ! ! |
23 ! ! |