| line |
true |
false |
branch |
|
27
|
0 |
48 |
unless (eval {
do {
require XSLoader;
XSLoader::load('Data::BitStream::XS', $Data::BitStream::XS::VERSION);
prime_init(0);
1
}
}) |
|
46
|
110 |
10 |
if not $self->writing |
|
50
|
370 |
35 |
if $self->writing |
|
80
|
0 |
2 |
unless defined $source |
|
82
|
2 |
0 |
if (ref $source eq 'Data::BitStream::XS') { } |
|
86
|
0 |
0 |
unless $source->can('to_string') |
|
102
|
39 |
1180 |
ref $_[0] eq 'CODE' ? : |
|
108
|
39 |
1115 |
ref $_[0] eq 'CODE' ? : |
|
115
|
0 |
797 |
ref $_[0] eq 'CODE' ? : |
|
121
|
0 |
754 |
ref $_[0] eq 'CODE' ? : |
|
128
|
0 |
642 |
ref $_[0] eq 'CODE' ? : |
|
134
|
0 |
619 |
ref $_[0] eq 'CODE' ? : |
|
145
|
723 |
2 |
if not defined $stop or $stop > $maxstop |
|
146
|
0 |
725 |
unless $start >= 0 and $start <= $maxstop |
|
147
|
0 |
725 |
unless $step >= 0 |
|
148
|
0 |
725 |
unless $stop >= $start |
|
149
|
0 |
725 |
if $start == $stop |
|
150
|
0 |
725 |
if $step == 0 |
|
156
|
723 |
14470 |
if $blen > $stop |
|
165
|
0 |
362 |
unless ref $p eq 'ARRAY' and scalar @$p == 3 |
|
168
|
0 |
362 |
if $start == $stop |
|
169
|
0 |
362 |
if $step == 0 |
|
171
|
0 |
362 |
unless scalar @pmap >= 2 |
|
177
|
0 |
363 |
unless ref $p eq 'ARRAY' and scalar @$p == 3 |
|
180
|
0 |
363 |
if $start == $stop |
|
181
|
0 |
363 |
if $step == 0 |
|
183
|
0 |
363 |
unless scalar @pmap >= 2 |
|
342
|
0 |
347 |
unless defined $rinfo and ref $rinfo eq 'HASH' |
|
344
|
0 |
2082 |
unless defined $$rinfo{$p} |
|
347
|
0 |
347 |
if (defined $codeinfo{$name}) |
|
348
|
0 |
0 |
if $codeinfo{$name}{'package'} eq $$rinfo{'package'} |
|
367
|
15 |
160 |
if scalar @_initinfo > 0 |
|
373
|
32 |
8 |
if $code =~ s/\((.+)\)$// |
|
379
|
90 |
33 |
if $code =~ s/\((.+)\)$// |
|
381
|
1 |
122 |
unless defined $inforef |
|
390
|
360 |
8355 |
if ($code eq 'unary') { } |
|
|
362 |
7993 |
elsif ($code eq 'gamma') { } |
|
392
|
5826 |
2167 |
if $code =~ s/\((.+)\)$// |
|
394
|
9 |
7984 |
unless defined $inforef |
|
395
|
1 |
7992 |
unless defined $inforef |
|
397
|
0 |
7992 |
unless defined $sub |
|
398
|
5826 |
2166 |
if ($$inforef{'params'}) { } |
|
399
|
1 |
5825 |
unless defined $param |
|
402
|
1 |
2165 |
if defined $param |
|
410
|
382 |
8906 |
if ($code eq 'unary') { } |
|
|
387 |
8519 |
elsif ($code eq 'gamma') { } |
|
412
|
6219 |
2300 |
if $code =~ s/\((.+)\)$// |
|
414
|
3 |
8516 |
unless defined $inforef |
|
415
|
1 |
8518 |
unless defined $inforef |
|
417
|
0 |
8518 |
unless defined $sub |
|
418
|
6219 |
2299 |
if ($$inforef{'params'}) { } |
|
419
|
1 |
6218 |
unless defined $param |
|
422
|
1 |
2298 |
if defined $param |