Save and Load Program State
John Gabriele
2014-02
From Brandon Bloom’s blog post:
(def db (atom {...}))
(defn save-data []
(spit "program-state.txt" (prn-str @db)))
(defn load-data []
(reset! db (read-string (slurp "program-state.txt"))))From Brandon Bloom’s blog post:
(def db (atom {...}))
(defn save-data []
(spit "program-state.txt" (prn-str @db)))
(defn load-data []
(reset! db (read-string (slurp "program-state.txt"))))