File Coverage

blib/lib/Sub/Call/Tail.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 6 6 100.0
pod n/a
total 23 23 100.0


line stmt bran cond sub pod time code
1             package Sub::Call::Tail; # git description: v0.07-8-g55f94e4
2             # ABSTRACT: Tail calls for subroutines and methods
3              
4 4     4   235611 use strict;
  4         36  
  4         104  
5 4     4   17 use warnings;
  4         8  
  4         93  
6              
7 4     4   59 use 5.008001;
  4         12  
8 4     4   1493 use parent qw(Exporter);
  4         1050  
  4         18  
9 4     4   184 use XSLoader ();
  4         7  
  4         57  
10 4     4   1526 use B::Hooks::OP::Check::EntersubForCV;
  4         27997  
  4         16  
11              
12             our $VERSION = '0.08';
13              
14             our @EXPORT = our @EXPORT_OK = qw(tail);
15             our %EXPORT_TAGS = ( all => \@EXPORT_OK );
16              
17             XSLoader::load(__PACKAGE__, $VERSION);
18              
19             # ex: set sw=4 et:
20              
21             __PACKAGE__
22              
23             __END__