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

wip

Browse source
This commit is contained in:
Michiel Borkent 2020-01-08 22:38:03 +01:00
parent 56880b3093
commit 6952ab16a3
2 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
deps.edn
View file

@ -7,6 +7,7 @@
org.clojure/core.async {:mvn/version "0.4.500"}, org.clojure/core.async {:mvn/version "0.4.500"},
org.clojure/tools.cli {:mvn/version "0.4.2"}, org.clojure/tools.cli {:mvn/version "0.4.2"},
org.clojure/data.csv {:mvn/version "0.1.4"}, org.clojure/data.csv {:mvn/version "0.1.4"},
org.clojure/data.xml {:mvn/version "0.2.0-alpha6"},
cheshire {:mvn/version "5.9.0"}} cheshire {:mvn/version "5.9.0"}}
:aliases {:main :aliases {:main
{:main-opts ["-m" "babashka.main"]}}} {:main-opts ["-m" "babashka.main"]}}}

5
test/babashka/main_test.clj
View file

@ -330,12 +330,15 @@
(is (true? (bb nil "(nil? *command-line-args*)"))) (is (true? (bb nil "(nil? *command-line-args*)")))
(is (= ["1" "2" "3"] (bb nil "*command-line-args*" "1" "2" "3")))) (is (= ["1" "2" "3"] (bb nil "*command-line-args*" "1" "2" "3"))))
(deftest need-constructors-test (deftest constructors-test
(testing "the clojure.lang.Delay constructor works" (testing "the clojure.lang.Delay constructor works"
(is (= 1 (bb nil "@(delay 1)")))) (is (= 1 (bb nil "@(delay 1)"))))
(testing "the clojure.lang.MapEntry constructor works" (testing "the clojure.lang.MapEntry constructor works"
(is (true? (bb nil "(= (first {1 2}) (clojure.lang.MapEntry. 1 2))"))))) (is (true? (bb nil "(= (first {1 2}) (clojure.lang.MapEntry. 1 2))")))))
(deftest clojure-data-xml-test
#_(is (= )))
;;;; Scratch ;;;; Scratch
(comment (comment