说我有:
(def c [{:id 12 :name "John"}])
如何在文件中写这个?
如何取回此数据结构?
答案 0 :(得分:1)
查看文档中read的代码,尤其是底部的代码。 这里有一个完整的例子,说明了你的目标。
答案 1 :(得分:1)
一个不完美的解决方案:
(require '[clojure.java.io :as io]
'[cognitect.transit :as t])
(def c [{:id 12 :name "John"}])
(def dir "resources/json/")
(defn write-transit [dir file-name file-type coll]
(let [suffix {:json ".json" :json-verbose ".verbose.json" :msgpack ".mp"}]
(with-open [out (io/output-stream
(str dir "/" file-name (file-type suffix)))]
(t/write (t/writer out file-type) coll)))))
(defn read-transit [dir file-name file-type]
(let [suffix {:json ".json" :json-verbose ".verbose.json" :msgpack ".mp"}]
(with-open [in (io/input-stream (str dir "/" file-name (file-type suffix)))]
(t/read (t/reader in file-type)))))
(write-transit dir "test" :json c)
;=> nil
(read-transit dir "test" :json)
;=> [{:id 12 :name "John"}]