clojure gen-class varargs构造函数

Hen*_*gon 8 clojure java-interop gen-class clojure-java-interop

在:constructors map和后续-init定义中,我如何表示一个varargs构造函数(假设超类有多个构造函数,其中一个是varargs)?

spa*_*iev 2

由于可变参数本质上是对象数组的语法糖,因此您可以只使用“[Ljava.lang.Object;” 作为构造函数参数的类型。

这是一些示例代码:

(ns t.vtest
  (:gen-class
   :implements   [clojure.lang.IDeref]
   :init init
   :state state
   :constructors {["[Ljava.lang.Object;"] []}))
   ;;                                      ^-----------------------
   ;; You should put "[Ljava.lang.Object;" for superclass varargs constructor here
   ;; I left it blank for the sake of working example 

(defn -init
  [args]
  (println "first element of args" (aget args 0) "total elements" (alength args))
  [[] (into [] args)])

(defn -deref
  [this]
  (.state this))
Run Code Online (Sandbox Code Playgroud)

这就是 REPL 中的样子

user=> @(t.vtest. (into-array Object ["A" "B" 1 2]))
first element of args A total elements 4
["A" "B" 1 2]
Run Code Online (Sandbox Code Playgroud)