/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/Object.h | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 18 | 33.3 |
line | true | false | branch |
---|---|---|---|
22 | 0 | 0 | Object (const Sv& oth) : Sv(oth) { _validate(); } |
89 | 0 | 148 | if (!sv) return; |
90 | 0 | 148 | if (SvOBJECT(sv)) return; |
91 | 148 | 0 | if (SvROK(sv)) { // reference to object? |
93 | 148 | 0 | if (SvOBJECT(val)) { |
94 | 148 | 0 | _ref = sv; |
95 | 148 | 0 | Sv::operator=(val); |
99 | 0 | 0 | if (is_undef()) return reset(); |
101 | 0 | 0 | throw std::invalid_argument("SV is not an Object (blessed value or reference to blessed value)"); |