UnaryNd.st
changeset 3 b63b8a6b71fb
parent 0 7ad01559b262
child 4 f6fd83437415
--- a/UnaryNd.st	Wed Oct 13 01:25:45 1993 +0100
+++ b/UnaryNd.st	Wed Oct 13 01:26:26 1993 +0100
@@ -22,7 +22,7 @@
 COPYRIGHT (c) 1989-93 by Claus Gittinger
               All Rights Reserved
 
-%W% %E%
+$Header: /cvs/stx/stx/libcomp/Attic/UnaryNd.st,v 1.2 1993-10-13 00:26:20 claus Exp $
 '!
 
 !UnaryNode class methodsFor:'instance creation'!
@@ -100,8 +100,6 @@
 !UnaryNode methodsFor:'checks'!
 
 plausibilityCheck
-    |rec arg operand|
-
     "check for funny selector - careful to do string compare instead
      of symbol identity compare: I dont want to introduce these as symbols
      into the system (would make the '... is nowhere implemented' warning
@@ -112,6 +110,7 @@
      (Smalltalk includesKey:selector)]]) ifTrue:[
         ^ 'funny selector; possible missing ''.'' or keyword'
     ].
+    "more to come ..."
     ^ nil
 ! !