1use warnings;
2
3BEGIN {
4 chdir 't' if -d 't';
5 push @INC ,'../lib';
6 require Config; import Config;
7 unless ($Config{'useithreads'}) {
8 print "1..0 # Skip: no ithreads\n";
9 exit 0;
10 }
11}
12
13print "1..1\n";
14use threads;
15use Thread::Semaphore;
16print "ok 1\n";
17
18