评论者:mruza
我已经根据说明添加了测试并更新了补丁。
以下是涉及到的逻辑。以下是 src/jvm/clojure/lang/Compiler.java 文件的摘录
1462: if(target.hasJavaClass() && target.getJavaClass() != null) 1463: { 1464: List methods = Reflector.getMethods(target.getJavaClass(), args.count(), methodName, false); 1465: if(methods.isEmpty()) 1466: { 1467: method = null; 1468: if(RT.booleanCast(RT.WARN_ON_REFLECTION.deref())) 1469: { 1470: RT.errPrintWriter() 1471: .format("Reflection warning, %s:%d:%d - call to method %s on %s can't be resolved (no such method).\n", 1472: SOURCE_PATH.deref(), line, column, methodName, target.getJavaClass().getName()); 1473: } 1474: } 1475: else 1476: { 1477: int methodidx = 0; 1478: if(methods.size() > 1) 1479: { 1480: ArrayList<Class[]> params = new ArrayList(); 1481: ArrayList<Class> rets = new ArrayList(); 1482: for(int i = 0; i < methods.size(); i++) 1483: { 1484: java.lang.reflect.Method m = (java.lang.reflect.Method) methods.get(i); 1485: params.add(m.getParameterTypes()); 1486: rets.add(m.getReturnType()); 1487: } 1488: methodidx = getMatchingParams(methodName, params, args, rets); 1489: } 1490: java.lang.reflect.Method m = 1491: (java.lang.reflect.Method) (methodidx >= 0 ? methods.get(methodidx) : null); 1492: if(m != null && !Modifier.isPublic(m.getDeclaringClass().getModifiers())) 1493: { 1494: //public method of non-public class, try to find a public descendant 1495: if((type=Reflector.getDeepestPublicDescendant(m.getDeclaringClass(), target.getJavaClass())) == null) 1496: //if descendant not found, try to find an ancestor 1497: m = Reflector.getAsMethodOfPublicBase(m.getDeclaringClass(), m); 1498: } 1499: method = m; 1500: if(method == null && RT.booleanCast(RT.WARN_ON_REFLECTION.deref())) 1501: { 1502: RT.errPrintWriter() 1503: .format("Reflection warning, %s:%d:%d - call to method %s on %s can't be resolved (argument types: %s).\n", 1504: SOURCE_PATH.deref(), line, column, methodName, target.getJavaClass().getName(), getTypeStringForArgs(args)); 1505: } 1506: } 1507: }
- 第1462行的条件确保目标类型/类的类型已知
- 第1464行的 {{clojure.lang.Reflector.getMethods()}} 方法返回给定名称在目标类型中定义的所有 public 方法的列表
- 然后选择最佳方法调用位于第1477-1491行
- 如果选择的方法的声明类不是 public,则尝试找到一个既是目标类型的超类又是声明所选方法的类的子类的 public 类 - 这是在 {{clojure.lang.Reflector.getDeepestPublicDescendant()}} 方法中实现的
- 如果找到了这样的类,则用它代替方法声明类来生成调用方法的字节码
- 如果没有找到这样的类,则尝试在声明所选方法的类的 public 祖先中找到兼容的方法
请注意,这种更改可能导致调用与更改之前不同的方法,正如在 {{选择非公共接口上的方法}} 测试中所示。我认为这种更改是可以接受的,因为它
产生更好的匹配(有关参数类型),调用的方法是
让 clojure 中的方法选择更像 java