Branch Coverage

blib/lib/WAP/wmls/gen.pm
Criterion Covered Total %
branch 0 460 0.0


line true false branch
344 0 0 if defined $VERBOSE
352 0 0 if defined $VERBOSE
361 0 0 if defined $VERBOSE
371 0 0 if defined $VERBOSE
381 0 0 if defined $VERBOSE
392 0 0 if defined $VERBOSE
402 0 0 if defined $VERBOSE
414 0 0 if defined $VERBOSE
425 0 0 if defined $VERBOSE
436 0 0 if defined $VERBOSE
444 0 0 if defined $VERBOSE
453 0 0 if defined $VERBOSE
463 0 0 if defined $VERBOSE
472 0 0 if defined $VERBOSE
482 0 0 if defined $VERBOSE
493 0 0 if defined $VERBOSE
502 0 0 if defined $VERBOSE
511 0 0 if defined $VERBOSE
520 0 0 if defined $VERBOSE
531 0 0 if defined $VERBOSE
542 0 0 if defined $VERBOSE
552 0 0 if (defined $comment) { }
553 0 0 if defined $VERBOSE
557 0 0 if defined $VERBOSE
572 0 0 unless open $IN, '<', $filename
579 0 0 if (defined $WAP::wmls::asm::VERBOSE)
584 0 0 if $line
632 0 0 if ($$def{'NbUse'} == 0) { }
633 0 0 unless ($$self{'action'})
638 0 0 unless ($$self{'action'})
674 0 0 if defined $$opcode{'Value'}
714 0 0 unless ($$self{'action'})
715 0 0 if (exists $$self{'cst'}{'TYPE_UTF8_STRING'}{$value})
721 0 0 if ($$self{'action'}) { }
722 0 0 unless exists $$opcode{'Doublon'}
748 0 0 if ($type eq 'TYPE_INTEGER') { }
0 0 elsif ($type eq 'TYPE_FLOAT') { }
755 0 0 if ($type eq 'TYPE_BOOLEAN' or $type eq 'TYPE_INVALID')
760 0 0 unless ($$self{'action'})
761 0 0 if (exists $$self{'cst'}{$type}{$value})
767 0 0 if ($type eq 'TYPE_INTEGER') { }
0 0 elsif ($type eq 'TYPE_FLOAT') { }
0 0 elsif ($type eq 'TYPE_UTF8_STRING') { }
0 0 elsif ($type eq 'TYPE_STRING') { }
768 0 0 if $value >= -1 and $value <= 1
769 0 0 if ($value >= -128 and $value <= 127) { }
0 0 elsif ($value >= -32768 and $value <= 32767) { }
770 0 0 if ($$self{'action'}) { }
771 0 0 unless exists $$opcode{'Doublon'}
782 0 0 if ($$self{'action'}) { }
783 0 0 unless exists $$opcode{'Doublon'}
794 0 0 if ($$self{'action'}) { }
795 0 0 unless exists $$opcode{'Doublon'}
807 0 0 if ($$self{'action'}) { }
808 0 0 unless exists $$opcode{'Doublon'}
819 0 0 unless length $value
820 0 0 if ($$self{'action'}) { }
821 0 0 unless exists $$opcode{'Doublon'}
835 0 0 unless length $value
836 0 0 if ($$self{'action'}) { }
837 0 0 unless exists $$opcode{'Doublon'}
884 0 0 if ($$self{'action'}) { }
901 0 0 if ($$self{'action'}) { }
925 0 0 if (defined $pragma3) { }
927 0 0 if ($$self{'action'}) { }
940 0 0 if ($$self{'action'}) { }
1056 0 0 if ($$self{'action'}) { }
1063 0 0 if defined $func
1069 0 0 if ($nb > 255) { }
1078 0 0 if defined $func
1098 0 0 if (defined $func)
1101 0 0 if ($opcode->isa('LoadVar') or $opcode->isa('StoreVar') or $opcode->isa('IncrVar') or $opcode->isa('DecrVar') or $opcode->isa('AddAsg') or $opcode->isa('SubAsg'))
1108 0 0 if ($$def{'ID'} == 65535)
1121 0 0 if ($$self{'action'})
1126 0 0 unless $vindex <= 255
1128 0 0 if ($vindex <= 31) { }
1129 0 0 if ($$self{'action'})
1135 0 0 if ($$self{'action'})
1140 0 0 if ($$self{'action'})
1149 0 0 if ($$self{'action'})
1154 0 0 unless $vindex <= 255
1156 0 0 if ($vindex <= 15) { }
1157 0 0 if ($$self{'action'})
1163 0 0 if ($$self{'action'})
1168 0 0 if ($$self{'action'})
1177 0 0 if ($$self{'action'})
1182 0 0 unless $vindex <= 255
1184 0 0 if ($vindex <= 7) { }
1185 0 0 if ($$self{'action'})
1191 0 0 if ($$self{'action'})
1196 0 0 if ($$self{'action'})
1207 0 0 unless $vindex <= 255
1209 0 0 if ($$self{'action'})
1223 0 0 unless $vindex <= 255
1225 0 0 if ($$self{'action'})
1239 0 0 unless $vindex <= 255
1241 0 0 if ($$self{'action'})
1253 0 0 if ($$self{'action'})
1264 0 0 if ($$self{'action'})
1276 0 0 if ($$self{'action'})
1288 0 0 if ($$self{'action'})
1300 0 0 if ($$self{'action'})
1312 0 0 if ($$self{'action'})
1324 0 0 if ($$self{'action'})
1336 0 0 if ($$self{'action'})
1341 0 0 if ($$def{'Type'} ne 'UNDEF_FUNC') { }
1344 0 0 unless $nb_args <= 255
1346 0 0 unless $findex <= 255
1348 0 0 if ($nb_args != $$opcode{'Index'}) { }
0 0 elsif ($findex <= 7) { }
1352 0 0 if ($$self{'action'})
1358 0 0 if ($$self{'action'})
1363 0 0 if ($$self{'action'})
1376 0 0 if ($$self{'action'})
1382 0 0 unless $findex <= 255
1384 0 0 if ($findex <= 7 and $lindex <= 255) { }
0 0 elsif ($lindex <= 255) { }
1385 0 0 if ($$self{'action'})
1391 0 0 if ($$self{'action'})
1397 0 0 if ($$self{'action'})
1402 0 0 if ($$self{'action'})
1411 0 0 if ($$self{'action'})
1418 0 0 unless $urlindex <= 65535 and $findex <= 65535
1420 0 0 unless $nb_args <= 255
1422 0 0 if ($urlindex <= 255 and $findex <= 255) { }
1423 0 0 if ($$self{'action'})
1429 0 0 if ($$self{'action'})
1434 0 0 if ($$self{'action'})
1446 0 0 if ($dest > $$self{'size'}) { }
1448 0 0 if ($offset <= 32) { }
0 0 elsif ($offset <= 257) { }
0 0 elsif ($offset <= 65538) { }
1449 0 0 if ($$self{'action'})
1455 0 0 if ($$self{'action'})
1461 0 0 if ($$self{'action'})
1467 0 0 if ($$self{'action'})
1475 0 0 if ($offset <= 31) { }
0 0 elsif ($offset <= 255) { }
0 0 elsif ($offset <= 65535) { }
1476 0 0 if ($$self{'action'})
1482 0 0 if ($$self{'action'})
1488 0 0 if ($$self{'action'})
1494 0 0 if ($$self{'action'})
1500 0 0 if ($$self{'action'})
1512 0 0 if ($dest > $$self{'size'}) { }
1514 0 0 if ($offset <= 32) { }
0 0 elsif ($offset <= 257) { }
0 0 elsif ($offset <= 65538) { }
1515 0 0 if ($$self{'action'})
1521 0 0 if ($$self{'action'})
1527 0 0 if ($$self{'action'})
1533 0 0 if ($$self{'action'})
1541 0 0 if ($offset <= 255) { }
0 0 elsif ($offset <= 65535) { }
1542 0 0 if ($$self{'action'})
1548 0 0 if ($$self{'action'})
1554 0 0 if ($$self{'action'})
1560 0 0 if ($$self{'action'})
1569 0 0 if ($$self{'action'})
1572 0 0 if ($oper eq 'typeof') { }
0 0 elsif ($oper eq 'isvalid') { }
0 0 elsif ($oper eq '-') { }
0 0 elsif ($oper eq '~') { }
0 0 elsif ($oper eq '!') { }
0 0 elsif ($oper eq '++') { }
0 0 elsif ($oper eq '--') { }
1605 0 0 if ($$self{'action'})
1608 0 0 if ($oper eq '+') { }
0 0 elsif ($oper eq '-') { }
0 0 elsif ($oper eq '*') { }
0 0 elsif ($oper eq '/') { }
0 0 elsif ($oper eq 'div') { }
0 0 elsif ($oper eq '%') { }
0 0 elsif ($oper eq '<<') { }
0 0 elsif ($oper eq '>>') { }
0 0 elsif ($oper eq '>>>') { }
0 0 elsif ($oper eq '<') { }
0 0 elsif ($oper eq '>') { }
0 0 elsif ($oper eq '<=') { }
0 0 elsif ($oper eq '>=') { }
0 0 elsif ($oper eq '==') { }
0 0 elsif ($oper eq '!=') { }
0 0 elsif ($oper eq '&') { }
0 0 elsif ($oper eq '^') { }
0 0 elsif ($oper eq '|') { }
1674 0 0 if ($$self{'action'})
1680 0 0 if ($type eq 'TYPE_INVALID') { }
0 0 elsif ($type eq 'TYPE_BOOLEAN') { }
0 0 elsif ($type eq 'TYPE_STRING' or $type eq 'TYPE_UTF8_STRING') { }
0 0 elsif ($type eq 'TYPE_FLOAT') { }
0 0 elsif ($type eq 'TYPE_INTEGER') { }
1681 0 0 if ($$self{'action'})
1688 0 0 if ($$self{'action'})
1689 0 0 if ($value) { }
1701 0 0 if (length $value == 0) { }
1702 0 0 if ($$self{'action'})
1715 0 0 unless $cindex <= 65535
1717 0 0 if ($cindex <= 15) { }
0 0 elsif ($cindex <= 255) { }
1718 0 0 if ($$self{'action'})
1724 0 0 if ($$self{'action'})
1730 0 0 if ($$self{'action'})
1735 0 0 if ($$self{'action'})
1740 0 0 if ($value == 0) { }
0 0 elsif ($value == 1) { }
0 0 elsif ($value == -1) { }
1741 0 0 if ($$self{'action'})
1748 0 0 if ($$self{'action'})
1755 0 0 if ($$self{'action'})
1782 0 0 if (exists $parser->YYData->{'nb_error'}) { }
1789 0 0 if exists $parser->YYData->{'verbose_error'} and $parser->YYData->{'verbose_error'}
1799 0 0 if (exists $parser->YYData->{'nb_warning'}) { }
1806 0 0 if exists $parser->YYData->{'verbose_warning'} and $parser->YYData->{'verbose_warning'}
1819 0 0 if defined $parser->YYData->{'PragmaList'}
1821 0 0 if defined $parser->YYData->{'FunctionList'}
1824 0 0 if $NumberOfConstants > 65535
1831 0 0 if defined $parser->YYData->{'PragmaList'}
1834 0 0 if $NumberOfPragmas > 65535
1843 0 0 if $NumberOfFunctions > 255
1849 0 0 if $$def{'Type'} ne 'PUBLIC_FUNC'
1855 0 0 unless $NumberOfFunctionNames
1859 0 0 if defined $parser->YYData->{'FunctionList'}
1863 0 0 unless (exists $parser->YYData->{'nb_error'})
1867 0 0 unless open $WAP::wmls::asm::OUT, '>', $filename
1882 0 0 if defined $parser->YYData->{'PragmaList'}
1884 0 0 if defined $parser->YYData->{'FunctionList'}
1891 0 0 if defined $parser->YYData->{'PragmaList'}
1901 0 0 if $$def{'Type'} ne 'PUBLIC_FUNC'
1907 0 0 if defined $parser->YYData->{'FunctionList'}
1911 0 0 if exists $parser->YYData->{'nb_error'}