| line |
true |
false |
branch |
|
45
|
0 |
2 |
if (length $text == 0) |
|
61
|
1 |
1 |
unless ($text =~ /\\n\"$/) |
|
75
|
0 |
0 |
unless ($c_file_name =~ /\.c/) |
|
80
|
0 |
0 |
if (-f $c_file_name) |
|
83
|
0 |
0 |
if (-f $h_file_name) |
|
106
|
0 |
0 |
unless ($c_file_name =~ /\.c/) |
|
117
|
0 |
0 |
if (not $variable_name =~ /^[A-Za-z_][A-Za-z_0-9]+$/ or $variable_name =~ /^(?:$C::Utility::reserved_re)$/) |
|
131
|
0 |
0 |
unless (valid_c_variable($string)) |
|
153
|
0 |
0 |
if (ref $fh and ref $fh eq 'SCALAR') { } |
|
184
|
0 |
0 |
unless ref $hash_ref eq 'HASH' |
|
185
|
0 |
0 |
unless $prefix |
|
186
|
0 |
0 |
unless open my $c_out, '>:utf8', $c_file_name |
|
189
|
0 |
0 |
unless open my $h_out, '>:utf8', $h_file_name |
|
192
|
0 |
0 |
unless (valid_c_variable($variable)) |
|
200
|
0 |
0 |
unless close $c_out |
|
202
|
0 |
0 |
unless close $h_out |
|
209
|
0 |
0 |
unless $line_number =~ /^[0-9]+$/ and $line_number > 0 |
|
217
|
0 |
0 |
unless open my $input, '<:encoding(utf8)', $input_file |
|
218
|
0 |
0 |
unless open my $output, '>:encoding(utf8)', $output_file |
|
223
|
0 |
0 |
unless close $input |
|
224
|
0 |
0 |
unless close $output |
|
232
|
0 |
0 |
unless open my $input, '<:encoding(utf8)', $input_file |
|
234
|
0 |
0 |
if (/^#line/) { } |
|
|
0 |
0 |
elsif ($. == 1) { } |
|
259
|
0 |
2 |
unless $intext and $file and $directive |
|
266
|
0 |
2 |
if $intext =~ /$tag\d+/ |
|
292
|
0 |
2 |
if $intext =~ /$tag\d+$tag/ |
|
315
|
0 |
0 |
unless (defined $name) |