--- a/UnaryNode.st	Tue Oct 01 21:55:56 2013 +0200
+++ b/UnaryNode.st	Sun Oct 20 01:05:27 2013 +0200
@@ -204,6 +204,17 @@
     "Modified: / 05-03-2007 / 15:11:26 / cg"
 ! !
 
+!UnaryNode methodsFor:'accessing'!
+
+selectorPartPositions
+    selectorPartPositions isNil ifTrue:[
+        selectorPartPositions := Array with: (selectorPosition to: selectorPosition + selector size - 1).
+    ].
+    ^ selectorPartPositions
+
+    "Created: / 19-10-2013 / 23:48:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !UnaryNode methodsFor:'checks'!
 
 plausibilityCheckIn:aParser
@@ -370,10 +381,10 @@
 !UnaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.59 2013-08-31 11:30:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.60 2013-10-19 23:05:27 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.59 2013-08-31 11:30:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.60 2013-10-19 23:05:27 vrany Exp $'
 ! !