line |
true |
false |
branch |
37
|
0 |
0 |
if ('tbrkpt' eq $self->type) { }
|
|
0 |
0 |
elsif ('brkpt' eq $self->type) { }
|
|
0 |
0 |
elsif ('action' eq $self->type) { }
|
65
|
0 |
0 |
unless $fname
|
68
|
0 |
0 |
if defined $DB::dbline{$i}
|
78
|
0 |
0 |
unless $fn_name =~ /::/
|
79
|
0 |
0 |
if substr($fn_name, 0, 2) eq '::'
|
81
|
0 |
0 |
if (exists $DB::sub{$fn_name})
|
83
|
0 |
0 |
if ($from)
|
96
|
0 |
1 |
unless defined $filename
|
101
|
0 |
1 |
if ($change_dbline)
|
104
|
0 |
0 |
if exists $main::main::{$filekey}
|
108
|
0 |
1 |
if ($fn_or_lineno =~ /\D/) { }
|
111
|
0 |
0 |
unless ($lineno)
|
112
|
0 |
0 |
if $change_dbline
|
116
|
0 |
0 |
if ($change_dbline)
|
119
|
0 |
0 |
if exists $main::main::{$filekey}
|
124
|
1 |
0 |
if (not defined $DB::dbline[$lineno] or $DB::dbline[$lineno] == 0)
|
125
|
0 |
1 |
if $change_dbline
|
140
|
0 |
1 |
unless defined $filename
|
142
|
0 |
1 |
unless defined $type
|
143
|
1 |
0 |
unless defined $enabled
|
148
|
0 |
1 |
if ($change_dbline)
|
151
|
0 |
0 |
if exists $main::main::{$filekey}
|
156
|
0 |
1 |
if ($fn_or_lineno =~ /\D/) { }
|
159
|
0 |
0 |
unless ($lineno)
|
161
|
0 |
0 |
if $change_dbline
|
165
|
0 |
0 |
if ($change_dbline)
|
168
|
0 |
0 |
if exists $main::main::{$filekey}
|
171
|
0 |
1 |
unless (is_breakable($filename, $lineno) or $force)
|
174
|
0 |
0 |
if $change_dbline
|
178
|
1 |
0 |
unless (defined $id)
|
179
|
0 |
1 |
if ($type eq 'action') { }
|
196
|
0 |
1 |
if (defined $function) { }
|
197
|
0 |
0 |
unless exists $DB::fn_brkpt{$fn_or_lineno}
|
200
|
1 |
0 |
unless exists $DB::dbline{$lineno}
|
204
|
0 |
1 |
if $change_dbline
|
229
|
0 |
1 |
unless exists $main::main::{$file_key}
|
231
|
0 |
1 |
if (defined $DB::dbline{$i})
|
237
|
0 |
0 |
unless defined $DB::brkpt
|
238
|
0 |
0 |
if ($DB::brkpt eq $bp)
|
244
|
0 |
0 |
if $count == 0
|
251
|
0 |
0 |
if (@_) { }
|
254
|
0 |
0 |
if $i =~ /\D/
|
255
|
0 |
0 |
unless $i
|
256
|
0 |
0 |
if (defined $DB::dbline{$i})
|
260
|
0 |
0 |
if ($brkpt->action ne 'brkpt')
|
266
|
0 |
0 |
if $j == 0
|
271
|
0 |
0 |
if (defined $DB::dbline{$i})
|
288
|
0 |
0 |
if (@_) { }
|
291
|
0 |
0 |
if $i =~ /\D/
|
292
|
0 |
0 |
unless $i
|
293
|
0 |
0 |
if (defined $DB::dbline{$i})
|
297
|
0 |
0 |
if ($brkpt->action ne 'action')
|
303
|
0 |
0 |
if $j == 0
|
308
|
0 |
0 |
if (defined $DB::dbline{$i})
|