如何从 Java 调用 Clojure 可变参数函数

Question

是否可以在 Clojure 中声明一个可变参数函数，该函数可以作为 Java 中的 varargs 方法调用？

请考虑从一些正在开发的代码中提取的以下内容：

(ns com.mydomain.expression.base 
  (:gen-class
    :name com.mydomain.expression.Base
    :methods [^:static [exprFactory [String String ?????] Object]]
  )
(defn expr-factory
  ; worker function that is also called from Clojure
  [id func & args]
  (let [ex ("construction code here")]
    ex))
(defn -exprFactory
  ; interface method called from Java
  [idStr funcStr & argsArray]
  (apply expr-factory idStr funcStr (seq argsArray)))

我有什么可以代替?????允许 Java 调用 exprFactory 方法并知道它是一个 varargs 方法：

import com.mydomain.expression.Base;
...
Object e1 = Base.exprFactory("e1", "day");
Object e2 = Base.exprFactory("e2", "length", "string");
Object e3 = Base.exprFactory("e3", "*", 4, 5);
Object sum = Base.exprFactory("sum", "+", e1, e2, e3);

为了更清楚地说明这一点，我知道我使用 Object 代替?????并将exprFactory更改为：

(defn -exprFactory
  ; interface method called from Java
  [idStr funcStr argsArray]
  (apply expr-factory idStr funcStr (seq argsArray)))

..但这意味着我必须像这样编写 Java 调用：

import com.mydomain.expression.Base;
...
Object e1 = Base.exprFactory("e1", "day", new Object[0] ));
Object e2 = Base.exprFactory("e2", "length", new Object[] { "string" }));
Object e3 = Base.exprFactory("e3", "*", new Integer[] { 4, 5 }));
Object sum = Base.exprFactory("sum", "+", new Object[] { e1, e2, e3 }));

同样，我知道我可以用Java编写一个调用非可变参数exprFactory的varargs包装器方法，但如果可能的话，我想避免这种情况。

Answer 1

我建议在Java端编写你的帮助程序函数，类似于clojure.lang.AFn中的"applyToHelper"

这将采用Java函数的形式，如下所示：

   public Object invokeVariadic(IFn function, Object... args) {
     switch (args.length) {
       case 0:
         return function.invoke();
       case 1:
         return function.invoke(args[0]);
       /// 20-odd more cases
     }
   }

这有点黑客，取决于clojure.lang.IFn的内部定义，但至少你会在Java端得到相对不错的可变参数语法（即不需要做new Object[] {...}的事情）。