| line |
true |
false |
branch |
|
78
|
0 |
3 |
if (defined $args{'file'} and defined $args{'string'}) |
|
100
|
0 |
3 |
if (defined $self->{'string'}) { } |
|
|
2 |
2 |
elsif (defined $self->{'file'} and -e $self->{'file'}) { } |
|
107
|
0 |
2 |
unless open my $fh, "<", $self->{'file'} |
|
123
|
0 |
0 |
if @_ > 1 |
|
153
|
134 |
0 |
if (@_ % 2 == 1) { } |
|
161
|
0 |
0 |
unless defined $ctype |
|
163
|
0 |
0 |
unless defined $xstype |
|
172
|
0 |
0 |
if ($args{'skip'} and $args{'replace'}) |
|
176
|
134 |
0 |
if ($args{'replace'}) { } |
|
|
0 |
0 |
elsif ($args{'skip'}) { } |
|
180
|
0 |
0 |
if exists $self->{'typemap_lookup'}{$type->ctype} |
|
221
|
100 |
0 |
if (@_ % 2 == 1) { } |
|
229
|
0 |
0 |
unless defined $xstype |
|
231
|
0 |
0 |
unless defined $code |
|
239
|
0 |
0 |
if ($args{'skip'} and $args{'replace'}) |
|
243
|
100 |
0 |
if ($args{'replace'}) { } |
|
|
0 |
0 |
elsif ($args{'skip'}) { } |
|
247
|
0 |
0 |
if exists $self->{'input_lookup'}{$input->xstype} |
|
273
|
100 |
0 |
if (@_ % 2 == 1) { } |
|
281
|
0 |
0 |
unless defined $xstype |
|
283
|
0 |
0 |
unless defined $code |
|
291
|
0 |
0 |
if ($args{'skip'} and $args{'replace'}) |
|
295
|
100 |
0 |
if ($args{'replace'}) { } |
|
|
0 |
0 |
elsif ($args{'skip'}) { } |
|
299
|
0 |
0 |
if exists $self->{'output_lookup'}{$output->xstype} |
|
324
|
0 |
0 |
unless defined $args{'string'} |
|
344
|
134 |
0 |
if (@_ > 1) { } |
|
347
|
0 |
134 |
unless defined $ctype |
|
370
|
100 |
0 |
if (@_ > 1) { } |
|
373
|
0 |
100 |
unless defined $xstype |
|
395
|
100 |
0 |
if (@_ > 1) { } |
|
398
|
0 |
100 |
unless defined $xstype |
|
415
|
330 |
4 |
unless defined $index |
|
422
|
132 |
96 |
if ($lookup->{$key} > $index) |
|
476
|
0 |
4 |
if @_ % 2 |
|
481
|
0 |
0 |
unless defined $xstype or defined $ctype |
|
484
|
0 |
4 |
if defined $xstype and defined $ctype |
|
487
|
0 |
4 |
if (defined $ctype) |
|
490
|
0 |
0 |
unless defined $xstype |
|
494
|
0 |
4 |
unless defined $index |
|
514
|
0 |
4 |
if @_ % 2 |
|
519
|
0 |
2 |
unless defined $xstype or defined $ctype |
|
522
|
0 |
4 |
if defined $xstype and defined $ctype |
|
525
|
2 |
2 |
if (defined $ctype) |
|
528
|
0 |
2 |
unless defined $xstype |
|
532
|
0 |
4 |
unless defined $index |
|
548
|
0 |
0 |
defined $args{'file'} ? : |
|
549
|
0 |
0 |
unless defined $file |
|
552
|
0 |
0 |
unless open my $fh, ">", $file |
|
572
|
0 |
0 |
$entry->proto ne '' ? : |
|
577
|
0 |
0 |
if (@$input) |
|
585
|
0 |
0 |
if (@$output) |
|
618
|
0 |
0 |
if ($icand == @ident_cand) |
|
865
|
0 |
0 |
if (exists $args{'ctype'} and exists $self->{'typemap_lookup'}{tidy_type($args{'ctype'})}) |
|
871
|
0 |
0 |
if (exists $args{'inputmap_xstype'} and exists $self->{'input_lookup'}{$args{'inputmap_xstype'}}) |
|
877
|
0 |
0 |
if (exists $args{'outputmap_xstype'} and exists $self->{'output_lookup'}{$args{'outputmap_xstype'}}) |
|
902
|
0 |
0 |
if ($args{'shallow'}) { } |
|
946
|
0 |
361 |
if (/[<>]/) |
|
1061
|
0 |
0 |
if ($string =~ /^$XS::Install::FrozenShit::ParseXS::Constants::PrototypeRegexp+$/o) |