X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FVPIT-TestHelpers.git;a=blobdiff_plain;f=t%2F50-usleep.t;fp=t%2F50-usleep.t;h=c1fc98f59149c0018bec4221a3e271c2bd11473e;hp=109f4bce915fd6061a6f635f974b1aebda5c72c1;hb=c74c9fd4e7aba647072b0e8d66b3b962491c4a79;hpb=cd89e4206b75ac471deac8c71e2655ab19c8ff75

diff --git a/t/50-usleep.t b/t/50-usleep.t
index 109f4bc..c1fc98f 100644
--- a/t/50-usleep.t
+++ b/t/50-usleep.t
@@ -26,8 +26,8 @@ for my $impl (@impls) {
   eval 'defined &main::usleep';
  };
  ok $has_usleep, "$desc was imported";
- my $ret = usleep(100);
- pass "$desc did sleep";
+ my $ret = usleep(1e6);
+ cmp_ok $ret, '>=', 1e6, "$desc did sleep";
  diag "$desc actually slept $ret microseconds";
 }