--- a/compiler/PPCStarCharSetPredicateNode.st	Mon Nov 24 00:09:23 2014 +0000
+++ b/compiler/PPCStarCharSetPredicateNode.st	Wed Apr 15 11:28:09 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/petitparser/compiler' }"
 
+"{ NameSpace: Smalltalk }"
+
 PPCStarNode subclass:#PPCStarCharSetPredicateNode
 	instanceVariableNames:'predicate'
 	classVariableNames:''
@@ -9,10 +11,6 @@
 
 !PPCStarCharSetPredicateNode methodsFor:'accessing'!
 
-acceptsEpsilon
-	^ true
-!
-
 compileWith: compiler effect: effect id: id
 	| classification classificationId |
 	
@@ -36,10 +34,6 @@
 	^ (classification asOrderedCollection addLast: false; yourself) asArray
 !
 
-firstCharParser
-	^ PPPredicateObjectParser on: predicate message: 'predicate expected'.
-!
-
 firstCharSet
 	^ PPCharSetPredicate on: predicate 	
 !