10 lines
189 B
Smalltalk
10 lines
189 B
Smalltalk
|
Extension { #name : 'PPFailingParser' }
|
||
|
|
|
||
|
|
{ #category : '*petitcompiler' }
|
||
|
|
PPFailingParser >> asCompilerNode [
|
||
|
|
^ PPCFailingNode new
|
||
|
|
name: self name;
|
||
|
|
message: self message;
|
||
|
|
yourself
|
||
|
|
]
|