--- a/compiler/PPCChoiceNode.st	Mon Nov 24 00:09:23 2014 +0000
+++ b/compiler/PPCChoiceNode.st	Wed Apr 15 11:28:09 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/petitparser/compiler' }"
 
+"{ NameSpace: Smalltalk }"
+
 PPCListNode subclass:#PPCChoiceNode
 	instanceVariableNames:''
 	classVariableNames:''
@@ -65,14 +67,3 @@
 	^ #ch
 ! !
 
-!PPCChoiceNode methodsFor:'optimizing'!
-
-optimize: params status: changeStatus
-	| retval |
-	retval := self.
-	retval := retval rewrite: params status: changeStatus.
-	retval := retval inline: params status: changeStatus.
-	
-	^ retval
-! !
-