#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Fri, 25 Nov 2016 20:18:05 +0100
changeset 4057 af2ccd5e7eca
parent 4054 93b38c1d51ef
child 4058 1e87dfa2ea9e
child 4062 df81ee6748b7
#UI_ENHANCEMENT by cg class: UnaryNode changed: #plausibilityCheckIn: do not complain about void selector.
UnaryNode.st
--- a/UnaryNode.st	Wed Nov 23 16:56:51 2016 +0100
+++ b/UnaryNode.st	Fri Nov 25 20:18:05 2016 +0100
@@ -248,9 +248,11 @@
         ].
 
         (Smalltalk includesKey:selectorSymbol) ifTrue:[
-            (aParser alreadyWarnedUnimplementedSelectors includes:selectorSymbol) ifFalse:[
-                aParser alreadyWarnedUnimplementedSelectors add:selectorSymbol.
-                ^ 'funny selector: ',selectorSymbol allBold,' (known as global); possible missing ''.'' or keyword-colon.'
+            ( #( void ) includes:selectorSymbol) ifFalse:[
+                (aParser alreadyWarnedUnimplementedSelectors includes:selectorSymbol) ifFalse:[
+                    aParser alreadyWarnedUnimplementedSelectors add:selectorSymbol.
+                    ^ 'funny selector: ',selectorSymbol allBold,' (known as global); possible missing ''.'' or keyword-colon.'
+                ].
             ].
         ].
     ].