File Coverage

lib/Mojo/Collection/XS.pm
Criterion Covered Total %
statement 8 9 88.8
branch n/a
condition 2 3 66.6
subroutine 3 4 75.0
pod 2 2 100.0
total 15 18 83.3


line stmt bran cond sub pod time code
1             package Mojo::Collection::XS;
2 5     5   1379422 use Mojo::Base 'Mojo::Collection';
  5         8  
  5         36  
3              
4             our $VERSION = '0.2';
5              
6 5     5   292107 use XSLoader;
  5         7  
  5         1748  
7             XSLoader::load(__PACKAGE__, $VERSION);
8              
9             our @EXPORT_OK = ('c');
10              
11             # Optional constructor helper
12 0     0 1 0 sub c { __PACKAGE__->new(@_) }
13              
14             sub new {
15 41     41 1 1025514 my $class = shift;
16 41   66     295 return bless [@_], ref $class || $class;
17             }
18              
19             sub while_fast { my ($self, $cb) = @_; Mojo::Collection::XS::while_fast($self, $cb); }
20             sub while_ultra { my ($self, $cb) = @_; Mojo::Collection::XS::while_ultra($self, $cb); }
21             sub each_fast { my ($self, $cb) = @_; Mojo::Collection::XS::each_fast($self, $cb); }
22             sub map_fast { my ($self, $cb) = @_; Mojo::Collection::XS::map_fast($self, $cb); }
23             sub map_ultra { my ($self, $cb) = @_; Mojo::Collection::XS::map_ultra($self, $cb); }
24             sub grep_fast { my ($self, $cb) = @_; Mojo::Collection::XS::grep_fast($self, $cb); }
25              
26             1;
27              
28             __END__