line |
true |
false |
branch |
79
|
56 |
7 |
for (i = 0; i < cover->size ; i++) { |
81
|
44 |
12 |
if (!node) { |
106
|
3 |
128 |
if (file[0] == '(') |
117
|
110 |
18 |
if (! LINE_IS_COVERED(node->lines, line)) { |
127
|
3 |
168 |
if (file[0] == '(') |
149
|
0 |
7 |
if ((env_filter = getenv("DEVEL_QUICKCOVER_INCLUDE"))) { |
153
|
0 |
7 |
if ((env_filter = getenv("DEVEL_QUICKCOVER_EXCLUDE"))) { |
162
|
56 |
7 |
for (i = 0 ; i < cover->size; i++) { |
166
|
12 |
44 |
if (!node || !node->bcnt) { |
|
1 |
11 |
if (!node || !node->bcnt) { |
170
|
11 |
0 |
if (include || exclude) { |
|
0 |
11 |
if (include || exclude) { |
175
|
0 |
0 |
if (include && !pregexec(include, node->file, node->file + len, node->file, 0, sv, 0)) { |
|
0 |
0 |
if (include && !pregexec(include, node->file, node->file + len, node->file, 0, sv, 0)) { |
180
|
0 |
0 |
if (exclude && pregexec(exclude, node->file, node->file + len, node->file, 0, sv, 0)) { |
|
0 |
0 |
if (exclude && pregexec(exclude, node->file, node->file + len, node->file, 0, sv, 0)) { |
185
|
4 |
7 |
if (ncount++) { |
191
|
1162 |
11 |
for (j = 1; j <= node->bmax; ++j) { |
192
|
110 |
1052 |
if (LINE_IS_COVERED(node->lines, j)) { |
193
|
99 |
11 |
if (lcount++) { |
201
|
1162 |
11 |
for (j = 1; j <= node->bmax; ++j) { |
202
|
152 |
1010 |
if (LINE_IS_PRESENT_OR_COVERED(node->lines, j)) { |
203
|
141 |
11 |
if (lcount++) { |
212
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("BEGIN" , <=, PERL_PHASE_START , 1); |
|
87 |
65 |
OUTPUT_COMPILER_PHASE("BEGIN" , <=, PERL_PHASE_START , 1); |
|
81 |
6 |
OUTPUT_COMPILER_PHASE("BEGIN" , <=, PERL_PHASE_START , 1); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("BEGIN" , <=, PERL_PHASE_START , 1); |
213
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("CHECK" , ==, PERL_PHASE_CHECK , 1); |
|
38 |
114 |
OUTPUT_COMPILER_PHASE("CHECK" , ==, PERL_PHASE_CHECK , 1); |
|
34 |
4 |
OUTPUT_COMPILER_PHASE("CHECK" , ==, PERL_PHASE_CHECK , 1); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("CHECK" , ==, PERL_PHASE_CHECK , 1); |
214
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("INIT" , ==, PERL_PHASE_INIT , 1); |
|
1 |
151 |
OUTPUT_COMPILER_PHASE("INIT" , ==, PERL_PHASE_INIT , 1); |
|
0 |
1 |
OUTPUT_COMPILER_PHASE("INIT" , ==, PERL_PHASE_INIT , 1); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("INIT" , ==, PERL_PHASE_INIT , 1); |
215
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("RUN" , ==, PERL_PHASE_RUN , 1); |
|
25 |
127 |
OUTPUT_COMPILER_PHASE("RUN" , ==, PERL_PHASE_RUN , 1); |
|
18 |
7 |
OUTPUT_COMPILER_PHASE("RUN" , ==, PERL_PHASE_RUN , 1); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("RUN" , ==, PERL_PHASE_RUN , 1); |
216
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("END" , ==, PERL_PHASE_END , 1); |
|
1 |
151 |
OUTPUT_COMPILER_PHASE("END" , ==, PERL_PHASE_END , 1); |
|
0 |
1 |
OUTPUT_COMPILER_PHASE("END" , ==, PERL_PHASE_END , 1); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("END" , ==, PERL_PHASE_END , 1); |
217
|
152 |
1010 |
OUTPUT_COMPILER_PHASE("DESTRUCT", ==, PERL_PHASE_DESTRUCT, 0); |
|
0 |
152 |
OUTPUT_COMPILER_PHASE("DESTRUCT", ==, PERL_PHASE_DESTRUCT, 0); |
|
0 |
0 |
OUTPUT_COMPILER_PHASE("DESTRUCT", ==, PERL_PHASE_DESTRUCT, 0); |
|
1162 |
11 |
OUTPUT_COMPILER_PHASE("DESTRUCT", ==, PERL_PHASE_DESTRUCT, 0); |
221
|
88 |
11 |
for (j = 0, scount = 0; j < node->subs.size; j++) { |
224
|
50 |
38 |
if (!sub_node) { |
228
|
32 |
6 |
if (scount++) { |
231
|
25 |
13 |
phase = sub_node->phase == PERL_PHASE_CONSTRUCT ? "" : |
232
|
20 |
5 |
sub_node->phase == PERL_PHASE_START ? "BEGIN" : |
246
|
113 |
183 |
if (node->bmax < line) { |
252
|
14 |
282 |
if (node->alen < needed) { |
255
|
3 |
11 |
int size = node->alen ? node->alen : COVER_INITIAL_SIZE; |
256
|
13 |
14 |
while (size < needed) { |
280
|
351 |
12 |
while (where[pos] && |
|
2 |
349 |
while (where[pos] && |
281
|
0 |
349 |
(hash != where[pos]->hash || |
306
|
0 |
361 |
if (3 * cover->used > 2 * cover->size) { |
308
|
0 |
0 |
for (i = 0; i < cover->size; i++) { |
309
|
0 |
0 |
if (!cover->list[i]) { |
322
|
349 |
12 |
if (cover->list[pos]) { |
329
|
0 |
12 |
GMEM_NEWSTR(node->file, file, -1, l); |
353
|
96 |
12 |
for (i = 0; i < cover->size ; i++) { |
355
|
57 |
39 |
if (!node) { |
377
|
26 |
0 |
if (node->phase == PERL_PHASE_CONSTRUCT) |
397
|
49 |
69 |
while (where[pos] && |
|
23 |
26 |
while (where[pos] && |
398
|
0 |
26 |
(hash != where[pos]->hash || |
425
|
7 |
58 |
if (sub_cover->size == 0) { |
429
|
5 |
60 |
if (3 * sub_cover->used > 2 * sub_cover->size) { |
431
|
40 |
5 |
for (i = 0; i < sub_cover->size; i++) { |
432
|
10 |
30 |
if (!sub_cover->list[i]) { |
447
|
26 |
39 |
if (sub_cover->list[pos]) { |
453
|
0 |
39 |
GMEM_NEWSTR(node->sub, name, -1, l); |