| line |
true |
false |
branch |
|
41
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
|
0 |
0 |
if (SvAMAGIC(left) || SvAMAGIC(right)) |
|
44
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
|
0 |
0 |
if (SvIV_please_nomg(right) && SvIV_please_nomg(left)) { |
|
45
|
0 |
0 |
if (!SvUOK(left)) { |
|
47
|
0 |
0 |
if (!SvUOK(right)) { |
|
53
|
0 |
0 |
if (leftiv < 0) |
|
62
|
0 |
0 |
if (SvUOK(right)) { |
|
71
|
0 |
0 |
if (rightiv < 0) |
|
95
|
0 |
0 |
if (lnv < rnv) |
|
97
|
0 |
0 |
if (lnv > rnv) |
|
99
|
0 |
0 |
if (lnv == rnv) |
|
146
|
0 |
0 |
for (i=PadnamelistMAX(pad_namelist); i>=0; --i) { |
|
148
|
0 |
0 |
if (name_pn) { |
|
150
|
0 |
0 |
if (name_str) { |
|
152
|
0 |
0 |
if (PadnameIsOUR(name_pn)) |
|
155
|
0 |
0 |
if (strEQ(name_str, "$a") || strEQ(name_str, "$b")) |
|
|
0 |
0 |
if (strEQ(name_str, "$a") || strEQ(name_str, "$b")) |
|
158
|
0 |
0 |
if (!((PadnameFLAGS(name_pn)) & SVf_OK)) |
|
252
|
0 |
0 |
for (i = len; i > idx+1; i--) { |
|
257
|
0 |
0 |
if (!av_store(av, idx+1, what)) |
|
265
|
0 |
0 |
if ( sv_isobject( sv ) ) |
|
272
|
0 |
0 |
PUSHMARK(SP); |
|
273
|
0 |
0 |
XPUSHs( sv_2mortal( newSVsv( sv ) ) ); |
|
274
|
0 |
0 |
XPUSHs( sv_2mortal( newSVpv( like, strlen(like) ) ) ); |
|
277
|
0 |
0 |
if ( ( count = call_pv("overload::Method", G_SCALAR) ) ) { |
|
283
|
0 |
0 |
if ( SvTRUE(ST(0)) ) |
|
288
|
0 |
0 |
FREETMPS; |
|
298
|
0 |
0 |
return SvROK(sv) && ( SVt_PVAV == SvTYPE(SvRV(sv) ) ); |
|
|
0 |
0 |
return SvROK(sv) && ( SVt_PVAV == SvTYPE(SvRV(sv) ) ); |
|
304
|
0 |
0 |
SvGETMAGIC(code); |
|
|
0 |
0 |
SvGETMAGIC(code); |
|
305
|
0 |
0 |
return SvROK(code) && ( ( SVt_PVCV == SvTYPE(SvRV(code)) ) || ( is_like(aTHX_ code, "&{}" ) ) ); |
|
|
0 |
0 |
return SvROK(code) && ( ( SVt_PVCV == SvTYPE(SvRV(code)) ) || ( is_like(aTHX_ code, "&{}" ) ) ); |
|
|
0 |
0 |
return SvROK(code) && ( ( SVt_PVCV == SvTYPE(SvRV(code)) ) || ( is_like(aTHX_ code, "&{}" ) ) ); |
|
313
|
0 |
0 |
SvGETMAGIC(array); |
|
|
0 |
0 |
SvGETMAGIC(array); |
|
314
|
0 |
0 |
return is_array(array) || is_like(aTHX_ array, "@{}" ); |
|
|
0 |
0 |
return is_array(array) || is_like(aTHX_ array, "@{}" ); |
|
329
|
0 |
0 |
if (args) { |
|
330
|
0 |
0 |
for (i = 0; i < args->navs; ++i) |
|
349
|
0 |
0 |
if (args) { |
|
350
|
0 |
0 |
for (i = 0; i < args->nsvs; ++i) |
|
368
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
382
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
397
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
411
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
426
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
427
|
0 |
0 |
if (found) |
|
442
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
456
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
471
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
485
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
|
0 |
0 |
FALSE_JUNCTION; |
|
500
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
|
0 |
0 |
TRUE_JUNCTION; |
|
501
|
0 |
0 |
if (found) |
|
515
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) count++); |
|
516
|
0 |
0 |
RETVAL = count; |
|
528
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
|
0 |
0 |
FOR_EACH(if (!SvTRUE(*PL_stack_sp)) count++); |
|
529
|
0 |
0 |
RETVAL = count; |
|
541
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { RETVAL = i-1; break; }); |
|
553
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = args[i]); break; }); |
|
565
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { SvREFCNT_inc(RETVAL = *PL_stack_sp); break; }); |
|
578
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {RETVAL = -1; break;} RETVAL = i-1; }); |
|
591
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;} SvREFCNT_inc(RETVAL = args[i]); }); |
|
604
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
|
0 |
0 |
FOR_EACH(if (SvTRUE(*PL_stack_sp)) { if (found++) {SvREFCNT_dec(RETVAL); RETVAL = &PL_sv_undef; break;}SvREFCNT_inc(RETVAL = *PL_stack_sp); }); |
|
623
|
0 |
0 |
if (!codelike(code)) |
|
628
|
0 |
0 |
if (items > 1) { |
|
630
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
633
|
0 |
0 |
for (i = items-1 ; i > 0 ; --i) { |
|
636
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
641
|
0 |
0 |
POP_MULTICALL; |
|
663
|
0 |
0 |
if (!codelike(code)) |
|
666
|
0 |
0 |
if (items > 1) { |
|
668
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
671
|
0 |
0 |
for (i = items-1 ; i > 0 ; --i) { |
|
674
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
680
|
0 |
0 |
POP_MULTICALL; |
|
702
|
0 |
0 |
if (!codelike(code)) |
|
705
|
0 |
0 |
if (items > 1) { |
|
707
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
710
|
0 |
0 |
for (i = items-1 ; i > 0 ; --i) { |
|
713
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
719
|
0 |
0 |
POP_MULTICALL; |
|
742
|
0 |
0 |
if (!codelike(code)) |
|
744
|
0 |
0 |
if (!arraylike(avref)) |
|
752
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
755
|
0 |
0 |
for (i = 0; i <= len ; ++i) { |
|
758
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
764
|
0 |
0 |
POP_MULTICALL; |
|
766
|
0 |
0 |
if (RETVAL) { |
|
791
|
0 |
0 |
if (!arraylike(avref)) |
|
797
|
0 |
0 |
if (SvTRUE(string)) |
|
802
|
0 |
0 |
for (i = 0; i <= len ; i++) { |
|
804
|
0 |
0 |
if (SvTRUE(*sv)) |
|
810
|
0 |
0 |
if (slen == alen && memcmp(astr, str, slen) == 0) { |
|
|
0 |
0 |
if (slen == alen && memcmp(astr, str, slen) == 0) { |
|
815
|
0 |
0 |
if (RETVAL) { |
|
837
|
0 |
0 |
if (!codelike(code)) |
|
840
|
0 |
0 |
if (items <= 1) |
|
844
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
847
|
0 |
0 |
for (i = 1 ; i < items ; ++i) { |
|
852
|
0 |
0 |
POP_MULTICALL; |
|
854
|
0 |
0 |
for (i = 1 ; i < items ; ++i) |
|
874
|
0 |
0 |
if (!codelike(code)) |
|
877
|
0 |
0 |
if (items <= 1) |
|
881
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
884
|
0 |
0 |
for (i = 1; i < items; i++) { |
|
887
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
892
|
0 |
0 |
POP_MULTICALL; |
|
894
|
0 |
0 |
for (j = i + 1; j < items; ++j) |
|
915
|
0 |
0 |
if (!codelike(code)) |
|
918
|
0 |
0 |
if (items <= 1) |
|
922
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
925
|
0 |
0 |
for (i = 1; i < items; i++) { |
|
928
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
933
|
0 |
0 |
POP_MULTICALL; |
|
935
|
0 |
0 |
for (j = i; j < items; j++) |
|
955
|
0 |
0 |
if (!codelike(code)) |
|
958
|
0 |
0 |
if (items <= 1) |
|
962
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
965
|
0 |
0 |
for (i = 1; i < items; i++) { |
|
968
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
974
|
0 |
0 |
POP_MULTICALL; |
|
993
|
0 |
0 |
if (!codelike(code)) |
|
996
|
0 |
0 |
if (items <= 1) |
|
1000
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
1003
|
0 |
0 |
for (i = 1; i < items; ++i) { |
|
1007
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) { |
|
1013
|
0 |
0 |
POP_MULTICALL; |
|
1032
|
0 |
0 |
if (!codelike(code)) |
|
1035
|
0 |
0 |
if (items <= 1) |
|
1039
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
1042
|
0 |
0 |
for (i = 1, j = 0; i < items; i++) { |
|
1045
|
0 |
0 |
if (SvTRUE(*PL_stack_sp)) |
|
1051
|
0 |
0 |
POP_MULTICALL; |
|
1053
|
0 |
0 |
for (i = 0; i < j; i++) |
|
1074
|
0 |
0 |
if (strEQ(method, "index")) { |
|
1075
|
0 |
0 |
EXTEND(SP, 1); |
|
1076
|
0 |
0 |
ST(0) = args->curidx > 0 ? sv_2mortal(newSViv(args->curidx-1)) : &PL_sv_undef; |
|
1080
|
0 |
0 |
EXTEND(SP, args->navs); |
|
|
0 |
0 |
EXTEND(SP, args->navs); |
|
1082
|
0 |
0 |
for (i = 0; i < args->navs; i++) { |
|
1084
|
0 |
0 |
if (args->curidx <= av_len(av)) { |
|
1092
|
0 |
0 |
if (exhausted) |
|
1104
|
0 |
0 |
EACH_ARRAY_BODY; |
|
|
0 |
0 |
EACH_ARRAY_BODY; |
|
1113
|
0 |
0 |
EACH_ARRAY_BODY; |
|
|
0 |
0 |
EACH_ARRAY_BODY; |
|
1147
|
0 |
0 |
if (!codelike(code)) |
|
1149
|
0 |
0 |
if (!arraylike(ST(1))) |
|
1151
|
0 |
0 |
if (!arraylike(ST(2))) |
|
1154
|
0 |
0 |
if (in_pad(aTHX_ code)) { |
|
1163
|
0 |
0 |
if (av_items(avs[1]) > maxitems) |
|
1166
|
0 |
0 |
if (!PL_firstgv || !PL_secondgv) { |
|
|
0 |
0 |
if (!PL_firstgv || !PL_secondgv) { |
|
1176
|
0 |
0 |
for (d = 0, i = 0; i < maxitems; i++) { |
|
1179
|
0 |
0 |
GvSV(PL_firstgv) = svp ? *svp : &PL_sv_undef; |
|
1181
|
0 |
0 |
GvSV(PL_secondgv) = svp ? *svp : &PL_sv_undef; |
|
1182
|
0 |
0 |
PUSHMARK(SP); |
|
1185
|
0 |
0 |
if (SvTRUE(ERRSV)) { |
|
|
0 |
0 |
if (SvTRUE(ERRSV)) { |
|
1187
|
0 |
0 |
croak("%s", SvPV_nolen(ERRSV)); |
|
1191
|
0 |
0 |
if (nitems > alloc) { |
|
1192
|
0 |
0 |
while (nitems > alloc) { |
|
1197
|
0 |
0 |
for (j = nret-1; j >= 0; j--) { |
|
1205
|
0 |
0 |
EXTEND(SP, nitems); |
|
|
0 |
0 |
EXTEND(SP, nitems); |
|
1207
|
0 |
0 |
for (i = 0; i < nitems; i++) |
|
1230
|
0 |
0 |
EXTEND(SP, nret); |
|
|
0 |
0 |
EXTEND(SP, nret); |
|
1232
|
0 |
0 |
for (i = 0; i < args->natatime; i++) { |
|
1233
|
0 |
0 |
if (args->curidx < args->nsvs) { |
|
1265
|
0 |
0 |
for (i = 1; i < items; i++) |
|
1286
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
1287
|
0 |
0 |
if (!arraylike(ST(i))) |
|
1290
|
0 |
0 |
if (av_len(avs[i]) > maxidx) |
|
1294
|
0 |
0 |
EXTEND(SP, items * (maxidx + 1)); |
|
|
0 |
0 |
EXTEND(SP, items * (maxidx + 1)); |
|
1295
|
0 |
0 |
for (i = 0; i <= maxidx; i++) { |
|
1296
|
0 |
0 |
for (j = 0; j < items; j++) { |
|
1298
|
0 |
0 |
ST(i*items + j) = svp ? sv_2mortal(newSVsv(*svp)) : &PL_sv_undef; |
|
1319
|
0 |
0 |
if (GIMME_V == G_SCALAR) { |
|
1320
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
1321
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
1322
|
0 |
0 |
if (SvOK(args[i])) { |
|
1324
|
0 |
0 |
if (!hv_exists_ent(hv, tmp, 0)) { |
|
1329
|
0 |
0 |
else if (0 == seen_undef++) { |
|
1338
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
1339
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
1340
|
0 |
0 |
if (SvOK(args[i])) { |
|
1341
|
0 |
0 |
SvSetSV_nosteal(tmp, args[i]); |
|
1342
|
0 |
0 |
if (!hv_exists_ent(hv, tmp, 0)) { |
|
1349
|
0 |
0 |
else if (0 == seen_undef++) { |
|
1370
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
1371
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
1372
|
0 |
0 |
if (SvOK(args[i])) { |
|
1374
|
0 |
0 |
SvSetSV_nosteal(tmp, args[i]); |
|
1376
|
0 |
0 |
if (NULL == he) { |
|
1387
|
0 |
0 |
else if (0 == seen_undef++) { |
|
1393
|
0 |
0 |
if (GIMME_V == G_SCALAR) { |
|
1394
|
0 |
0 |
for (i = 0; i < count; i++) { |
|
1395
|
0 |
0 |
if (SvOK(args[i])) { |
|
1399
|
0 |
0 |
if (he) { |
|
1402
|
0 |
0 |
if ( 1 == how_many ) |
|
1406
|
0 |
0 |
else if (1 == seen_undef) { |
|
1415
|
0 |
0 |
for (i = 0; i < count; i++) { |
|
1416
|
0 |
0 |
if (SvOK(args[i])) { |
|
1418
|
0 |
0 |
SvSetSV_nosteal(tmp, args[i]); |
|
1420
|
0 |
0 |
if (he) { |
|
1423
|
0 |
0 |
if ( 1 == how_many ) |
|
1427
|
0 |
0 |
else if (1 == seen_undef) { |
|
1443
|
0 |
0 |
if (!items) |
|
1446
|
0 |
0 |
if (items == 1) { |
|
1447
|
0 |
0 |
EXTEND(SP, 1); |
|
1454
|
0 |
0 |
for (i = 1; i < items; i += 2) { |
|
1458
|
0 |
0 |
if (cmp < 0) { |
|
1461
|
0 |
0 |
if (min_cmp > 0) { |
|
1464
|
0 |
0 |
if (max_cmp < 0) { |
|
1470
|
0 |
0 |
if (min_cmp > 0) { |
|
1473
|
0 |
0 |
if (max_cmp < 0) { |
|
1479
|
0 |
0 |
if (items & 1) { |
|
1481
|
0 |
0 |
if (ncmp(minsv, rsv) > 0) { |
|
1484
|
0 |
0 |
else if (ncmp(maxsv, rsv) < 0) { |
|
1512
|
0 |
0 |
if (!codelike(code)) |
|
1515
|
0 |
0 |
if (items == 1) |
|
1519
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
1522
|
0 |
0 |
for (i = 1 ; i < items ; ++i) { |
|
1528
|
0 |
0 |
if (idx < 0 && (idx += last) < 0) |
|
|
0 |
0 |
if (idx < 0 && (idx += last) < 0) |
|
1531
|
0 |
0 |
if (idx >= last) { |
|
1537
|
0 |
0 |
if (!tmp[idx]) |
|
1541
|
0 |
0 |
POP_MULTICALL; |
|
1543
|
0 |
0 |
EXTEND(SP, last); |
|
|
0 |
0 |
EXTEND(SP, last); |
|
1544
|
0 |
0 |
for (i = 0; i < last; ++i) { |
|
1545
|
0 |
0 |
if (tmp[i]) |
|
1571
|
0 |
0 |
if (!codelike(code)) |
|
1574
|
0 |
0 |
if (items > 1) { |
|
1576
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
1584
|
0 |
0 |
if (k >= items-1) |
|
1591
|
0 |
0 |
if (val == 0) { |
|
1592
|
0 |
0 |
POP_MULTICALL; |
|
1593
|
0 |
0 |
if (gimme != G_ARRAY) { |
|
1599
|
0 |
0 |
if (val < 0) { |
|
1604
|
0 |
0 |
} while (i <= j); |
|
1605
|
0 |
0 |
POP_MULTICALL; |
|
1608
|
0 |
0 |
if (gimme == G_ARRAY) |
|
1634
|
0 |
0 |
if (!codelike(code)) |
|
1639
|
0 |
0 |
if (items > 1) { |
|
1641
|
0 |
0 |
PUSH_MULTICALL(_cv); |
|
1649
|
0 |
0 |
if (k >= items-1) |
|
1656
|
0 |
0 |
if (val == 0) { |
|
1660
|
0 |
0 |
if (val < 0) { |
|
1665
|
0 |
0 |
} while (i <= j); |
|
1666
|
0 |
0 |
POP_MULTICALL; |
|
1687
|
0 |
0 |
if (!items) { |
|
1688
|
0 |
0 |
if (GIMME_V == G_SCALAR) { |
|
1698
|
0 |
0 |
for (i = 0; i < items; i++) { |
|
1699
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
|
0 |
0 |
SvGETMAGIC(args[i]); |
|
1701
|
0 |
0 |
SvSetSV_nosteal(tmp, args[i]); |
|
1704
|
0 |
0 |
if (NULL == he) { |
|
1715
|
0 |
0 |
while ((he = hv_iternext(hv))) { |
|
1717
|
0 |
0 |
if (c > max) { |
|
1724
|
0 |
0 |
while ((he = hv_iternext(hv))) { |
|
1725
|
0 |
0 |
if (SvIV(HeVAL(he)) == max) { |
|
1726
|
0 |
0 |
if (GIMME_V == G_SCALAR) { |
|
1729
|
0 |
0 |
XPUSHs(HeSVKEY_force(he)); |
|
|
0 |
0 |
XPUSHs(HeSVKEY_force(he)); |
|
|
0 |
0 |
XPUSHs(HeSVKEY_force(he)); |
|
1734
|
0 |
0 |
if (GIMME_V == G_SCALAR) { |
|
1735
|
0 |
0 |
mXPUSHu(modality); |