luciano/specter
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Switch from atom to mutable-cell

Browse source
This commit is contained in:
Alex Engelberg 2016-04-19 11:55:32 -07:00
parent fbacd49817
commit 4c8aeebafc
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/clj/com/rpl/specter.cljx
View file

@ -266,10 +266,10 @@
(transform* [this structure next-fn] (transform* [this structure next-fn]
(let [select-result (compiled-select late structure) (let [select-result (compiled-select late structure)
transformed (next-fn select-result) transformed (next-fn select-result)
values-to-insert (atom transformed)] values-to-insert (i/mutable-cell transformed)]
(compiled-transform late (compiled-transform late
(fn [_] (let [next-val (first @values-to-insert)] (fn [_] (let [next-val (first (i/get-cell values-to-insert))]
(swap! values-to-insert rest) (i/update-cell! values-to-insert rest)
next-val)) next-val))
structure))))) structure)))))