File Coverage

lib/Context/Singleton/Frame/Builder/Array.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition 2 2 100.0
subroutine 5 5 100.0
pod 0 1 0.0
total 22 23 95.6


line stmt bran cond sub pod time code
1              
2 4     4   716 use strict;
  4         9  
  4         120  
3 4     4   22 use warnings;
  4         8  
  4         221  
4              
5             package Context::Singleton::Frame::Builder::Array;
6              
7             our $VERSION = v1.0.4;
8              
9 4     4   31 use parent qw[ Context::Singleton::Frame::Builder::Base ];
  4         11  
  4         39  
10              
11             sub _build_required {
12 248     248   489 my ($self) = @_;
13              
14             return (
15             $self->SUPER::_build_required,
16 248   100     604 @{ $self->dep // [] },
  248         652  
17             );
18             }
19              
20             sub build_callback_args {
21 18     18 0 15115 my ($self, $resolved) = @_;
22              
23             return (
24             $self->SUPER::build_callback_args ($resolved),
25 18         75 @$resolved{@{ $self->dep }},
  18         62  
26             );
27             }
28              
29             1;
30