--- a/UnaryNode.st	Wed Jan 12 21:20:41 1994 +0100
+++ b/UnaryNode.st	Sun Jan 16 04:51:45 1994 +0100
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
 
-$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.4 1994-01-09 21:30:25 claus Exp $
+$Header: /cvs/stx/stx/libcomp/UnaryNode.st,v 1.5 1994-01-16 03:51:45 claus Exp $
 '!
 
 !UnaryNode class methodsFor:'instance creation'!
@@ -126,6 +126,9 @@
 evaluate
     "evaluate the expression represented by the receiver"
 
+    receiver isSuper ifTrue:[
+        ^ super evaluate
+    ].
     ^ (receiver evaluate) perform:selector
 ! !