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

added a collected?/DISPENSE test case for transform path

Browse source
This commit is contained in:
Nathan Marz 2016-06-10 08:09:11 -04:00
parent 3dc7ad25ff
commit 589e6aa471
1 changed files with 13 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
test/com/rpl/specter/core_test.cljx
View file

@ -1238,5 +1238,16 @@
s/DISPENSE
]
data)
))
))
)))
(let [data {:active 3 :items [{:id 1 :val 0} {:id 3 :val 11}]}]
(is (= (transform [:items s/ALL (s/selected? :id #(= % 3)) :val] inc data)
(transform [(s/collect-one :active)
:items
s/ALL
(s/collect-one :id)
(collected? [a i] (= a i))
s/DISPENSE
:val]
inc
data)
))))