File Coverage

blib/lib/Devel/Spy/_constants.pm
Criterion Covered Total %
statement 27 27 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod n/a
total 36 36 100.0


line stmt bran cond sub pod time code
1             package Devel::Spy;
2            
3             # The calling convention for overload.pm
4 1     1   4 use constant SELF => 0;
  1         3  
  1         52  
5 1     1   4 use constant OTHER => 1;
  1         1  
  1         34  
6 1     1   12 use constant INVERTED => 2;
  1         2  
  1         37  
7            
8             # The fields in Devel::Spy objects
9 1     1   5 use constant TIED_PAYLOAD => 0;
  1         1  
  1         35  
10 1     1   4 use constant UNTIED_PAYLOAD => 1;
  1         1  
  1         31  
11 1     1   3 use constant CODE => 2;
  1         2  
  1         35  
12            
13             # The calling convention for Devel::Spy->new
14 1     1   4 use constant _class => 0;
  1         2  
  1         33  
15 1     1   5 use constant _thing => 1;
  1         1  
  1         27  
16 1     1   4 use constant _logger => 2;
  1         1  
  1         32  
17            
18             1;