--- a/compiler/PPCAbstractPredicateNode.st	Fri Jul 31 14:07:31 2015 +0100
+++ b/compiler/PPCAbstractPredicateNode.st	Mon Aug 17 12:56:02 2015 +0100
@@ -9,8 +9,13 @@
 	category:'PetitCompiler-Nodes'
 !
 
+
 !PPCAbstractPredicateNode methodsFor:'accessing'!
 
+defaultName
+    ^ #predicate
+!
+
 predicate
     
     ^ predicate
@@ -19,10 +24,6 @@
 predicate: anObject
     
     predicate := anObject
-!
-
-prefix
-    ^ #predicate
 ! !
 
 !PPCAbstractPredicateNode methodsFor:'analysis'!
@@ -65,3 +66,10 @@
     ^ (classification asOrderedCollection addLast: false; yourself) asArray
 ! !
 
+!PPCAbstractPredicateNode class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+