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

add windows selector to a couple of tests (#235) (#888)

Browse source
This commit is contained in:
Bob 2021-06-16 10:40:02 -04:00 committed by GitHub
parent 90ac55d588
commit 63619fd66b
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
test/babashka/main_test.clj
View file

@ -52,17 +52,17 @@
(is (= '("-e" "1") (bb nil "-e" "*command-line-args*" "--" "-e" "1"))) (is (= '("-e" "1") (bb nil "-e" "*command-line-args*" "--" "-e" "1")))
(let [v (bb nil "--describe")] (let [v (bb nil "--describe")]
(is (:babashka/version v)) (is (:babashka/version v))
(is (:feature/xml v))) (is (:feature/xml v))))
)
(deftest version-test
(deftest ^:windows version-test
(is (= [1 0 0] (main/parse-version "1.0.0-SNAPSHOT"))) (is (= [1 0 0] (main/parse-version "1.0.0-SNAPSHOT")))
(is (main/satisfies-min-version? "0.1.0")) (is (main/satisfies-min-version? "0.1.0"))
(is (main/satisfies-min-version? "0.1.0-SNAPSHOT")) (is (main/satisfies-min-version? "0.1.0-SNAPSHOT"))
(is (not (main/satisfies-min-version? "300.0.0"))) (is (not (main/satisfies-min-version? "300.0.0")))
(is (not (main/satisfies-min-version? "300.0.0-SNAPSHOT")))) (is (not (main/satisfies-min-version? "300.0.0-SNAPSHOT"))))
(deftest print-error-test (deftest ^:windows print-error-test
(is (thrown-with-msg? Exception #"java.lang.NullPointerException" (is (thrown-with-msg? Exception #"java.lang.NullPointerException"
(bb nil "(subs nil 0 0)")))) (bb nil "(subs nil 0 0)"))))
@ -131,7 +131,7 @@
(doseq [s res] (doseq [s res]
(is (not-empty s))))) (is (not-empty s)))))
(deftest malformed-command-line-args-test (deftest ^:windows malformed-command-line-args-test
(is (thrown-with-msg? Exception #"File does not exist: non-existing" (is (thrown-with-msg? Exception #"File does not exist: non-existing"
(bb nil "-f" "non-existing")))) (bb nil "-f" "non-existing"))))