File Coverage

blib/lib/Thrift/Parser/Type/Exception.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 4 75.0
pod 1 1 100.0
total 13 16 81.2


line stmt bran cond sub pod time code
1             package Thrift::Parser::Type::Exception;
2              
3             =head1 NAME
4              
5             Thrift::Parser::Type::Exception - Exception type
6              
7             =head1 DESCRIPTION
8              
9             =cut
10              
11 6     6   32 use strict;
  6         9  
  6         189  
12 6     6   34 use warnings;
  6         11  
  6         154  
13 6     6   29 use base qw(Thrift::Parser::Type::Struct);
  6         92  
  6         838  
14              
15             =head1 METHODS
16              
17             This class inherits from L; see docs there for inherited methods.
18              
19             =head2 throw
20              
21             =cut
22              
23             sub throw {
24 0     0 1   my $class = shift;
25 0           die $class->compose({ @_ });
26             }
27              
28             =head1 COPYRIGHT
29              
30             Copyright (c) 2009 Eric Waters and XMission LLC (http://www.xmission.com/). All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
31              
32             The full text of the license can be found in the LICENSE file included with this module.
33              
34             =head1 AUTHOR
35              
36             Eric Waters
37              
38             =cut
39              
40             1;