13 lines
236 B
Smalltalk
13 lines
236 B
Smalltalk
Extension { #name : 'PPActionParser' }
|
|
|
|
{ #category : '*petitcompiler' }
|
|
PPActionParser >> asCompilerNode [
|
|
^ PPCActionNode new
|
|
name: self name;
|
|
block: block;
|
|
child: parser;
|
|
properties: properties;
|
|
parser: self;
|
|
yourself
|
|
]
|