File Coverage

blib/lib/OpenTracing/Interface/ScopeManager.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::ScopeManager;
2              
3 3     3   552445 use strict;
  3         27  
  3         91  
4 3     3   15 use warnings;
  3         8  
  3         137  
5              
6              
7             our $VERSION = '0.19';
8              
9              
10 3     3   1357 use Role::MethodReturns;
  3         435415  
  3         22  
11              
12 3     3   18054 use OpenTracing::Types qw/Scope Span/;
  3         4031  
  3         34  
13 3     3   1795 use Types::Standard qw/Bool Dict Optional/;
  3         9  
  3         17  
14              
15              
16              
17             around activate_span => instance_method ( Span $span, @options, ) {
18            
19             (
20             Dict[
21             finish_span_on_close => Optional[ Bool ],
22             ]
23             )->assert_valid( { @options } );
24            
25             returns( Scope,
26             $original->( $instance => ( $span, @options ) )
27             )
28            
29             };
30              
31              
32              
33             around get_active_scope => instance_method ( ) {
34            
35             returns_maybe( Scope,
36             $original->( $instance => ( ) )
37             )
38            
39             };
40              
41              
42             1;