compiler/PPCNotCharSetPredicateNode.st
changeset 422 116d2b2af905
parent 414 0eaf09920532
child 438 20598d7ce9fa
--- a/compiler/PPCNotCharSetPredicateNode.st	Mon Nov 24 00:09:23 2014 +0000
+++ b/compiler/PPCNotCharSetPredicateNode.st	Wed Apr 15 11:28:09 2015 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/petitparser/compiler' }"
 
+"{ NameSpace: Smalltalk }"
+
 PPCAbstractPredicateNode subclass:#PPCNotCharSetPredicateNode
 	instanceVariableNames:''
 	classVariableNames:''
@@ -30,10 +32,6 @@
 	compiler dedent.
 !
 
-firstCharParser
-	^ (PPPredicateObjectParser on: predicate message: 'predicate not expected') not.
-!
-
 firstCharSet
 	^ firstCharSet := PPCharSetPredicate on: [:e | (predicate value:e)  not ]