diff -r b2f2f15cef26 -r 7e08b31e0dae compiler/PPCInlineNotLiteralNode.st --- a/compiler/PPCInlineNotLiteralNode.st Wed Nov 19 10:52:37 2014 +0000 +++ b/compiler/PPCInlineNotLiteralNode.st Mon Nov 24 00:09:23 2014 +0000 @@ -1,6 +1,6 @@ "{ Package: 'stx:goodies/petitparser/compiler' }" -PPCAbstractLiteralNode subclass:#PPCInlineNotLiteralNode +PPCNotLiteralNode subclass:#PPCInlineNotLiteralNode instanceVariableNames:'' classVariableNames:'' poolDictionaries:'' @@ -41,6 +41,10 @@ !PPCInlineNotLiteralNode methodsFor:'printing'! +asInlined + ^ self +! + firstCharParser ^ literal first asParser not !