File Coverage

blib/lib/Syntax/Feature/Void.pm
Criterion Covered Total %
statement 16 19 84.2
branch n/a
condition n/a
subroutine 6 7 85.7
pod n/a
total 22 26 84.6


line stmt bran cond sub pod time code
1             package Syntax::Feature::Void;
2              
3 4     4   269742 use strict;
  4         14  
  4         153  
4 4     4   34 use warnings;
  4         12  
  4         169  
5              
6 4     4   1344 use version; our $VERSION = qv('v1.2.0');
  4         8704  
  4         30  
7              
8 4     4   2356 use Devel::CallParser qw( );
  4         10675  
  4         180  
9 4     4   44 use XSLoader qw( );
  4         11  
  4         705  
10              
11             XSLoader::load('Syntax::Feature::Void', $VERSION);
12              
13             sub import {
14 3     3   40567 require Lexical::Sub;
15 0           Lexical::Sub->import( void => \&void );
16             }
17              
18             sub unimport {
19 0     0     require Lexical::Sub;
20 0           Lexical::Sub->unimport( void => \&void );
21             }
22              
23             *install = \&import; # For syntax.pm
24             *uninstall = \&unimport; # For syntax.pm
25              
26             1;
27              
28              
29             __END__