File Coverage

blib/lib/JSON/TypeInference/Type/Boolean.pm
Criterion Covered Total %
statement 16 16 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 2 0.0
total 22 24 91.6


line stmt bran cond sub pod time code
1             package JSON::TypeInference::Type::Boolean;
2 3     3   1562 use strict;
  3         6  
  3         72  
3 3     3   14 use warnings;
  3         5  
  3         76  
4 3     3   2097 use parent qw(JSON::TypeInference::Type::Atom);
  3         903  
  3         18  
5              
6 3     3   1549 use Types::Serialiser;
  3         4421  
  3         309  
7              
8             sub name {
9 1     1 0 3   my ($class) = @_;
10 1         5   return 'boolean';
11             }
12              
13             sub accepts {
14 43     43 0 3695   my ($class, $data) = @_;
15 43         109   return Types::Serialiser::is_bool($data);
16             }
17              
18             1;
19             __END__
20            
21             =encoding utf-8
22            
23             =head1 NAME
24            
25             JSON::TypeInference::Type::Boolean - JSON boolean type
26            
27             =head1 DESCRIPTION
28            
29             C< JSON::TypeInference::Type::Boolean > represents JSON boolean type.
30            
31             It is a value type, and so has no parameters.
32            
33             =head1 AUTHOR
34            
35             aereal E<lt>aereal@aereal.orgE<gt>
36            
37             =cut
38            
39