Branch Coverage

blib/lib/Dpkg/Arch.pm
Criterion Covered Total %
branch 87 98 88.7


line true false branch
130 0 0 if defined $build_arch
140 0 0 if $? >> 8
165 0 7 if defined $cc_host_gnu_type{$CC}
170 1 6 if ($? >> 8) { }
199 46 5 if defined $host_arch
203 0 5 if ($host_gnu_type eq '') { }
210 5 0 if (defined $host_arch) { }
220 0 5 unless (defined $host_arch)
256 1078 812 if defined $arch
268 157094 23 if $table_loaded{$table}
273 0 23 unless open my $table_fh, '<', "$Dpkg::DATADIR/$table"
286 245 126 if (/^(?!\#)(\S+)\s+(\S+)\s+(\S+)\s+(\S+)\s+(\S+)/)
299 162 96 if (/^(?!\#)(\S+)\s+(\S+)\s+(\S+)/)
310 9 33 if (/^(?!\#)(\S+)\s+(\S+)/)
321 231 154 if (/^(?!\#)(\S+)\s+(\S+)/)
325 105 126 if ($debtuple =~ //) { }
331 28 3647 if exists $debarch_to_debtuple{$da} or exists $debtuple_to_debarch{$dt}
353 0 7 unless defined $abi and defined $libc and defined $os and defined $cpu and exists $cputable{$cpu} and exists $ostable{"$abi-$libc-$os"}
360 1 7 unless defined $gnu
362 0 7 unless defined $gnu_cpu and defined $gnu_os
370 6 53 if ($gnu_cpu =~ /^$cputable_re{$_cpu}$/)
377 6 93 if ($gnu_os =~ /^(.*-)?$ostable_re{$_os}$/)
383 1 6 unless defined $cpu and defined $os
398 1 1 if ($cpu =~ /^i[4567]86$/) { }
424 3 1898 if (not defined $abi && defined $libc && defined $os && defined $cpu) { }
1085 813 elsif (exists $debtuple_to_debarch{"$abi-$libc-$os-$cpu"}) { }
437 2 55979 unless defined $arch
441 6 55973 if ($arch =~ /^linux-([^-]*)/)
448 55962 17 if (defined $tuple) { }
450 55959 3 if wantarray
493 16249 300 if (&any(sub { $_ eq 'any'; } , @tuple)) { }
494 10098 6151 if (scalar @tuple == 4) { }
4477 1674 elsif (scalar @tuple == 3) { }
1673 1 elsif (scalar @tuple == 2) { }
513 41325 1 if (defined $cpu) { }
527 2 1 if (defined $cpu) { }
545 3 7 if $a eq $b
550 4 3 if scalar @a != 4 or scalar @b != 4
566 612 13779 if $alias eq $real or $alias eq 'any'
571 3 13776 if scalar @real != 4 or scalar @alias != 4
573 13477 293 if ($alias[0] eq $real[0] || $alias[0] eq 'any' and $alias[1] eq $real[1] || $alias[1] eq 'any' and $alias[2] eq $real[2] || $alias[2] eq 'any' and $alias[3] eq $real[3] || $alias[3] eq 'any')
593 1 2770 if $arch eq 'all'
597 1 2769 if scalar @tuple != 4
598 2768 1 if &any(sub { $_ eq 'any'; } , @tuple)
616 6 27 if ($opts{'positive'}) { }
638 221 148 if ($arch =~ /^!/) { }
28 120 elsif (&debarch_is($host_arch, $arch)) { }
642 44 177 if (&debarch_is($host_arch, $not_arch)) { }
673 2 22 if (debarch_is_illegal($arch, %opts))