diff --git a/tests/Tests/Cases.hs b/tests/Tests/Cases.hs
index 3f13746..5af6b34 100644
--- a/tests/Tests/Cases.hs
+++ b/tests/Tests/Cases.hs
@@ -73,7 +73,7 @@ thresholdValue = do
 
   fork $ lock l >> modifyCVar_ x (return . (+1)) >> unlock l
   fork $ lock l >> modifyCVar_ x (return . (+2)) >> unlock l
-  res <- spawn $ lock l >> readCVar x >>= \x' -> unlock l >> return (x' > 3)
+  res <- spawn $ lock l >> readCVar x >>= \x' -> unlock l >> return (x' >= 3)
 
   takeCVar res