Generate binop comparators on the fly

[perl/modules/Test-Leaner.git] / t / 80-threads.t

diff --git a/t/80-threads.t b/t/80-threads.t
index 3b0a5959b5e06229ae5b667056e4f6b89112daf0..a04d1b9ff4935bc897b22a589b923d47b98dec3d 100644 (file)
--- a/t/80-threads.t
+++ b/t/80-threads.t
@@ -39,7 +39,7 @@ sub worker {
  diag "spawned thread $tid";
  tick;
  for (1 .. 10) {
-  pass "test $_ in thread $tid";
+  cmp_ok 1, '==', '1.0', "test $_ in thread $tid";
   tick;
  }
 }