diff -r 7e08b31e0dae -r 116d2b2af905 compiler/PPCListNode.st --- a/compiler/PPCListNode.st Mon Nov 24 00:09:23 2014 +0000 +++ b/compiler/PPCListNode.st Wed Apr 15 11:28:09 2015 +0100 @@ -1,5 +1,7 @@ "{ Package: 'stx:goodies/petitparser/compiler' }" +"{ NameSpace: Smalltalk }" + PPCNode subclass:#PPCListNode instanceVariableNames:'children' classVariableNames:'' @@ -59,15 +61,6 @@ ^ self replace: child with: inlinedNode. ] ] -! - -optimize: params status: changeStatus - | retval | - retval := self. - retval := retval rewrite: params status: changeStatus. - retval := retval inline: params status: changeStatus. - - ^ retval ! ! !PPCListNode class methodsFor:'documentation'!