10 lines
169 B
Smalltalk
10 lines
169 B
Smalltalk
|
Extension { #name : 'PPAndParser' }
|
||
|
|
|
||
|
|
{ #category : '*petitcompiler' }
|
||
|
|
PPAndParser >> asCompilerNode [
|
||
|
|
^ PPCAndNode new
|
||
|
|
name: self name;
|
||
|
|
child: parser;
|
||
|
|
yourself
|
||
|
|
]
|