| line |
true |
false |
branch |
|
61
|
0 |
8 |
if @_ == 1 |
|
62
|
4 |
4 |
if @_ > 1 |
|
95
|
12 |
8 |
unless (exists $self->{'_table'}{$file}) |
|
114
|
0 |
1 |
unless &blessed($other) and $other->isa('Text::Locus') |
|
153
|
13 |
2 |
unless (exists $self->{'_string'}) |
|
159
|
12 |
12 |
if $self->{'_string'} |
|
161
|
24 |
0 |
if (my(@lines) = @{$self->{'_table'}{$file}{'_lines'};}) |
|
167
|
26 |
20 |
if ($line == $end + 1) { } |
|
170
|
6 |
14 |
if ($end > $beg) { } |
|
179
|
6 |
18 |
if ($end > $beg) { } |
|
188
|
2 |
13 |
if (@_) |
|
189
|
1 |
1 |
if ($self->{'_string'} ne '') { } |
|
228
|
1 |
2 |
if (&blessed($other)) { } |
|
|
2 |
0 |
elsif (not ref $other and $other =~ /^(.+):(\d+)$/) { } |
|
231
|
1 |
1 |
if ($swap) { } |
|
256
|
0 |
2 |
unless exists $self->{'_table'}{$oldname} |
|
257
|
0 |
2 |
if exists $self->{'_table'}{$newname} |
|
294
|
0 |
2 |
unless @_ |
|
295
|
1 |
1 |
if ($#_ == 0) { } |
|
|
1 |
0 |
elsif ($#_ % 2) { } |
|
303
|
2 |
0 |
if (exists $self->{'_table'}{$file}) |