File Coverage

blib/lib/Devel/Chitin/Exception.pm
Criterion Covered Total %
statement 14 14 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 19 19 100.0


line stmt bran cond sub pod time code
1             package Devel::Chitin::Exception;
2              
3 34     34   186 use strict;
  34         54  
  34         876  
4 34     34   143 use warnings;
  34         44  
  34         1205  
5              
6             our $VERSION = '0.12'; # TRIAL
7 34     34   163 use base 'Devel::Chitin::Location';
  34         56  
  34         4735  
8              
9             sub _required_properties {
10 34     34   77 my $class = shift;
11 34         148 my @inh_props = $class->SUPER::_required_properties;
12 34         73 push @inh_props, 'exception';
13 34         171 return @inh_props;
14             }
15              
16             BEGIN {
17 34     34   272 __PACKAGE__->_make_accessors();
18             }
19              
20             1;
21              
22             __END__