这段 Clojure 代码有什么作用？

Question

(ns utils
   (:gen-class :name Utils
               :methods [#^{:static true} [sum [java.util.Collection] long]]))

(defn sum [coll] (reduce + coll))

(defn -sum [coll] (sum coll))

请解释一下这段代码！

Answer 1

由于没有使用 Clojure gen-class 工具，我的答案可能有点模糊：

这将生成必要的字节码，该字节码大约相当于以下 Java 伪代码：

class Utils {
  public static long sum(Collection coll) {
    // Here goes the necessary code to call  (sum coll)
    // through the Clojure runtime
  }
}

• -sum 指示 Clojure 生成Java 方法。
• (sum coll) 是对 sum 第一个定义的调用，它只是一个常规的 Clojure 函数定义