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

Add test

Browse source
This commit is contained in:
Michiel Borkent 2020-01-08 22:42:58 +01:00
parent 6952ab16a3
commit 4a833e3c76
2 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/babashka/main.clj
View file

@ -217,7 +217,8 @@ Everything after that is bound to *command-line-args*."))
io clojure.java.io io clojure.java.io
async clojure.core.async async clojure.core.async
csv clojure.data.csv csv clojure.data.csv
json cheshire.core}) json cheshire.core
xml clojure.data.xml})
(def namespaces (def namespaces
{'clojure.tools.cli tools-cli-namespace {'clojure.tools.cli tools-cli-namespace

3
test/babashka/main_test.clj
View file

@ -337,7 +337,8 @@
(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 (deftest clojure-data-xml-test
#_(is (= ))) (is (= "<?xml version=\"1.0\" encoding=\"UTF-8\"?><items><item>1</item><item>2</item></items>"
(bb nil "(let [xml (xml/parse-str \"<items><item>1</item><item>2</item></items>\")] (xml/emit-str xml))"))))
;;;; Scratch ;;;; Scratch