| line |
true |
false |
branch |
|
113
|
17 |
17 |
if (@_ == 1) { } |
|
114
|
17 |
0 |
unless $$self{'options'} |
|
135
|
0 |
34 |
if $DEBUG |
|
138
|
17 |
17 |
$mol ? : |
|
151
|
20 |
30 |
if ($$self{'options'}{'permute'}) { } |
|
157
|
12 |
38 |
if ($$self{'already_matched'}{$key}) { } |
|
158
|
0 |
12 |
if $DEBUG |
|
162
|
0 |
38 |
if $DEBUG |
|
170
|
0 |
89 |
if $DEBUG |
|
171
|
1 |
88 |
if $$self{'anchor'} |
|
172
|
1 |
87 |
if ($atom) { } |
|
|
54 |
33 |
elsif (@{$$self{'pending_atoms'};}) { } |
|
176
|
0 |
54 |
if $DEBUG |
|
194
|
10 |
78 |
@atoms == 1 ? : |
|
206
|
23 |
27 |
@bonds == 1 ? : |
|
230
|
0 |
55 |
if $DEBUG |
|
231
|
0 |
38 |
if (defined $mol and $self->map_to ne $mol or $opts{'reset'} or defined $opts{'atom'} and $opts{'atom'} ne $$self{'anchor'}) |
|
238
|
17 |
38 |
unless $match |
|
239
|
0 |
55 |
if $DEBUG |
|
246
|
0 |
55 |
if $DEBUG |
|
249
|
55 |
48 |
if $$self{'next_atom'} |
|
251
|
50 |
53 |
if ($match) { } |
|
252
|
12 |
38 |
if ($self->already_matched($self->atom_map, $self->bond_map)) { } |
|
255
|
2 |
36 |
unless $$self{'options'}{'overlap'} |
|
259
|
17 |
36 |
unless $self->next_atom |
|
270
|
0 |
55 |
if $DEBUG |
|
274
|
51 |
4 |
if $mol and $$patt{'options'}{'overlap'} |
|
292
|
0 |
103 |
if $DEBUG |
|
298
|
0 |
698 |
if ($DEBUG) |
|
300
|
183 |
515 |
if ($backtrack) { } |
|
|
50 |
465 |
elsif ($pos >= @$flat) { } |
|
|
55 |
410 |
elsif (@$stack == 1) { } |
|
|
50 |
360 |
elsif ($what->isa('Chemistry::Pattern::Atom')) { } |
|
|
360 |
0 |
elsif ($what->isa('Chemistry::Pattern::Bond')) { } |
|
301
|
0 |
183 |
if $DEBUG |
|
302
|
48 |
135 |
if (@$stack <= 2) |
|
303
|
0 |
48 |
if $DEBUG |
|
310
|
111 |
24 |
if ($what) |
|
311
|
0 |
111 |
if $DEBUG |
|
315
|
123 |
12 |
if ($to) |
|
316
|
0 |
123 |
if $DEBUG |
|
322
|
0 |
50 |
if $DEBUG |
|
327
|
50 |
5 |
if (not $$paint_tab{$where} and $what->test($where)) { } |
|
328
|
0 |
50 |
if $DEBUG |
|
338
|
10 |
40 |
if ($idx >= $mol->atoms) |
|
339
|
0 |
10 |
if $DEBUG |
|
344
|
16 |
24 |
if ($$paint_tab{$next}) |
|
345
|
0 |
16 |
if $DEBUG |
|
348
|
24 |
0 |
if ($what->test($next)) { } |
|
349
|
0 |
24 |
if $DEBUG |
|
355
|
0 |
0 |
if $DEBUG |
|
360
|
360 |
0 |
$a1->map_to ? : |
|
362
|
0 |
360 |
if $DEBUG |
|
364
|
125 |
235 |
if ($idx >= @bn) |
|
365
|
0 |
125 |
if $DEBUG |
|
372
|
92 |
143 |
if ($$paint_tab{$bond}) |
|
373
|
0 |
92 |
if $DEBUG |
|
376
|
22 |
121 |
if ($a1->map_to and $a2->map_to) { } |
|
377
|
22 |
0 |
if ($what->test($bond)) |
|
378
|
0 |
22 |
if $DEBUG |
|
379
|
12 |
10 |
if ($to->map_to eq $nei) { } |
|
380
|
0 |
12 |
if $DEBUG |
|
387
|
0 |
10 |
if $DEBUG |
|
391
|
7 |
114 |
if ($$paint_tab{$nei}) |
|
392
|
0 |
7 |
if $DEBUG |
|
395
|
106 |
8 |
if ($what->test($bond)) { } |
|
396
|
0 |
106 |
if $DEBUG |
|
397
|
101 |
5 |
if ($to->test($nei)) { } |
|
398
|
0 |
101 |
if $DEBUG |
|
407
|
0 |
5 |
if $DEBUG |
|
410
|
0 |
8 |
if $DEBUG |
|
428
|
26 |
19 |
if $$visited{$atom} |
|
432
|
0 |
34 |
if $DEBUG |
|
443
|
30 |
30 |
if $$visited{$bond} |
|
446
|
26 |
4 |
unless ($$visited{$nei}) |