Branch Coverage

blib/lib/Verilog/Language.pm
Criterion Covered Total %
branch 68 130 52.3


line true false branch
313 1 21 if ($standard eq '1995' or $standard eq '1364-1995') { }
1 20 elsif ($standard eq '2001' or $standard eq '1364-2001' or $standard eq '1364-2001-noconfig') { }
1 19 elsif ($standard eq '1364-2005') { }
1 18 elsif ($standard eq 'sv31' or $standard eq '1800-2005') { }
1 17 elsif ($standard eq '1800-2009') { }
1 16 elsif ($standard eq '1800-2012') { }
16 0 elsif ($standard eq 'latest' or $standard eq '1800-2017') { }
0 0 elsif ($standard =~ /^V?AMS/) { }
360 22 952 if (defined $standard)
390 0 4 unless $_[0] =~ m[/]s
396 14 4 unless $olcmt or $cmt
398 2 18 if ($2 eq '"') { }
3 15 elsif (not $quote || $olcmt and $t eq '/*') { }
1 14 elsif (not $quote || $cmt and $t eq '//') { }
3 11 elsif ($cmt and $t eq '*/') { }
1 10 elsif ($t eq "\n") { }
411 8 1 unless $olcmt or $cmt
422 2 1 if ($number =~ /^\s*([0-9]+)\s*\'/i)
430 1 0 if ($number =~ /\'\s*s/i)
439 2 16 if ($number =~ /\'s?h([0-9a-f]+)$/i) { }
1 15 elsif ($number =~ /\'s?o([0-9a-f]+)$/i) { }
4 11 elsif ($number =~ /\'s?b([0-1]+)$/i) { }
8 3 elsif ($number =~ /\'s?d?([0-9]+)$/i or $number =~ /^(-?[0-9]+)$/i) { }
449 6 2 $bit == '1' ? :
463 0 0 if ($number =~ /\'s?h([0-9a-f]+)$/i) { }
0 0 elsif ($number =~ /\'s?o([0-9a-f]+)$/i) { }
0 0 elsif ($number =~ /\'s?b([0-1]+)$/i) { }
0 0 elsif ($number =~ /\'s?d?0*([0-9]+)$/i or $number =~ /^0*([0-9]+)$/i) { }
493 0 0 if ($number =~ /\'s?h([0-9a-f]+)$/i) { }
0 0 elsif ($number =~ /\'s?o([0-9a-f]+)$/i) { }
0 0 elsif ($number =~ /\'s?b([0-1]+)$/i) { }
0 0 elsif ($number =~ /\'s?d?([0-9]+)$/i or $number =~ /^([0-9]+)$/i) { }
503 0 0 if $digit & 4
504 0 0 if $digit & 2
505 0 0 if $digit & 1
524 1 3 if (not $bus =~ /\[/) { }
1 2 elsif ($bus =~ /^([^\[]+\[)([0-9]+):([0-9]+)(\][^\]]*)$/) { }
531 0 1 if ($2 >= $3) { }
550 3 21 if (/^\[/)
554 5 19 unless ($inbra)
559 4 15 if (/[\],]/) { }
4 11 elsif (/:/) { }
560 4 0 if (defined $beg)
564 4 0 if ($beg >= $end) { }
576 3 1 if (/^\]/) { }
1 0 elsif (/,/) { }
588 7 4 if ($inbra == 1) { }
3 1 elsif ($inbra == 2) { }
1 0 elsif ($inbra == 3) { }
605 0 1 if ($len < 0)
609 1 0 if $max_size < $len
630 0 0 if (not $bus =~ /:/) { }
0 0 elsif ($bus =~ /^([^\[]+\[)([0-9]+):([0-9]+)(\][^\]]*)$/) { }
637 0 0 if ($2 >= $3) { }
656 0 0 if (/^\[/)
660 0 0 unless ($inbra)
665 0 0 if (/[\]]/) { }
0 0 elsif (/:/) { }
666 0 0 if (defined $beg)
670 0 0 if ($beg >= $end) { }
682 0 0 if (/^\]/)
691 0 0 if ($inbra == 1) { }
0 0 elsif ($inbra == 2) { }
705 0 0 if ($len < 0)
709 0 0 if $max_size < $len