File Coverage

blib/lib/Test/Alien/Synthetic.pm
Criterion Covered Total %
statement 21 21 100.0
branch 10 10 100.0
condition 3 3 100.0
subroutine 10 10 100.0
pod 6 6 100.0
total 50 50 100.0


line stmt bran cond sub pod time code
1             package Test::Alien::Synthetic;
2              
3 2     2   667 use strict;
  2         16  
  2         47  
4 2     2   7 use warnings;
  2         1  
  2         50  
5 2     2   6 use Test2::API qw( context );
  2         2  
  2         412  
6              
7             # ABSTRACT: A mock alien object for testing
8             our $VERSION = '0.12'; # VERSION
9              
10              
11 8 100   8   10 sub _def ($) { my($val) = @_; defined $val ? $val : '' }
  8         20  
12              
13 4     4 1 5101 sub cflags { _def shift->{cflags} }
14 4     4 1 594 sub libs { _def shift->{libs} }
15 2 100   2 1 498 sub dynamic_libs { @{ shift->{dynamic_libs} || [] } }
  2         13  
16              
17             sub cflags_static
18             {
19 2     2 1 186 my($self) = @_;
20             defined $self->{cflags_static}
21             ? $self->{cflags_static}
22 2 100       7 : $self->cflags;
23             }
24              
25             sub libs_static
26             {
27 2     2 1 183 my($self) = @_;
28             defined $self->{libs_static}
29             ? $self->{libs_static}
30 2 100       6 : $self->libs;
31             }
32              
33             sub bin_dir
34             {
35 3     3 1 862 my $dir = shift->{bin_dir};
36 3 100 100     46 defined $dir && -d $dir ? ($dir) : ();
37             }
38              
39             1;
40              
41             __END__