Branch Coverage

apidocs.perl
Criterion Covered Total %
branch 37 52 71.1


line true false branch
29 0 104 unless open SRC, "< $file"
32 156 67832 if (/^=item (\w+)\b/ and $funcs{$1}) { }
156 67676 elsif ($func and /^=(cut|head)/) { }
1649 66027 elsif ($func) { }
38 156 0 if ($funcs{$func})
41 147 9 if ($category)
45 69 87 if ($synopsis)
48 140 16 unless defined $order
57 147 1502 if (/^=category (.*)/) { }
90 1412 elsif (/^=synopsis (.*)/) { }
16 1396 elsif (/^=order (.*)$/) { }
61 69 21 unless (length $synopsis)
69 0 16 unless $order =~ /^\d+$/
78 0 104 if $func
83 0 1 unless open OUT, "> $outname"
119 0 55 unless $order{$a} <=> $order{$b}
138 0 37 unless $order{$a} <=> $order{$b}
150 1 0 if (grep $alldocs{$_}, keys %undoc)
153 0 0 unless $order{$a} <=> $order{$b}
162 1 0 if (keys %undoc)
202 0 1 unless open FUNCS, "< imexttypes.h"
206 1 280 if /^typedef struct/
207 137 102 if ($in_struct and not /SKIP/ and /\(\*f_(i[om]?_\w+)/)
212 1 280 if (/^\} im_ext_funcs;$/)
213 0 1 unless $in_struct
220 0 0 if ($in_struct) { }