File Coverage

/tmp/ZbTBlES7r7
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 10 100.0


line stmt bran cond sub pod time code
1             use Mite::Shim;
2 3     3   7013838 has list =>
  3         20  
  3         88  
3             is => 'ro',
4             builder => sub { [ 1, 2, 3 ] };
5 4     4   16  
6             use Mite::Shim;
7             extends 'MyParent';
8 3     3   604 has '+list' =>
  3         14  
  3         27  
9             default => sub {
10             my $orig = shift->_build_list;
11             push @$orig, 4;
12             return $orig;
13             };
14              
15             1;