File Coverage

blib/lib/Benchmark/Featureset/ParamCheck/Implementation/TypeParams2/Specio.pm
Criterion Covered Total %
statement 37 37 100.0
branch n/a
condition n/a
subroutine 14 14 100.0
pod 0 2 0.0
total 51 53 96.2


line stmt bran cond sub pod time code
1 4     4   11362 use v5.12;
  4         14  
2 4     4   19 use strict;
  4         8  
  4         70  
3 4     4   18 use warnings;
  4         8  
  4         210  
4              
5              
6             our $AUTHORITY = 'cpan:TOBYINK';
7             our $VERSION = '0.007';
8              
9             use parent qw(Benchmark::Featureset::ParamCheck::Base);
10 4     4   18 use Ref::Util 0.203 ();
  4         8  
  4         21  
11 4     4   228 use Ref::Util::XS 0.116 ();
  4         58  
  4         71  
12 4     4   133 use Type::Params 2.000000 qw(signature);
  4         48  
  4         94  
13 4     4   19 use Specio::Declare 0.37;
  4         45  
  4         19  
14 4     4   928 use Specio::Library::Builtins 0.37;
  4         52  
  4         24  
15 4     4   661 use namespace::autoclean;
  4         66  
  4         23  
16 4     4   27722  
  4         8  
  4         29  
17             use constant long_name => 'Type::Params v2 API with Specio';
18 4     4   454 use constant short_name => 'TP2-Specio';
  4         16  
  4         244  
19 4     4   22  
  4         8  
  4         648  
20             state $check = signature named => [
21             integer => t('Int'),
22 118     118 0 389 hashes => t('ArrayRef', of => t('HashRef')),
23             object => object_can_type('Printable', methods => [qw/ print close /]),
24             ];
25             }
26              
27             state $check = signature pos => [
28             t('Int'),
29             t('ArrayRef', of => t('HashRef')),
30 107     107 0 313 object_can_type('Printable', methods => [qw/ print close /]),
31             ];
32             }
33              
34             1;