Branch Coverage

/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/Sub.h
Criterion Covered Total %
branch 16 34 47.0


line true false branch
62 91 0 GV* gv = CvGV((CV*)sv);
95 10 0 auto args = _get_args(va...);
3 0 auto args = _get_args(va...);
96 10 0 return CallContext::call((CV*)sv, args);
3 0 return CallContext::call((CV*)sv, args);
124 20 10 for (auto sv : list)
6 3 for (auto sv : list)
125 20 0 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
0 20 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
0 0 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
6 0 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
0 6 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
0 0 if (sv && SvTYPE(sv) > SVt_PVMG && SvTYPE(sv) != SVt_PVGV)
126 0 0 throw std::invalid_argument("one of arguments for sub.call() is not a scalar value");
0 0 throw std::invalid_argument("one of arguments for sub.call() is not a scalar value");
169 13 1 _call(cv, G_SCALAR, args, &ret, 1, nullptr);
170 13 0 return T(ret, Sv::NONE);