From a5f237993d48b6d4185f17f396cc8df44f728896 Mon Sep 17 00:00:00 2001
From: Calvin Rose <calsrose@gmail.com>
Date: Sat, 20 Feb 2021 10:56:54 -0600
Subject: [PATCH] Don't fail testing when ev disabled.

---
 test/suite0010.janet | 23 ++++++++++++-----------
 1 file changed, 12 insertions(+), 11 deletions(-)

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