File Coverage

lib/Test/Chai/Core/Assertions/Empty.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 27 28 96.4


line stmt bran cond sub pod time code
1             package Test::Chai::Core::Assertions::Empty;
2 2     2   10 use strict;
  2         4  
  2         55  
3 2     2   11 use warnings;
  2         4  
  2         50  
4 2     2   12 use utf8;
  2         3  
  2         34  
5              
6 2     2   62 use Exporter qw/import/;
  2         3  
  2         120  
7             our @EXPORT_OK = qw/assert_empty/;
8              
9 2     2   11 use Test::Chai::Util::Flag qw/flag/;
  2         4  
  2         111  
10 2     2   462 use Test::Chai::Util::GenericLength qw/generic_length/;
  2         4  
  2         226  
11              
12             sub assert_empty {
13 12     12 0 17 my ($self) = @_;
14 12         30 return $self->assert(
15             generic_length(flag($self, 'object')) == 0,
16             'expected #{this} to exist',
17             'expected #{this} to not exist'
18             );
19             }
20              
21             1;