File Coverage

blib/lib/Alien/geos/af.pm
Criterion Covered Total %
statement 22 27 81.4
branch 3 8 37.5
condition n/a
subroutine 6 6 100.0
pod 2 2 100.0
total 33 43 76.7


line stmt bran cond sub pod time code
1             package Alien::geos::af;
2            
3 2     2   347778 use strict;
  2         16  
  2         58  
4 2     2   10 use warnings;
  2         4  
  2         61  
5 2     2   10 use parent qw( Alien::Base );
  2         2  
  2         15  
6            
7             our $VERSION = '1.009';
8            
9             # make sure we find geos and geos_c
10             sub dynamic_libs {
11 1     1 1 573 my ($class) = @_;
12            
13 2     2   11829 use FFI::CheckLib 0.23 ();
  2         5668  
  2         359  
14            
15 1 50       4 if ($class->install_type('system')) {
16 0         0 my @libs;
17 0         0 push @libs, FFI::CheckLib::find_lib(
18             lib => 'geos',
19             );
20 0         0 push @libs, FFI::CheckLib::find_lib(
21             lib => 'geos_c',
22             );
23 0 0       0 return wantarray ? @libs : $libs[0];
24             }
25             else {
26 1         21 my $dir = $class->dist_dir;
27            
28 1         217 my $dynamic = Path::Tiny->new($class->dist_dir, 'dynamic');
29 1 50       261 if (-d $dynamic) {
30 0         0 $dir = $dynamic;
31             }
32            
33 1         50 my @libs = $class->SUPER::dynamic_libs;
34            
35 1         21816 push @libs, FFI::CheckLib::find_lib(
36             lib => ['geos', 'geos_c'],
37             libpath => $dir,
38             systempath => [],
39             recursive => 1,
40             );
41             #warn "FOUND LIBS: " . join (':', @libs);
42 1 50       20980 return wantarray ? @libs : $libs[0];
43             }
44             }
45            
46             sub cflags {
47 1     1 1 2001 my ($self) = @_;
48 1         7 $self->SUPER::cflags;
49             }
50            
51             1;
52            
53             __END__