add test for atom and wrapper variadic swap!

This commit is contained in:
Stephen Caraher 2015-07-23 22:54:46 +10:00
parent ae06dc21ae
commit 1363e05e62
1 changed files with 2 additions and 0 deletions

View File

@ -105,6 +105,8 @@
(is (= (swap! a update-in [:k] inc)
(swap! b update-in [:k] inc)))
(is (= @a @b {:k 2}))
(is (= (swap! a assoc :k 3 :l 4 :m 7 :n 8 :o)
(swap! b assoc :k 3 :l 4 :m 7 :n 8 :o)))
(is (= (reset! a 23)
(reset! b 23)))
(is (= @a @b))