--- AnyEvent/t/62_cocoa_07_io.t 2010/12/31 04:47:42 1.1 +++ AnyEvent/t/62_cocoa_07_io.t 2011/08/02 20:02:46 1.3 @@ -1,6 +1,7 @@ use AnyEvent; use AnyEvent::Util; -BEGIN { eval q{use AnyEvent::Impl::Cocoa;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::Cocoa not loadable}), exit 0) } +BEGIN { eval q{use AnyEvent::Impl::Cocoa;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::Cocoa not loadable +}), exit 0) } $| = 1; print "1..18\n"; @@ -25,7 +26,7 @@ print "ok 3\n"; -{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->wait } +{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->recv } print "ok 4\n"; @@ -41,7 +42,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 10\n"; @@ -58,7 +59,7 @@ print "ok 11\n"; -{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->wait } +{ my $cv = AnyEvent->condvar; $t = AnyEvent->timer (after => 0.05, cb => sub { $cv->send }); $cv->recv } print "ok 12\n"; @@ -74,7 +75,7 @@ $cv->send; }); -$cv = AnyEvent->condvar; $cv->wait; +$cv = AnyEvent->condvar; $cv->recv; print "ok 18\n";