將已排序的地圖保存到Clojure的文件中

Question

我通過spit將嵌套的數據映射保存到磁盤。我希望我的地圖中的一些地圖可以排序，並且當我將地圖重新​​放入我的程序時保持排序。排序後的地圖沒有唯一的文字表示形式，因此當我將spit地圖映射到磁盤上時，排序後的地圖和未排序的地圖表示相同，並且數據會使每個地圖成爲通常的未排序類型。這裏有一個例子玩具能說明問題：

(def sorted-thing (sorted-map :c 3 :e 5 :a 1)) 
;= #'user/sorted-thing 
(spit "disk" sorted-thing) 
;= nil 
(def read-thing (read-string (slurp "disk"))) 
;= #'user/read-thing 

(assoc sorted-thing :b 2) 
;= {:a 1, :b 2, :c 3, :e 5} 
(assoc read-thing :b 2) 
;= {:b 2, :a 1, :c 3, :e 5} 

是否有某種方式來讀取作爲排序的地圖擺在首位，而不是看完後把它們轉換成排序的地圖？或者這是一個跡象表明我應該使用某種真實的數據庫？

Answer 1

的*print-dup*動態rebindable無功的目的是支持這種使用情況：

(binding [*print-dup* true] 
    (prn (sorted-map :foo 1))) 
; #=(clojure.lang.PersistentTreeMap/create {:foo 1}) 

註釋掉行是什麼變打印。

恰巧當應用於Clojure的數據結構，因此也spit，這也影響str，所以如果你做

(binding [*print-dup* true] 
    (spit "foo.txt" (sorted-map :foo 1))) 

寫入foo.txt地圖表示將上面顯示的一個。

無可否認，我並不是100％確定這是否記錄在某個地方;如果你感到不安這一點，你總是可以spit使用pr-str與*print-dup*勢必true結果：

(binding [*print-dup* true] 
    (pr-str (sorted-map :foo 1))) 
;= "#=(clojure.lang.PersistentTreeMap/create {:foo 1})" 

（此時間的最後一行是返回，而不是打印輸出的值。）

顯然您必須將*read-eval*綁定到true才能夠回讀這些文字。這很好，但它的目的正是爲了服務（從可信來源讀取代碼）。

Answer 2

我不認爲它一定是你應該使用數據庫的標誌，但我認爲它是一個標誌，你不應該使用spit。將有序映射寫入磁盤時，請勿使用映射文字語法。如果你寫出來的格式如下，讀字符串將工作：

(def sorted-thing (eval (read-string "(sorted-map :c 3 :e 5 :a 1)"))) 
(assoc sorted-thing :b 2) 
;= {:a 1, :b 2, :c 3, :e 5}