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