File Coverage

blib/lib/OpenTracing/Interface/ContextReference.pm
Criterion Covered Total %
statement 18 18 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 24 24 100.0


line stmt bran cond sub pod time code
1             package OpenTracing::Interface::ContextReference;
2              
3              
4 3     3   566904 use strict;
  3         30  
  3         146  
5 3     3   18 use warnings;
  3         6  
  3         157  
6              
7              
8             our $VERSION = '0.20';
9              
10              
11 3     3   1447 use Role::MethodReturns;
  3         445483  
  3         19  
12              
13 3     3   23977 use OpenTracing::Types qw/ContextReference SpanContext/;
  3         4456  
  3         37  
14 3     3   1989 use Types::Standard qw/Bool/;
  3         7  
  3         39  
15              
16 3     3   3291 use namespace::clean;
  3         20525  
  3         34  
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;