/usr/local/lib/perl5/site_perl/5.26.1/x86_64-linux/XS/Framework.x/i/xs/Simple.h | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 18 | 27.7 |
line | true | false | branch |
---|---|---|---|
53 | 0 | 0 | Simple (SV* sv, bool policy = INCREMENT) : Scalar(sv, policy) { _validate(); } |
157 | 0 | 54 | if (!sv) return T(); |
159 | 49 | 5 | const char* buf = SvPV_nomg(sv, len); |
5 | 0 | const char* buf = SvPV_nomg(sv, len); | |
160 | 54 | 0 | return T(buf, len); |
193 | 0 | 0 | if (!sv) return; |
194 | 0 | 0 | if (SvTYPE(sv) > SVt_PVMG || SvROK(sv)) { |
0 | 0 | if (SvTYPE(sv) > SVt_PVMG || SvROK(sv)) { | |
196 | 0 | 0 | throw std::invalid_argument("SV is not a number or string"); |