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

swapping fun with values (deref vs. values)

Browse source
This commit is contained in:
anatoly 2015-12-05 23:00:13 -05:00
parent 3d95aa9fc6
commit 2697494268
1 changed files with 14 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
test/check/fun_with_values_test.clj
View file

@ -43,19 +43,6 @@
(use-fixtures :each with-fun-and-values)
(deftest fun-with-values
(is (= @scalar 42))
(is (= (@fun) 42))
(is (= @with-fun 42))
(is (= (@with-partial 1) 42))
(is (= (@f-in-f 1) 42))
(is (= @f-no-args-value 42))
(is (= (@f-no-args) 42))
(is (= (@f-args 41 1) 42))
(is (= (@private-f 1) 42))
(is (= @f-value 42)))
(deftest deref-fun-with-values
(mount/in-cljc-mode)
(is (= scalar 42))
(is (= (fun) 42))
(is (= with-fun 42))
@ -65,5 +52,18 @@
(is (= (f-no-args) 42))
(is (= (f-args 41 1) 42))
(is (= (private-f 1) 42))
(is (= f-value 42))
(is (= f-value 42)))
(deftest deref-fun-with-values
(mount/in-cljc-mode)
(is (= @scalar 42))
(is (= (@fun) 42))
(is (= @with-fun 42))
(is (= (@with-partial 1) 42))
(is (= (@f-in-f 1) 42))
(is (= @f-no-args-value 42))
(is (= (@f-no-args) 42))
(is (= (@f-args 41 1) 42))
(is (= (@private-f 1) 42))
(is (= @f-value 42))
(mount/in-clj-mode))