--- EV/t/09_brandon.t 2008/05/08 21:21:41 1.1 +++ EV/t/09_brandon.t 2008/11/19 10:16:39 1.2 @@ -8,8 +8,8 @@ use EV; { - my $a = EV::timer 0.2, 0, sub { print "not ok 2\n"; EV::unloop }; - my $b = EV::timer 0.1, 0, sub { print "ok 2\n"; EV::unloop }; + my $a = EV::timer 1.0, 0, sub { print "not ok 2\n"; EV::unloop }; + my $b = EV::timer 0.5, 0, sub { print "ok 2\n"; EV::unloop }; print "ok 1\n"; EV::loop; @@ -17,8 +17,8 @@ } { - my $b = EV::timer 0.1, 0, sub { print "ok 5\n"; EV::unloop }; - my $a = EV::timer 0.2, 0, sub { print "not ok 5\n"; EV::unloop }; + my $b = EV::timer 0.5, 0, sub { print "ok 5\n"; EV::unloop }; + my $a = EV::timer 1.0, 0, sub { print "not ok 5\n"; EV::unloop }; print "ok 4\n"; EV::loop; @@ -26,9 +26,9 @@ } { - my $a = EV::timer 0.3, 0, sub { print "not ok 8\n"; EV::unloop }; - my $b = EV::timer 0.2, 0, sub { print "not ok 8\n"; EV::unloop }; - my $c = EV::timer 0.1, 0, sub { print "ok 8\n"; EV::unloop }; + my $a = EV::timer 1.5, 0, sub { print "not ok 8\n"; EV::unloop }; + my $b = EV::timer 1.0, 0, sub { print "not ok 8\n"; EV::unloop }; + my $c = EV::timer 0.5, 0, sub { print "ok 8\n"; EV::unloop }; print "ok 7\n"; EV::loop; @@ -36,9 +36,9 @@ } { - my $a = EV::timer 0.2, 0, sub { print "not ok 11\n"; EV::unloop }; - my $b = EV::timer 0.1, 0, sub { print "ok 11\n"; EV::unloop }; - my $c = EV::timer 0.3, 0, sub { print "not ok 11\n"; EV::unloop }; + my $a = EV::timer 1.0, 0, sub { print "not ok 11\n"; EV::unloop }; + my $b = EV::timer 0.5, 0, sub { print "ok 11\n"; EV::unloop }; + my $c = EV::timer 1.5, 0, sub { print "not ok 11\n"; EV::unloop }; print "ok 10\n"; EV::loop;