1 | BEGIN { $| = 1; print "1..16\n"; } | 1 | BEGIN { $| = 1; print "1..17\n"; } |
---|---|---|---|
2 | 2 | ||
3 | my $idx; | 3 | my $idx; |
4 | 4 | ||
5 | for my $module (qw( | 5 | for my $module (qw( |
6 | Coro::State | ||
6 | Coro | 7 | Coro |
7 | Coro::State | 8 | Coro::MakeMaker |
9 | |||
8 | Coro::Signal | 10 | Coro::Signal |
9 | Coro::Semaphore | 11 | Coro::Semaphore |
10 | Coro::SemaphoreSet | 12 | Coro::SemaphoreSet |
11 | Coro::Channel | 13 | Coro::Channel |
12 | Coro::Specific | 14 | Coro::Specific |
13 | Coro::RWLock | 15 | Coro::RWLock |
14 | Coro::MakeMaker | 16 | |
15 | Coro::Debug | 17 | Coro::AnyEvent |
18 | Coro::Timer | ||
16 | Coro::Util | 19 | Coro::Util |
20 | Coro::Select | ||
17 | Coro::Handle | 21 | Coro::Handle |
18 | Coro::Socket | 22 | Coro::Socket |
19 | Coro::Timer | 23 | |
20 | Coro::Storable | 24 | Coro::Storable |
21 | Coro::AnyEvent | 25 | Coro::Debug |
22 | )) { | 26 | )) { |
23 | eval "use $module"; | 27 | eval "use $module"; |
24 | print $@ ? "not " : "", "ok ", ++$idx, " # $module ($@)\n"; | 28 | print $@ ? "not " : "", "ok ", ++$idx, " # $module ($@)\n"; |
25 | } | 29 | } |
26 | 30 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |