| line |
true |
false |
branch |
|
43
|
0 |
4 |
unless ($@) |
|
61
|
0 |
5 |
unless (-f $file_to_relocate) |
|
66
|
0 |
5 |
unless my $temp_scan_dir = tempdir('c_scan_const_XXXXX', 'DIR', 'File::Spec'->tmpdir, 'CLEANUP', 1) |
|
76
|
0 |
5 |
unless copy($file_to_relocate, $relocated_file) |
|
82
|
0 |
5 |
unless (defined $c_header_file) |
|
91
|
0 |
5 |
if ($^O =~ /MSWin/i) |
|
94
|
0 |
0 |
unless ($cur_cppstdin =~ /$cur_cc/ and $cur_cppstdin =~ /\-E/) |
|
164
|
0 |
0 |
if (!defined($defs) || defined $defs && scalar keys %$defs == 0 and !defined($typedefs) || defined $typedefs && scalar @$typedefs == 0) |
|
190
|
573 |
4 |
if !($defn =~ /_H[_]?$/) || $defn =~ /_H[_]?$/ && !($all_caps_basename =~ /[_]?${defn}[_]?/) and not $defn =~ /_$/ |
|
301
|
30 |
16 |
if (ref $symbol) { } |
|
369
|
1 |
0 |
unless (-d "$const_mod_dir_name") |
|
370
|
0 |
1 |
unless mkpath($const_mod_dir_name, 0, 493) |
|
375
|
0 |
1 |
unless open my $const_mod_fh, '>', "$const_mod_base_full_name" |
|
377
|
0 |
1 |
unless open my $fwd_decl_fh, '>', "$fwd_decl_base_full_name" |
|
416
|
0 |
1 |
unless open CONST_XS_IN, 'const-xs.inc' |
|
425
|
1 |
89 |
if ($line =~ /PUSHi[(]iv[)]/) |
|
433
|
0 |
1 |
unless open CONST_XS_OUT, '>const-xs.inc' |
|
465
|
0 |
2 |
if ($g_use_blueprint_sections) { } |