在 clojure 中将大型数据结构作为 EDN 写入磁盘

Question

在 Clojure 中将数据结构写入磁盘的最惯用方法是什么，以便我可以使用 edn/read 将其读回？按照Clojure cookbook中的建议，我尝试了以下方法：

(with-open [w (clojure.java.io/writer "data.clj")]
  (binding [*out* w]
    (pr large-data-structure)))

但是，这只会写入前 100 个项目，然后是“...”。我也尝试了(prn (doall large-data-structure))，得到了相同的结果。

我已经设法通过逐行编写(doseq [i large-data-structure] (pr i)) 来做到这一点，但是我必须在序列的开头和结尾手动添加括号才能获得所需的结果。

Answer 1

您可以通过*print-length* 控制集合中打印的项目数

考虑使用spit而不是手动打开编写器和pr-str而不是手动绑定到*out*。

(binding [*print-length* false]
  (spit "data.clj" (pr-str large-data-structure))

从评论编辑：

(with-open [w (clojure.java.io/writer "data.clj")]
  (binding [*print-length* false
            *out* w]
    (pr large-data-structure)))

注意：*print-length* 的根绑定为nil，因此您不需要在上面的示例中绑定它。我会在您最初调用 pr 时检查当前绑定。