Allow for test volatility

SteveGilham · Oct 21, 2023 · 8d37d85 · 8d37d85
1 parent fcd469e
commit 8d37d85
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/AltCover.Monitor.Tests/MonitorTest.fs b/AltCover.Monitor.Tests/MonitorTest.fs
@@ -82,4 +82,11 @@ module MonitorTests =
     let result = (code, branch)
     let t2 = sprintf "%A" result
 
-    test' <@ List.exists (fun x -> x = result) expect @> (t2 + text)
+    test'
+      <@
+        code > 115
+        && code < 261
+        && branch > 24
+        && branch < 38
+      @>
+      (text + Environment.NewLine + t2)