Branch Coverage

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


line true false branch
64 2 5 if(detail)
66 1 6 if(detail > 1)
69 2438 7 for(arena = PL_sv_arenaroot; arena; arena = (SV *)SvANY(arena)) {
75 412022 2438 for(sv = arena + 1; sv < arenaend; sv++)
76 410904 1118 if(SvTYPE(sv) != 0xFF && SvREFCNT(sv)) {
410904 0 if(SvTYPE(sv) != 0xFF && SvREFCNT(sv)) {
79 115519 295385 if(svs_by_type) {
82 115501 18 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
115501 0 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
84 57828 57691 if(svs_by_class && SvOBJECT(sv)) {
361 57467 if(svs_by_class && SvOBJECT(sv)) {
85 361 0 char *class = HvNAME(SvSTASH(sv));
361 0 char *class = HvNAME(SvSTASH(sv));
0 361 char *class = HvNAME(SvSTASH(sv));
0 0 char *class = HvNAME(SvSTASH(sv));
361 0 char *class = HvNAME(SvSTASH(sv));
0 361 char *class = HvNAME(SvSTASH(sv));
87 338 23 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
338 0 sv_setiv(*countp, SvIOK(*countp) ? SvIV(*countp) + 1 : 1);
93 0 7 EXTEND(SP, 4);
96 2 5 if(svs_by_type)
98 1 6 if(svs_by_class)
100 5 2 XSRETURN(2 + !!svs_by_type + !!svs_by_class);