ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/AnyEvent/t/63_eventlib_02_signals.t
(Generate patch)

Comparing AnyEvent/t/63_eventlib_02_signals.t (file contents):
Revision 1.5 by root, Tue Aug 2 22:32:59 2011 UTC vs.
Revision 1.6 by root, Wed Apr 4 02:18:30 2012 UTC

6 exit 0; 6 exit 0;
7 } 7 }
8} 8}
9 9
10use AnyEvent; 10use AnyEvent;
11
12 BEGIN { $ENV{PERL_ANYEVENT_LOOP_TESTS} or ((print qq{1..0 # SKIP PERL_ANYEVENT_LOOP_TESTS not true\n}), exit 0) }
11BEGIN { eval q{use AnyEvent::Impl::EventLib;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::EventLib not loadable}), exit 0) } 13 BEGIN { eval q{use AnyEvent::Impl::EventLib;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::EventLib not loadable\n}), exit 0) }
14
15
12 16
13$| = 1; print "1..5\n"; 17$| = 1; print "1..5\n";
14 18
15print "ok 1\n"; 19print "ok 1\n";
16 20
28 $cv->broadcast; 32 $cv->broadcast;
29}); 33});
30 34
31print "ok 2\n"; 35print "ok 2\n";
32kill 'INT', $$; 36kill 'INT', $$;
33$cv->wait; 37$cv->recv;
34undef $error; 38undef $error;
35 39
36print "ok 4\n"; 40print "ok 4\n";
37 41
38undef $sw; 42undef $sw;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines