| line |
true |
false |
branch |
|
34
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
35
|
0 |
0 |
unless my $fh = 'IO::File'->new($filename) |
|
54
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
66
|
0 |
0 |
($b & 192) != 128 ? : |
|
112
|
0 |
0 |
if $_[4] and not $$self{'_vregs_forced_line'} |
|
113
|
0 |
0 |
if ($_[0] eq 'p' or $_[0] =~ /^h[0-9]/) |
|
116
|
0 |
0 |
if ($$self{'_format'} eq 'latex2html' and $$self{'_vregs_next_tag'} and $$self{'_vregs_next'}{$$self{'_vregs_next_tag'}} ne '') |
|
122
|
0 |
0 |
if ($_[0] eq 'meta' and $_[1]{'content'} and $_[1]{'content'} =~ /latex2html/i) |
|
124
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
132
|
0 |
0 |
if ($text =~ /^\s*line\s+(\d+)\s+"(.*)"/) |
|
141
|
0 |
0 |
if ($_[0] eq 'p') |
|
142
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
143
|
0 |
0 |
if (not $$self{'_vregs_first_endp'}) { } |
|
155
|
0 |
0 |
unless ($$self{'_in_a_table'}) |
|
157
|
0 |
0 |
if ($SystemC::Vregs::Input::TableExtract::Debug) |
|
159
|
0 |
0 |
$$self{'_vregs_first_word_in_p'} ? : |
|
163
|
0 |
0 |
unless ($text =~ /^\s*$/ or $text =~ /^
|
|
166
|
0 |
0 |
if ($$self{'_vregs_first_word_in_p'}) |
|
177
|
0 |
0 |
if ($$self{'_vregs_first_word_in_p'} and $SystemC::Vregs::Input::TableExtract::Find_Headers{$nosp_text}) { } |
|
|
0 |
0 |
elsif ($$self{'_vregs_next_tag'}) { } |
|
179
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
180
|
0 |
0 |
if ($SystemC::Vregs::Input::TableExtract::Find_Start_Headers{$text} and $$self{'_vregs_next'}) |
|
191
|
0 |
0 |
if $text eq 'Vregs_End_Of_Decl' |
|
192
|
0 |
0 |
if $text eq 'Vregs_End_Of_Decl' |
|
195
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
199
|
0 |
0 |
unless $text =~ /^\s*$/ |
|
202
|
0 |
0 |
if ($#tables != $$self{'_vregs_num_tables'}) |
|
204
|
0 |
0 |
if ($$self{'_vregs_next'}) |
|
209
|
0 |
0 |
unless defined $_ |
|
221
|
0 |
0 |
if $SystemC::Vregs::Input::TableExtract::Debug |
|
240
|
0 |
1 |
unless my $fh = 'IO::File'->new($filename) |
|
260
|
0 |
1 |
unless my $fh = 'IO::File'->new($filename, 'w') |