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

exec tests

Browse source
This commit is contained in:
Michiel Borkent 2022-09-23 21:26:28 +02:00
parent 7b563dd802
commit 42ebb92c5d
2 changed files with 23 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
test-resources/babashka/exec_test.clj Normal file
View file

@ -0,0 +1,7 @@
(ns babashka.exec-test
{:org.babashka/cli {:coerce {:foo []}}})
(defn exec-test
{:org.babashka/cli {:coerce {:bar :keyword}}}
[m]
(prn m))

18
test/babashka/exec_test.clj
View file

@ -15,8 +15,22 @@
(edn/read-string (edn/read-string
(bb "-x" "cheshire.core/generate-string" "--foo" "1")) true)))) (bb "-x" "cheshire.core/generate-string" "--foo" "1")) true))))
(deftest tag-test (deftest tasks-exec-test
(u/with-config (u/with-config
"{:deps {} "{:deps {}
:tasks {foo (exec 'clojure.core/prn)}}" :tasks {foo (exec 'clojure.core/prn)}}"
(is (= {:dude 1} (edn/read-string (bb "run" "foo" "--dude" "1")))))) (is (= {:dude 1} (edn/read-string (bb "run" "foo" "--dude" "1")))))
(u/with-config
"{:deps {}
:tasks {foo (exec 'clojure.core/prn)}}"
(is (= {:dude 1} (edn/read-string (bb "run" "foo" "--dude" "1")))))
(u/with-config
"{:deps {}
:tasks {foo {:org.babashka/cli {:coerce {:dude []}}
:task (exec 'clojure.core/prn)}}}"
(is (= {:dude [1]} (edn/read-string (bb "run" "foo" "--dude" "1")))))
(u/with-config
"{:deps {}
:tasks {foo {:task (exec 'babashka.exec-test/exec-test)}}}"
(is (= {:foo [1], :bar :yeah}
(edn/read-string (bb "-cp" "test-resources" "run" "foo" "--foo" "1" "--bar" "yeah"))))))