--- a/VariableNode.st	Thu Aug 25 15:38:46 2011 +0200
+++ b/VariableNode.st	Thu Aug 25 15:38:59 2011 +0200
@@ -140,6 +140,15 @@
     "Modified: / 28-06-2011 / 22:14:40 / cg"
 !
 
+startPosition:start endPosition: end
+
+    "/self assert: (end - start + 1) = name size.
+
+    ^super startPosition:start endPosition: end
+
+    "Created: / 25-08-2011 / 11:46:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 token
     ^ token
 
@@ -1004,9 +1013,9 @@
 !VariableNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.78 2011-07-25 22:35:00 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.79 2011-08-25 13:38:59 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.78 2011-07-25 22:35:00 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/VariableNode.st,v 1.79 2011-08-25 13:38:59 vrany Exp $'
 ! !