line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Module::Build::Pluggable::CheckLib; |
2
|
1
|
|
|
1
|
|
25969
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
38
|
|
3
|
1
|
|
|
1
|
|
5
|
use warnings; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
26
|
|
4
|
1
|
|
|
1
|
|
1062
|
use utf8; |
|
1
|
|
|
|
|
14
|
|
|
1
|
|
|
|
|
4
|
|
5
|
1
|
|
|
1
|
|
225
|
use 5.008005; |
|
1
|
|
|
|
|
4
|
|
|
1
|
|
|
|
|
63
|
|
6
|
|
|
|
|
|
|
our $VERSION = '1.02'; |
7
|
1
|
|
|
1
|
|
1017
|
use parent qw/Module::Build::Pluggable::Base/; |
|
1
|
|
|
|
|
391
|
|
|
1
|
|
|
|
|
6
|
|
8
|
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
sub HOOK_configure { |
10
|
0
|
|
|
0
|
0
|
|
my $self = shift; |
11
|
0
|
0
|
|
|
|
|
unless ($self->builder->have_c_compiler()) { |
12
|
0
|
|
|
|
|
|
warn "This distribution requires a C compiler, but it's not available, stopped.(OS unsupported)\n"; |
13
|
0
|
|
|
|
|
|
exit 0; |
14
|
|
|
|
|
|
|
} |
15
|
|
|
|
|
|
|
|
16
|
0
|
|
|
|
|
|
$self->configure_requires('Devel::CheckLib' => '0.04'); |
17
|
0
|
|
|
|
|
|
$self->build_requires('Devel::CheckLib' => '0.04'); |
18
|
|
|
|
|
|
|
|
19
|
0
|
|
|
|
|
|
require Devel::CheckLib; |
20
|
|
|
|
|
|
|
|
21
|
0
|
|
|
|
|
|
my %opts; |
22
|
0
|
|
|
|
|
|
for my $key (qw/lib header incpath libpath header function/) { |
23
|
0
|
0
|
|
|
|
|
if (exists $self->{$key}) { |
24
|
0
|
|
|
|
|
|
$opts{$key} = $self->{$key}; |
25
|
|
|
|
|
|
|
} |
26
|
|
|
|
|
|
|
} |
27
|
0
|
|
|
|
|
|
Devel::CheckLib::check_lib_or_exit(%opts); |
28
|
|
|
|
|
|
|
} |
29
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
1; |
31
|
|
|
|
|
|
|
__END__ |