--- a/PrimaryNode.st	Tue Dec 15 15:17:25 2009 +0100
+++ b/PrimaryNode.st	Mon Jan 18 17:01:14 2010 +0100
@@ -84,6 +84,14 @@
 
 !PrimaryNode methodsFor:'queries'!
 
+precedence
+    ^ 200
+
+    "Created: / 20-04-2005 / 14:12:04 / cg"
+! !
+
+!PrimaryNode methodsFor:'testing'!
+
 isArgument
     ^ false
 !
@@ -112,16 +120,14 @@
 
 isUndeclared
     ^ false
-!
-
-precedence
-    ^ 200
-
-    "Created: / 20-04-2005 / 14:12:04 / cg"
 ! !
 
 !PrimaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.28 2008-11-11 14:20:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.29 2010-01-18 16:01:14 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libcomp/PrimaryNode.st,v 1.29 2010-01-18 16:01:14 cg Exp $'
 ! !