| /usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/Hash.h | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 14 | 57.1 |
| line | true | false | branch |
|---|---|---|---|
| 174 | 0 | 43 | if (!sv) return; |
| 175 | 3 | 40 | if (SvTYPE(sv) == SVt_PVHV) return; |
| 176 | 35 | 5 | if (SvROK(sv)) { // reference to hash? |
| 178 | 35 | 0 | if (SvTYPE(val) == SVt_PVHV) { |
| 179 | 35 | 0 | Sv::operator=(val); |
| 183 | 5 | 0 | if (is_undef()) return reset(); |
| 185 | 0 | 0 | throw std::invalid_argument("SV is not a Hash or Hash reference"); |