--- 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
! !