… | |
… | |
20 | for test in 01 02 03 04 05 07 09; do |
20 | for test in 01 02 03 04 05 07 09; do |
21 | set -- t/"$test"_*.t |
21 | set -- t/"$test"_*.t |
22 | t=${1#t/} |
22 | t=${1#t/} |
23 | <t/"$t" \ |
23 | <t/"$t" \ |
24 | sed -e "s/.*require AnyEvent::Impl::Perl.*/\\ |
24 | sed -e "s/.*require AnyEvent::Impl::Perl.*/\\ |
|
|
25 | BEGIN { $^W = 0 }\\ |
25 | BEGIN { \$ENV{PERL_ANYEVENT_LOOP_TESTS} or ((print qq{1..0 # SKIP PERL_ANYEVENT_LOOP_TESTS not true\\\\n}), exit 0) }\\ |
26 | BEGIN { \$ENV{PERL_ANYEVENT_LOOP_TESTS} or ((print qq{1..0 # SKIP PERL_ANYEVENT_LOOP_TESTS not true\\\\n}), exit 0) }\\ |
26 | BEGIN { eval q{use $module;1} or ((print qq{1..0 # SKIP $module not loadable\\\\n}), exit 0) }\\ |
27 | BEGIN { eval q{use $module;1} or ((print qq{1..0 # SKIP $module not loadable\\\\n}), exit 0) }\\ |
27 | $extra\\ |
28 | $extra\\ |
28 | /" \ |
29 | /" \ |
29 | >t/"$base"_$t |
30 | >t/"$base"_$t |
30 | done |
31 | done |
31 | done |
32 | done |
32 | |
33 | |
33 | rm -f t/63_eventlib_02_signals.t |
34 | if false; then |
34 | rm -f t/63_eventlib_03_child.t |
35 | ( |
35 | rm -f t/63_eventlib_07_io.t |
|
|
36 | rm -f t/63_eventlib_09_multi.t |
|
|
37 | |
|
|
38 | ( |
|
|
39 | grep -v ^t/6._ MANIFEST |
36 | grep -v ^t/6._ MANIFEST |
40 | for t in t/6?_*; do |
37 | for t in t/6?_*; do |
41 | echo $t |
38 | echo $t |
42 | done |
39 | done |
43 | ) >MANIFEST~ && mv MANIFEST~ MANIFEST |
40 | ) >MANIFEST~ && mv MANIFEST~ MANIFEST |
|
|
41 | fi |