使Java类在Clojure中作为序列工作

Question

我使用的Java类代表一系列结果（有点像Clojure向量）。

我想将这个类与典型的Clojure序列函数一起使用（即我希望该类的行为就像它支持序列抽象一样）但是我无法更改类，所以我无法使它实现clojure.lang.Seqable或类似的。 另外，令人讨厌的是，该类没有实现java.util.Collection或java.lang.Iterable 。

我可以看到几个选项：

• 在对象的（现有）迭代器上使用iterator-seq 。
• 将对象包装在另一个实现java.util.Collection / clojure.lang.Sequable类java.util.Collection
• 创建一个通过查询Object来构建Clojure向量或序列的函数

还有其他选择吗？ 什么是最好的方法？

Answer 1

最快和最直接的方法是使用iterator-seq 。

这确实最难解决的问题：为什么没有核心的Clojure提供的协议一样SeqSource将由调用seq 。 然后可以“扩展”非标准集合以提供seq，类似于InternalReduce如何用于reduce 。

Answer 2

使用proxy来扩展类并使其实现ISeq

Answer 3

我的第一个镜头是创建该对象的lazy-seq：

(defn sequify [obj]
  (letfn [(inner [idx] 
                 (when (< idx (.size obj))
                          (cons (.get obj idx)
                                (lazy-seq 
                                  (inner (inc idx))))))]
    (inner 0)))

只需用适当的方法替换.size和.get 。

如果您想要与lazy-seq解决方案相比提高性能，编写包装器可能更合适。