Branch Coverage

lib/Net/Prometheus/PerlCollector.xs
Criterion Covered Total %
branch 35 46 76.0


line true false branch
64 2 2 if(detail)
66 1 3 if(detail > 1)
69 1327 4 for(arena = PL_sv_arenaroot; arena; arena = (SV *)SvANY(arena)) {
75 224263 1327 for(sv = arena + 1; sv < arenaend; sv++)
76 223768 495 if(SvTYPE(sv) != 0xFF && SvREFCNT(sv)) {
223768 0 if(SvTYPE(sv) != 0xFF && SvREFCNT(sv)) {
79 111947 111821 if(svs_by_type) {
82 111929 18 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
111929 0 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
84 56005 55942 if(svs_by_class && SvOBJECT(sv)) {
274 55731 if(svs_by_class && SvOBJECT(sv)) {
85 274 0 char *class = HvNAME(SvSTASH(sv));
274 0 char *class = HvNAME(SvSTASH(sv));
0 274 char *class = HvNAME(SvSTASH(sv));
0 0 char *class = HvNAME(SvSTASH(sv));
274 0 char *class = HvNAME(SvSTASH(sv));
0 274 char *class = HvNAME(SvSTASH(sv));
87 251 23 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
251 0 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
93 0 4 EXTEND(SP, 3);
96 2 2 if(svs_by_type)
98 1 3 if(svs_by_class)
100 2 2 XSRETURN(2 + !!svs_by_type + !!svs_by_class);