src/JavaLookup.st
branchjk_new_structure
changeset 1638 6a2600baedb7
parent 1637 6a971ebbfb81
child 1751 784651ca2ff2
equal deleted inserted replaced
1637:6a971ebbfb81 1638:6a2600baedb7
   167       package-private method will be supported correctly in all cases.
   167       package-private method will be supported correctly in all cases.
   168      "
   168      "
   169 %{
   169 %{
   170     OBJ method;
   170     OBJ method;
   171     method = __lookup(initialSearchClass, selector);
   171     method = __lookup(initialSearchClass, selector);
   172     if ( method && ilcCache ) {
   172     if ( method ) {
   173         __ilcBind(ilcCache, initialSearchClass, method, selector);
   173         if ( ilcCache ) {
       
   174             __ilcBind(ilcCache, initialSearchClass, method, selector);
       
   175         }
       
   176         RETURN (method);
   174     }
   177     }
   175     RETURN (method);
       
   176 %}.
   178 %}.
   177 
   179 
   178     sendingContext programmingLanguage isSmalltalk ifTrue:[
   180     sendingContext programmingLanguage isSmalltalk ifTrue:[
   179         aReceiver class theNonMetaclass programmingLanguage isJavaLike ifTrue:[
   181         aReceiver class theNonMetaclass programmingLanguage isJavaLike ifTrue:[
   180             ^s2j lookupMethodForSelector:selector directedTo:initialSearchClass for:aReceiver withArguments:argArrayOrNil from:sendingContext ilc: ilcCache.
   182             ^s2j lookupMethodForSelector:selector directedTo:initialSearchClass for:aReceiver withArguments:argArrayOrNil from:sendingContext ilc: ilcCache.