1
0
mirror of https://github.com/janet-lang/janet synced 2024-11-24 17:27:18 +00:00

Don't fail testing when ev disabled.

This commit is contained in:
Calvin Rose 2021-02-20 10:56:54 -06:00
parent c68264802a
commit a5f237993d

View File

@ -147,17 +147,18 @@
(assert (= 0 (os/execute [(dyn :executable) "-e" "(+ 1 2 3)"] :pe {"HELLO" "WORLD"})) "os/execute with env") (assert (= 0 (os/execute [(dyn :executable) "-e" "(+ 1 2 3)"] :pe {"HELLO" "WORLD"})) "os/execute with env")
# Regression #638 # Regression #638
(assert (compwhen
(= [true :caught] (dyn 'ev/go)
(protect (assert
(try (= [true :caught]
(do (protect
(ev/sleep 0) (try
(with-dyns [] (do
(ev/sleep 0) (ev/sleep 0)
(error "oops"))) (with-dyns []
([err] :caught)))) (ev/sleep 0)
"regression #638") (error "oops")))
([err] :caught))))
"regression #638"))
(end-suite) (end-suite)