| line |
true |
false |
branch |
|
55
|
0 |
12 |
if ($ENV{'PERL5DB_THREADED'}) { }
|
|
84
|
12 |
0 |
unless ($fall_off_on_end)
|
|
110
|
0 |
0 |
if ($ENV{'PERL5DB_THREADED'})
|
|
115
|
0 |
0 |
unless $ready and not $in_debugger
|
|
135
|
0 |
0 |
if @skippkg and grep {$_ eq $package;} @skippkg
|
|
147
|
0 |
0 |
if ($OSNAME eq 'MacOS' and $#dbline < 0)
|
|
163
|
0 |
0 |
unless $wp->enabled
|
|
171
|
0 |
0 |
unless defined $old_value or defined $new_val
|
|
173
|
0 |
0 |
if ($not_same or $new_val ne $wp->old_value)
|
|
185
|
0 |
0 |
if (exists $dbline{$lineno} and local $brkpts = $dbline{$lineno})
|
|
189
|
0 |
0 |
unless defined $brkpt
|
|
190
|
0 |
0 |
if ($brkpt->type eq 'action')
|
|
195
|
0 |
0 |
if ($brkpt->condition eq '1') { }
|
|
207
|
0 |
0 |
if ($stop and $brkpt->enabled and not $single & 32)
|
|
211
|
0 |
0 |
if ($event eq 'tbrkpt') { }
|
|
222
|
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) { }
|
|
238
|
0 |
0 |
if ($single or $trace or $signal or $event eq 'watch')
|
|
239
|
0 |
0 |
$sub =~ /\'|::/ ? :
|
|
245
|
0 |
0 |
if $action->enabled
|
|
252
|
0 |
0 |
if ($single or $signal or $watch_triggered)
|
|
253
|
0 |
0 |
if $single & 4
|
|
271
|
0 |
0 |
unless $disp and $disp->enabled
|
|
280
|
0 |
0 |
if (defined $eval_result) { }
|
|
288
|
0 |
0 |
if (1 == $after_eval) { }
|
|
|
0 |
0 |
elsif (2 == $after_eval) { }
|
|
297
|
0 |
0 |
if ($running == 2 and defined $eval_str)
|
|
303
|
0 |
0 |
unless defined $return_type
|
|
307
|
0 |
0 |
if ('@' eq $return_type) { }
|
|
|
0 |
0 |
elsif ('%' eq $return_type) { }
|
|
316
|
0 |
0 |
if ($nest) { }
|
|
382
|
0 |
0 |
$2 ? :
|
|
434
|
0 |
0 |
unless $disp and $disp->enabled
|
|
446
|
0 |
0 |
if (1 == $after_eval) { }
|
|
|
0 |
0 |
elsif (2 == $after_eval) { }
|
|
455
|
0 |
0 |
if ($DB::running == 2 and defined $DB::eval_str)
|
|
462
|
0 |
0 |
if ('@' eq $opts->{'return_type'}) { }
|
|
|
0 |
0 |
elsif ('%' eq $opts->{'return_type'}) { }
|
|
492
|
0 |
0 |
if ref $s
|
|
496
|
0 |
0 |
unless @DB::clients
|
|
517
|
0 |
0 |
if (scalar @_ > 0)
|
|
519
|
0 |
0 |
if (2 == scalar @_) { }
|
|
525
|
0 |
0 |
unless $brkpt
|
|
528
|
0 |
0 |
if (defined $DB::stack[$i]) { }
|
|
543
|
0 |
0 |
scalar @_ >= 1 ? :
|
|
544
|
0 |
0 |
scalar @_ >= 1 ? :
|
|
546
|
0 |
0 |
if ($scan_for_DB_sub)
|
|
553
|
0 |
0 |
if ('DB::DB' eq $fn or 'DB' eq $pkg and 'DB' eq $fn)
|
|
564
|
0 |
0 |
if $index < 0
|
|
572
|
0 |
0 |
if ('undef' eq $DB::return_type) { }
|
|
|
0 |
0 |
elsif ('array' eq $DB::return_type) { }
|
|
614
|
0 |
0 |
unless $fname
|
|
632
|
0 |
0 |
unless (defined $main::main::{'_<' . $file})
|
|
634
|
0 |
0 |
if (($try) = grep(/^_<.*$file/, keys %main::main::))
|
|
638
|
0 |
0 |
if (defined $main::main::{'_<' . $file})
|
|
658
|
9 |
0 |
if @_
|
|
663
|
0 |
0 |
if (defined $expr)
|