--- 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
!