--- a/UnaryNode.st	Fri Mar 28 15:55:59 2003 +0100
+++ b/UnaryNode.st	Fri Mar 28 16:37:31 2003 +0100
@@ -193,8 +193,6 @@
      into the system (would make the '... is nowhere implemented' warning
      go away."
 
-    selector := selector asSymbol.
-
     ((selector == #'self') or:[
      (selector == #'super') or:[
      (selector == #'thisContext') or:[
@@ -220,8 +218,6 @@
 
     |rSel notSelector|
 
-    selector := selector asSymbol.
-
     "
      optimize 
         (a == b) not -> (a ~~ b)
@@ -270,8 +266,6 @@
 evaluateIn:anEnvironment
     "evaluate the expression represented by the receiver"
 
-    selector := selector asSymbol.
-
     receiver isSuper ifTrue:[
         ^ super evaluateIn:anEnvironment
     ].
@@ -343,5 +337,5 @@
 !UnaryNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.39 2003-03-28 14:40:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.40 2003-03-28 15:37:18 cg Exp $'
 ! !