File Coverage

blib/lib/Dancer/Continuation.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod 0 3 0.0
total 19 22 86.3


line stmt bran cond sub pod time code
1             package Dancer::Continuation;
2             our $AUTHORITY = 'cpan:SUKRIA';
3             # ABSTRACT: Continuation exception (internal exception) for Dancer
4             $Dancer::Continuation::VERSION = '1.3514_04'; # TRIAL
5             $Dancer::Continuation::VERSION = '1.351404';
6 190     190   1857 use strict;
  190         371  
  190         4842  
7 190     190   831 use warnings;
  190         324  
  190         3683  
8 190     190   1158 use Carp;
  190         340  
  190         20302  
9              
10             sub new {
11 124     124 0 238 my $class = shift;
12 124         427 bless { @_ }, $class;
13             }
14              
15 124     124 0 669 sub throw { die shift }
16              
17 18     18 0 91 sub rethrow { die shift }
18              
19             1;
20              
21             __END__