File Coverage

/tmp/zuIHh3rxhO
Criterion Covered Total %
statement 6 7 85.7
branch 3 4 75.0
condition n/a
subroutine 2 2 100.0
pod n/a
total 11 13 84.6


line stmt bran cond sub pod time code
1             package My::Deparse;
2 2     2   3516096 use Mite::Shim;
  2         12  
  2         38  
3             extends 'B::Deparse';
4             sub FOREIGNBUILDARGS {
5 2     2   4 my $class = shift;
6 2 50       12 my %args = ( @_ == 1 ) ? %{$_[0]} : @_;
  0         0  
7 2 100       881 $args{use_dumper} ? ( '-d' ) : ();
8             }
9              
10             1;