--- a/VariableNode.st	Fri Apr 19 11:40:10 2013 +0200
+++ b/VariableNode.st	Mon Apr 22 12:31:28 2013 +0200
@@ -110,6 +110,7 @@
     "Modified: 2.7.1997 / 10:55:48 / cg"
 ! !
 
+
 !VariableNode methodsFor:'accessing'!
 
 block
@@ -1054,6 +1055,10 @@
 
 !VariableNode methodsFor:'testing'!
 
+isInstance 
+    ^ (type == #InstanceVariable)
+!
+
 isJavaPackageReference
     "Return true, given node is JAVA package reference in form:
         JAVA package1 package2 
@@ -1078,9 +1083,10 @@
 !VariableNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.86 2012-10-24 18:46:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.87 2013-04-22 10:31:28 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.86 2012-10-24 18:46:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.87 2013-04-22 10:31:28 cg Exp $'
 ! !
+