File Coverage

blib/lib/Thunderhorse/Message.pm
Criterion Covered Total %
statement 8 15 53.3
branch n/a
condition n/a
subroutine 3 4 75.0
pod 0 1 0.0
total 11 20 55.0


line stmt bran cond sub pod time code
1             package Thunderhorse::Message;
2             $Thunderhorse::Message::VERSION = '0.102';
3 21     21   18170 use v5.40;
  21         145  
4 21     21   148 use Mooish::Base -standard, -role;
  21         42  
  21         321  
5              
6 21     21   350172 use Devel::StrictMode;
  21         102  
  21         4854  
7              
8             has param 'context' => (
9             (STRICT ? (isa => InstanceOf ['Thunderhorse::Context']) : ()),
10             weak_ref => 1,
11             );
12              
13 0           sub update ($self, $scope, $receive, $send)
  0            
  0            
14 0     0 0   {
  0            
  0            
15 0           ...;
16             }
17