line |
true |
false |
branch |
198
|
0 |
13 |
unless (defined $result) |
200
|
0 |
0 |
if ($$self{'verbose'}) |
206
|
0 |
13 |
if (${$c;} =~ / \G\S /cgmsx) |
208
|
0 |
0 |
if ($$self{'verbose'}) |
231
|
0 |
23942 |
unless (defined $block) |
235
|
756 |
23186 |
unless ($block) |
239
|
6362 |
16824 |
if ($$block{'type'} eq 'block' or $$block{'type'} eq 'op') { } |
250
|
0 |
13 |
if (@stack > 0) |
252
|
0 |
0 |
if ($$self{'verbose'}) |
271
|
756 |
23186 |
if (${$c;} =~ / \G($starts)\s* /cgmosx) |
275
|
756 |
0 |
if ($self->_parseBlocks($c, $blocks, $endings{$type})) { } |
286
|
756 |
22430 |
if (defined $end and ${$c;} =~ / \G$end\s* /cgmsx) |
292
|
0 |
22430 |
if (${$c;} =~ / \G($ends)\s* /cgmosx) |
295
|
0 |
0 |
if ($$self{'verbose'}) |
297
|
0 |
0 |
if ($end) { } |
310
|
3 |
22427 |
if (${$c;} =~ / \G BI \b /msx) |
313
|
0 |
3 |
unless ($img) |
315
|
0 |
0 |
if ($$self{'verbose'}) |
339
|
5603 |
16824 |
if (${$c;} =~ / \G([A-Za-z\'\"][*\w]*)\s* /cgmsx) |
368
|
373 |
2789 |
if ($$block{'type'} eq 'block') { } |
|
0 |
2789 |
elsif ($$block{'type'} ne 'op') { } |
370
|
0 |
373 |
unless $self->validate($$block{'value'}) |
374
|
0 |
0 |
if ($$self{'verbose'}) |
382
|
3162 |
0 |
if ($syntax) |
384
|
89 |
3073 |
if ($$syntax[0] and $$syntax[0] eq '...') { } |
|
0 |
3073 |
elsif (@{$$block{'args'};} != @{$syntax;}) { } |
391
|
0 |
0 |
if ($$self{'verbose'}) |
408
|
8242 |
4 |
if $$arg{'type'} eq $type |
409
|
4 |
0 |
if $type eq 'integer' and $$arg{'type'} eq 'number' and $$arg{'value'} =~ / \A\d+\z /msx |
410
|
0 |
0 |
if $type eq 'string' and $$arg{'type'} eq 'hexstring' |
413
|
0 |
0 |
if ($$self{'verbose'}) |
440
|
2 |
9 |
unless ($loaded{$renderer}) |
442
|
0 |
2 |
unless (eval "require $renderer") |
470
|
0 |
6 |
$skip_text ? : |
502
|
11 |
745 |
unless ($gs) |
517
|
2655 |
3667 |
if ($gs->can($func)) |
529
|
745 |
5577 |
if ($$block{'type'} eq 'block') |
532
|
328 |
417 |
if ($$block{'name'} ne 'q') |
558
|
1 |
37 |
if ($$block{'name'} eq 'BI') { } |
569
|
10 |
27 |
if ($$block{'type'} eq 'block') |
585
|
756 |
22433 |
if ($type eq 'block') { } |
|
5606 |
16827 |
elsif ($type eq 'op') { } |