Branch Coverage

lib/Devel/Trepan/CmdProcessor/Command/List.pm
Criterion Covered Total %
branch 0 152 0.0


line true false branch
119 0 0 $start < $end ? :
0 0 $start < $end ? :
151 0 0 if (scalar @args > 0) { }
0 0 elsif ($frame and not $frame->{'line'} and $proc->{'frame'}) { }
0 0 if (scalar @args > 0) { }
0 0 elsif ($frame and not $frame->{'line'} and $proc->{'frame'}) { }
159 0 0 unless ($eval_ok)
0 0 unless ($eval_ok)
168 0 0 unless ($start_symbol_name eq 'range')
0 0 unless ($start_symbol_name eq 'range')
176 0 0 if (defined $direction) { }
0 0 if (defined $direction) { }
177 0 0 if ($direction eq '-') { }
0 0 elsif ($direction eq '+') { }
0 0 elsif ($direction eq '.') { }
0 0 if ($direction eq '-') { }
0 0 elsif ($direction eq '+') { }
0 0 elsif ($direction eq '.') { }
178 0 0 unless $proc->{'list_line'}
0 0 unless $proc->{'list_line'}
180 0 0 if $start < 1
0 0 if $start < 1
182 0 0 unless $proc->{'list_line'}
0 0 unless $proc->{'list_line'}
186 0 0 unless defined $frame
0 0 unless defined $frame
195 0 0 if (defined $loc_start)
0 0 if (defined $loc_start)
196 0 0 if (ref $loc_start eq 'HASH') { }
0 0 if (ref $loc_start eq 'HASH') { }
198 0 0 unless (defined $location)
0 0 unless (defined $location)
203 0 0 if $location->{'filename'}
0 0 if $location->{'filename'}
204 0 0 if $location->{'line_num'}
0 0 if $location->{'line_num'}
205 0 0 if $location->{'offset'}
0 0 if $location->{'offset'}
211 0 0 if (defined $loc_end)
0 0 if (defined $loc_end)
212 0 0 if $loc_end->{'line_num'}
0 0 if $loc_end->{'line_num'}
215 0 0 unless (defined $start)
0 0 unless (defined $start)
225 0 0 if $start < 1
0 0 if $start < 1
226 0 0 unless $end
0 0 unless $end
228 0 0 unless &is_cached($filename)
0 0 unless &is_cached($filename)
239 0 0 substr($args->[0], -1, 1) eq '>' ? :
0 0 substr($args->[0], -1, 1) eq '>' ? :
245 0 0 unless $filename
0 0 unless $filename
250 0 0 unless (defined $max_line and -r $filename)
0 0 unless (defined $max_line and -r $filename)
255 0 0 if ($start > $max_line)
0 0 if ($start > $max_line)
262 0 0 if ($end > $max_line)
0 0 if ($end > $max_line)
280 0 0 if &filename_is_eval($frame_filename)
0 0 if &filename_is_eval($frame_filename)
287 0 0 unless (defined $line)
0 0 unless (defined $line)
288 0 0 if ($lineno > $max_line) { }
0 0 if ($lineno > $max_line) { }
297 0 0 if length $s < 4
0 0 if length $s < 4
300 0 0 if (exists $DB::dbline{$lineno} and my $brkpts = $DB::dbline{$lineno}) { }
0 0 if (exists $DB::dbline{$lineno} and my $brkpts = $DB::dbline{$lineno}) { }
304 0 0 if (defined $bp)
0 0 if (defined $bp)
311 0 0 unless $found
0 0 unless $found
318 0 0 if ($proc->{'frame'} and $lineno == $proc->line and $frame_filename eq $filename) { }
0 0 if ($proc->{'frame'} and $lineno == $proc->line and $frame_filename eq $filename) { }