File Coverage

blib/lib/CBOR/Free/X/Incomplete.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package CBOR::Free::X::Incomplete;
2              
3 2     2   1508 use strict;
  2         6  
  2         74  
4 2     2   8 use warnings;
  2         5  
  2         80  
5              
6 2     2   20 use parent qw( CBOR::Free::X::Base );
  2         4  
  2         33  
7              
8             sub _new {
9 146     146   3495 my ($class, $lack) = @_;
10              
11 146         548 return $class->SUPER::_new("Expected at least $lack more byte(s).");
12             }
13              
14             1;