/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"); |