File Coverage

blib/lib/OpenTracing/Interface/ContextReference.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package OpenTracing::Interface::ContextReference;
2              
3              
4 3     3   564478 use strict;
  3         33  
  3         92  
5 3     3   16 use warnings;
  3         6  
  3         162  
6              
7              
8             our $VERSION = '0.19';
9              
10              
11 3     3   1389 use Role::MethodReturns;
  3         452080  
  3         21  
12              
13 3     3   18506 use OpenTracing::Types qw/ContextReference SpanContext/;
  3         3937  
  3         41  
14 3     3   1961 use Types::Standard qw/Bool/;
  3         7  
  3         22  
15              
16              
17              
18             around new_child_of => class_method ( SpanContext $span_context ) {
19            
20             returns( ContextReference ,
21             $original->( $class => ( $span_context ) )
22             );
23            
24             };
25              
26              
27              
28             around new_follows_from => class_method ( SpanContext $span_context ) {
29            
30             returns( ContextReference ,
31             $original->( $class => ( $span_context ) )
32             )
33            
34             };
35              
36              
37              
38             around get_referenced_context => instance_method ( ) {
39            
40             returns( SpanContext ,
41             $original->( $instance => ( ) )
42             )
43            
44             };
45              
46              
47              
48             around type_is_child_of => instance_method ( ) {
49            
50             returns( Bool ,
51             $original->( $instance => ( ) )
52             )
53            
54             };
55              
56              
57              
58             around type_is_follows_from => instance_method ( ) {
59            
60             returns( Bool ,
61             $original->( $instance => ( ) )
62             )
63            
64             };
65              
66              
67              
68             1;