status-im
/
reagent
mirror of https://github.com/status-im/reagent.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Mix calling style a bit in tests

This commit is contained in:
Dan Holmsand 2015-09-14 13:34:54 +02:00
parent 995e110946
commit d362e0a26c
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
test/reagenttest/testmonitor.cljs
View File

@ -137,15 +137,13 @@
(let [a (rv/atom 0) (let [a (rv/atom 0)
f (fn [x] (+ x @a)) f (fn [x] (+ x @a))
b (monitor f 1) b (monitor f 1)
c (monitor f -1) d (run! [@b @(monitor f -1)])]
d (run! [@b @c])]
(is (= @d [1 -1])) (is (= @d [1 -1]))
(dispose d)) (dispose d))
(let [a (rv/atom 0) (let [a (rv/atom 0)
f (fn [x] (+ x @a)) f (fn [x] (+ x @a))
b (monitor f 1)
c (monitor f -1) c (monitor f -1)
d (run! [@b @c]) d (run! [@(monitor f 1) @c])
res (rv/atom 0)] res (rv/atom 0)]
(is (= @d [1 -1])) (is (= @d [1 -1]))
(let [e (run! (reset! res @d))] (let [e (run! (reset! res @d))]