File Coverage

/tmp/G_Hxl6jwaX
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 5     5   18084021 has list =>
  5         27  
  5         165  
3             is => 'ro',
4             builder => sub { [ 1, 2, 3 ] };
5 8     8   28  
6             use Mite::Shim;
7             extends 'MyParent';
8 5     5   1071 has '+list' =>
  5         14  
  5         48  
9             default => sub {
10             my $orig = shift->_build_list;
11             push @$orig, 4;
12             return $orig;
13             };
14              
15             1;