10 lines
200 B
Smalltalk
10 lines
200 B
Smalltalk
|
Extension { #name : 'PPLiteralObjectParser' }
|
||
|
|
|
||
|
|
{ #category : '*petitcompiler' }
|
||
|
|
PPLiteralObjectParser >> asCompilerNode [
|
||
|
|
^ PPCCharacterNode new
|
||
|
|
character: literal;
|
||
|
|
name: self name;
|
||
|
|
yourself
|
||
|
|
]
|