File Coverage

blib/lib/Cache/FastMmap/CImpl.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 15 15 100.0


line stmt bran cond sub pod time code
1             package Cache::FastMmap::CImpl;
2              
3             =head1 NAME
4            
5             Cache::FastMmap::CImpl - C code implementation for Cache::FastMmap
6            
7             =head1 SYNOPSIS
8            
9             Do not use this directly. Cache::FastMmap uses this
10            
11             =cut
12              
13             # Modules/Export/XSLoader {{{
14 9     9   187 use 5.006;
  9         157  
  9         82  
15 9     9   1854 use strict;
  9         104  
  9         335  
16 9     9   171 use warnings;
  9         79  
  9         125  
17              
18             our $VERSION = '1.14';
19              
20             require XSLoader;
21             XSLoader::load('Cache::FastMmap::CImpl', $VERSION);
22             # }}}
23              
24             sub DESTROY {
25 10     10   99   my $Self = shift;
26              
27             # Close any file before destruction
28 10         2733   $Self->fc_close();
29             }
30              
31             1;
32              
33             __END__
34            
35             =head1 AUTHOR
36            
37             Rob Mueller E<lt>cpan@robm.fastmail.fmE<gt>
38            
39             =head1 COPYRIGHT AND LICENSE
40            
41             Copyright (C) 2003 by FastMail IP Partners
42            
43             This library is free software; you can redistribute it and/or modify
44             it under the same terms as Perl itself.
45            
46             =cut
47