line |
true |
false |
branch |
76
|
227 |
1 |
if (SvROK (sv)) |
79
|
2 |
226 |
if (SvTYPE (sv) == SVt_PVGV) |
81
|
2 |
0 |
if (isGV_with_GP (sv)) |
|
0 |
2 |
if (isGV_with_GP (sv)) |
|
0 |
0 |
if (isGV_with_GP (sv)) |
84
|
2 |
0 |
IO *io = GvIO (gv); |
|
0 |
2 |
IO *io = GvIO (gv); |
|
0 |
0 |
IO *io = GvIO (gv); |
|
2 |
0 |
IO *io = GvIO (gv); |
85
|
2 |
0 |
if (io) |
151
|
75 |
0 |
if (SvTYPE (sv) >= SVt_PVMG) |
155
|
75 |
75 |
for (tmp = SvMAGIC(sv); tmp; |
157
|
75 |
0 |
if ((tmp -> mg_type == PERL_MAGIC_ext) && |
|
75 |
0 |
if ((tmp -> mg_type == PERL_MAGIC_ext) && |
163
|
75 |
0 |
return (mg) ? mg -> mg_ptr : NULL; |
205
|
14 |
0 |
if (!o || !curop || ( |
|
14 |
0 |
if (!o || !curop || ( |
|
0 |
14 |
if (!o || !curop || ( |
|
0 |
0 |
if (!o || !curop || ( |
|
14 |
0 |
if (!o || !curop || ( |
206
|
0 |
0 |
opnext ? o->op_next == curop && o->op_type != OP_SCOPE : o == curop |
|
0 |
0 |
opnext ? o->op_next == curop && o->op_type != OP_SCOPE : o == curop |
210
|
0 |
0 |
if (o->op_flags & OPf_KIDS) |
214
|
0 |
0 |
for (kid = cUNOPo->op_first; kid; kid = OpSIBLING (kid)) |
|
0 |
0 |
for (kid = cUNOPo->op_first; kid; kid = OpSIBLING (kid)) |
218
|
0 |
0 |
if (kid->op_type == OP_NULL && kid->op_targ == OP_NEXTSTATE) |
|
0 |
0 |
if (kid->op_type == OP_NULL && kid->op_targ == OP_NEXTSTATE) |
223
|
0 |
0 |
if (new_cop) |
240
|
14 |
0 |
cop = zmq_closest_cop (aTHX_ PL_curcop, OpSIBLING(PL_curcop), PL_op, FALSE); |
241
|
0 |
14 |
if (cop == NULL) |
244
|
14 |
0 |
if (CopLINE (cop)) |
246
|
14 |
0 |
e -> file = CopFILE (cop); |
288
|
1805 |
1 |
if (!(sv_isobject (sv) && sv_derived_from (sv, SvPV_nolen (full_type)))) |
|
1805 |
0 |
if (!(sv_isobject (sv) && sv_derived_from (sv, SvPV_nolen (full_type)))) |
|
0 |
1805 |
if (!(sv_isobject (sv) && sv_derived_from (sv, SvPV_nolen (full_type)))) |
289
|
1 |
0 |
croak_usage ("Argument is not of type %s @ (%s:%d)\n", |
292
|
1805 |
0 |
return INT2PTR (void *, SvIV ((SV *) SvRV (sv))); |
367
|
3 |
4 |
if (zmq_has (f)) |