--- a/ParseNode.st	Mon Mar 05 15:08:41 2007 +0100
+++ b/ParseNode.st	Mon Mar 05 15:13:41 2007 +0100
@@ -389,6 +389,14 @@
     ^ false
 !
 
+isGlobalNamed:globalName
+    "return true, if this is a node for a particular global variable"
+
+    ^ false
+
+    "Created: / 05-03-2007 / 15:13:23 / cg"
+!
+
 isGlobalVariable
     ^ false
 !
@@ -459,5 +467,5 @@
 !ParseNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.43 2007-02-28 21:17:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.44 2007-03-05 14:13:41 cg Exp $'
 ! !