add equivalence tests
This commit is contained in:
parent
fd0f22fda5
commit
bbd01dc4a9
1 changed files with 4 additions and 1 deletions
|
|
@ -62,6 +62,9 @@
|
|||
{:a [5 6] :b [10 11] :c [15 16]} #(merge-with vector % {:a 6 :b 11 :c 16})
|
||||
{:a [5 6] :b [10 11] :c [15 16]} #(merge-with vector % (TestType. 6 11 16))
|
||||
[:a 5] #(find % :a)
|
||||
nil #(find % :d)))
|
||||
nil #(find % :d)
|
||||
{:a 5 :b 10 :c 15} identity
|
||||
(TestType. 5 10 15) identity
|
||||
(TestType. 5 10 15) (fn [s] {:a 5 :b 10 :c 15})))
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue