File Coverage

blib/lib/Benchmark/Featureset/ParamCheck/Implementation/ParamsCheck/TypeTiny.pm
Criterion Covered Total %
statement 27 27 100.0
branch n/a
condition n/a
subroutine 10 10 100.0
pod 0 1 0.0
total 37 38 97.3


line stmt bran cond sub pod time code
1 4     4   6266 use v5.12;
  4         15  
2 4     4   21 use strict;
  4         13  
  4         90  
3 4     4   19 use warnings;
  4         10  
  4         228  
4              
5              
6             our $AUTHORITY = 'cpan:TOBYINK';
7             our $VERSION = '0.006';
8              
9             use parent qw(Benchmark::Featureset::ParamCheck::Base::ParamsCheck);
10 4     4   29 use Types::Standard 1.001_009 -types;
  4         8  
  4         22  
11 4     4   259 use Type::Tiny::XS 0.012 ();
  4         57  
  4         26  
12 4     4   16680 use namespace::autoclean;
  4         58  
  4         69  
13 4     4   21  
  4         10  
  4         26  
14             use constant long_name => 'Params::Check with Type::Tiny';
15 4     4   239 use constant short_name => 'PC-TT';
  4         19  
  4         214  
16 4     4   25  
  4         11  
  4         488  
17             state $check = +{
18             integer => { required => 1, allow => Int->compiled_check },
19 48     48 0 191 hashes => { required => 1, allow => ArrayRef->of(HashRef)->compiled_check },
20             object => { required => 1, allow => HasMethods->of(qw/ print close /)->compiled_check },
21             };
22             }
23              
24             1;