1# please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*- 2package TestAPR::threadrwlock; 3 4use strict; 5use warnings FATAL => 'all'; 6 7use Apache::Test; 8use Apache::TestUtil; 9 10use Apache2::Const -compile => 'OK'; 11 12use TestAPRlib::threadrwlock; 13 14sub handler { 15 my $r = shift; 16 17 my $tests = TestAPRlib::threadrwlock::num_of_tests(); 18 plan $r, tests => $tests, need_threads; 19 20 TestAPRlib::threadrwlock::test(); 21 22 Apache2::Const::OK; 23} 24 251; 26