Branch Coverage

/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/Ref.h
Criterion Covered Total %
branch 5 14 35.7


line true false branch
10 13 0 Ref (SV* sv, bool policy = INCREMENT) : Scalar(sv, policy) { _validate(); }
27 13 0 if (sv) rv = (policy == INCREMENT) ? newRV(sv) : newRV_noinc(sv);
13 0 if (sv) rv = (policy == INCREMENT) ? newRV(sv) : newRV_noinc(sv);
102 0 193 if (!sv) return;
103 193 0 if (SvROK(sv)) return;
104 0 0 if (is_undef()) return reset();
106 0 0 throw std::invalid_argument("wrong SV* type for Ref");