UnaryNode.st
changeset 4057 af2ccd5e7eca
parent 4038 11950ee05d24
child 4155 801ff4adeef5
equal deleted inserted replaced
4054:93b38c1d51ef 4057:af2ccd5e7eca
   246                 ^ 'funny selector: ',selectorSymbol allBold,'; possible missing ''.'' or keyword-colon.'
   246                 ^ 'funny selector: ',selectorSymbol allBold,'; possible missing ''.'' or keyword-colon.'
   247             ].
   247             ].
   248         ].
   248         ].
   249 
   249 
   250         (Smalltalk includesKey:selectorSymbol) ifTrue:[
   250         (Smalltalk includesKey:selectorSymbol) ifTrue:[
   251             (aParser alreadyWarnedUnimplementedSelectors includes:selectorSymbol) ifFalse:[
   251             ( #( void ) includes:selectorSymbol) ifFalse:[
   252                 aParser alreadyWarnedUnimplementedSelectors add:selectorSymbol.
   252                 (aParser alreadyWarnedUnimplementedSelectors includes:selectorSymbol) ifFalse:[
   253                 ^ 'funny selector: ',selectorSymbol allBold,' (known as global); possible missing ''.'' or keyword-colon.'
   253                     aParser alreadyWarnedUnimplementedSelectors add:selectorSymbol.
       
   254                     ^ 'funny selector: ',selectorSymbol allBold,' (known as global); possible missing ''.'' or keyword-colon.'
       
   255                 ].
   254             ].
   256             ].
   255         ].
   257         ].
   256     ].
   258     ].
   257 
   259 
   258     "
   260     "