| line |
true |
false |
branch |
|
55
|
0 |
12 |
if ($ENV{'PERL5DB_THREADED'}) { }
|
|
84
|
12 |
0 |
unless ($fall_off_on_end)
|
|
106
|
0 |
0 |
if ($ENV{'PERL5DB_THREADED'})
|
|
111
|
0 |
0 |
unless $ready and not $in_debugger
|
|
131
|
0 |
0 |
if @skippkg and grep {$_ eq $package;} @skippkg
|
|
143
|
0 |
0 |
if ($OSNAME eq 'MacOS' and $#dbline < 0)
|
|
159
|
0 |
0 |
unless $wp->enabled
|
|
167
|
0 |
0 |
unless defined $old_value or defined $new_val
|
|
169
|
0 |
0 |
if ($not_same or $new_val ne $wp->old_value)
|
|
181
|
0 |
0 |
if (exists $dbline{$lineno} and local $brkpts = $dbline{$lineno})
|
|
185
|
0 |
0 |
unless defined $brkpt
|
|
186
|
0 |
0 |
if ($brkpt->type eq 'action')
|
|
191
|
0 |
0 |
if ($brkpt->condition eq '1') { }
|
|
203
|
0 |
0 |
if ($stop and $brkpt->enabled and not $single & 32)
|
|
207
|
0 |
0 |
if ($event eq 'tbrkpt') { }
|
|
218
|
0 |
0 |
if ($watch_triggered) { }
|
|
|
0 |
0 |
elsif ($signal) { }
|
|
|
0 |
0 |
elsif ($single & 32) { }
|
|
|
0 |
0 |
elsif ($trace) { }
|
|
|
0 |
0 |
elsif ($single & 3) { }
|
|
|
0 |
0 |
elsif ($single & 4) { }
|
|
234
|
0 |
0 |
if ($single or $trace or $signal or $event eq 'watch')
|
|
235
|
0 |
0 |
$sub =~ /\'|::/ ? :
|
|
241
|
0 |
0 |
if $action->enabled
|
|
248
|
0 |
0 |
if ($single or $signal or $watch_triggered)
|
|
249
|
0 |
0 |
if $single & 4
|
|
267
|
0 |
0 |
unless $disp and $disp->enabled
|
|
276
|
0 |
0 |
if (defined $eval_result) { }
|
|
284
|
0 |
0 |
if (1 == $after_eval) { }
|
|
|
0 |
0 |
elsif (2 == $after_eval) { }
|
|
293
|
0 |
0 |
if ($running == 2 and defined $eval_str)
|
|
299
|
0 |
0 |
unless defined $return_type
|
|
303
|
0 |
0 |
if ('@' eq $return_type) { }
|
|
|
0 |
0 |
elsif ('%' eq $return_type) { }
|
|
312
|
0 |
0 |
if ($nest) { }
|
|
378
|
0 |
0 |
$2 ? :
|
|
430
|
0 |
0 |
unless $disp and $disp->enabled
|
|
442
|
0 |
0 |
if (1 == $after_eval) { }
|
|
|
0 |
0 |
elsif (2 == $after_eval) { }
|
|
451
|
0 |
0 |
if ($DB::running == 2 and defined $DB::eval_str)
|
|
458
|
0 |
0 |
if ('@' eq $opts->{'return_type'}) { }
|
|
|
0 |
0 |
elsif ('%' eq $opts->{'return_type'}) { }
|
|
488
|
0 |
0 |
if ref $s
|
|
492
|
0 |
0 |
unless @DB::clients
|
|
513
|
0 |
0 |
if (scalar @_ > 0)
|
|
515
|
0 |
0 |
if (2 == scalar @_) { }
|
|
522
|
0 |
0 |
unless $brkpt
|
|
525
|
0 |
0 |
if (defined $DB::stack[$i]) { }
|
|
540
|
0 |
0 |
scalar @_ >= 1 ? :
|
|
541
|
0 |
0 |
scalar @_ >= 1 ? :
|
|
543
|
0 |
0 |
if ($scan_for_DB_sub)
|
|
550
|
0 |
0 |
if ('DB::DB' eq $fn or 'DB' eq $pkg and 'DB' eq $fn)
|
|
561
|
0 |
0 |
if $index < 0
|
|
569
|
0 |
0 |
if ('undef' eq $DB::return_type) { }
|
|
|
0 |
0 |
elsif ('array' eq $DB::return_type) { }
|
|
611
|
0 |
0 |
unless $fname
|
|
629
|
0 |
0 |
unless (defined $main::main::{'_<' . $file})
|
|
631
|
0 |
0 |
if (($try) = grep(/^_<.*$file/, keys %main::main::))
|
|
635
|
0 |
0 |
if (defined $main::main::{'_<' . $file})
|
|
655
|
9 |
0 |
if @_
|
|
660
|
0 |
0 |
if (defined $expr)
|