/dports/lang/perl5.30/perl-5.30.3/ |
H A D | inline.h | 2209 cx->blk_loop.my_op = cLOOP; in S_cx_pushloop_plain() 2223 cx->blk_loop.my_op = cLOOP; in S_cx_pushloop_for() 2225 cx->blk_loop.itervar_u.svp = (SV**)itervarp; in S_cx_pushloop_for() 2226 cx->blk_loop.itersave = itersave; in S_cx_pushloop_for() 2228 cx->blk_loop.oldcomppad = PL_comppad; in S_cx_pushloop_for() 2246 SV *sv = cx->blk_loop.state_u.lazysv.cur; in S_cx_poploop() 2247 cx->blk_loop.state_u.lazysv.cur = NULL; in S_cx_poploop() 2250 sv = cx->blk_loop.state_u.lazysv.end; in S_cx_poploop() 2257 SV **svp = (cx)->blk_loop.itervar_u.svp; in S_cx_poploop() 2261 *svp = cx->blk_loop.itersave; in S_cx_poploop() [all …]
|
H A D | cop.h | 699 ? (c)->blk_loop.itervar_u.svp \ 701 ? &GvSV((c)->blk_loop.itervar_u.gv) \ 702 : (SV **)&(c)->blk_loop.itervar_u.gv) 766 #define blk_loop cx_u.cx_blk.blk_u.blku_loop macro
|
H A D | pp_ctl.c | 2252 cx->blk_loop.state_u.lazyiv.cur = SvIV_nomg(sv); in PP() 2257 cx->blk_loop.state_u.lazysv.cur = newSVsv(sv); in PP() 2258 cx->blk_loop.state_u.lazysv.end = right; in PP() 2268 cx->blk_loop.state_u.lazysv.end = &PL_sv_no; in PP() 2277 cx->blk_loop.state_u.ary.ix = in PP() 2279 AvFILL(cx->blk_loop.state_u.ary.ary) + 1 : in PP() 2288 cx->blk_loop.state_u.stack.ix = in PP() 2291 : cx->blk_loop.state_u.stack.basesp; in PP() 2642 return (cx)->blk_loop.my_op->op_nextop; in PP() 2648 OP* redo_op = cx->blk_loop.my_op->op_redoop; in PP() [all …]
|
H A D | scope.c | 1551 PTR2UV(cx->blk_loop.my_op)); in Perl_cx_dump() 1556 PTR2UV(cx->blk_loop.itersave)); in Perl_cx_dump() 1560 PTR2UV(cx->blk_loop.state_u.ary.ary)); in Perl_cx_dump() 1562 (long)cx->blk_loop.state_u.ary.ix); in Perl_cx_dump()
|
H A D | pp_hot.c | 3858 SV* cur = cx->blk_loop.state_u.lazysv.cur; in PP() 3859 SV *end = cx->blk_loop.state_u.lazysv.end; in PP() 3895 IV cur = cx->blk_loop.state_u.lazyiv.cur; in PP() 3896 if (UNLIKELY(cur > cx->blk_loop.state_u.lazyiv.end)) in PP() 3931 cx->blk_loop.state_u.lazyiv.end = IV_MIN; in PP() 3933 ++cx->blk_loop.state_u.lazyiv.cur; in PP() 3941 ix = (cx->blk_loop.state_u.stack.ix += inc); in PP() 3944 : ix <= cx->blk_loop.state_u.stack.basesp) in PP() 3954 av = cx->blk_loop.state_u.ary.ary; in PP() 3956 ix = (cx->blk_loop.state_u.ary.ix += inc); in PP()
|
H A D | sv.c | 14568 ncx->blk_loop.state_u.lazysv.end in Perl_cx_dup() 14569 = sv_dup_inc(ncx->blk_loop.state_u.lazysv.end, param); in Perl_cx_dup() 14576 assert ((void *) &ncx->blk_loop.state_u.ary.ary == in Perl_cx_dup() 14577 (void *) &ncx->blk_loop.state_u.lazysv.cur); in Perl_cx_dup() 14580 ncx->blk_loop.state_u.ary.ary in Perl_cx_dup() 14581 = av_dup_inc(ncx->blk_loop.state_u.ary.ary, param); in Perl_cx_dup() 14586 ncx->blk_loop.itersave = in Perl_cx_dup() 14591 ncx->blk_loop.oldcomppad = in Perl_cx_dup() 14594 ncx->blk_loop.itervar_u.svp = in Perl_cx_dup() 14601 ncx->blk_loop.itervar_u.gv in Perl_cx_dup() [all …]
|
/dports/lang/perl5.32/perl-5.32.1/ |
H A D | inline.h | 2335 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_plain() 2349 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_for() 2351 cx->blk_loop.itervar_u.svp = (SV**)itervarp; in Perl_cx_pushloop_for() 2352 cx->blk_loop.itersave = itersave; in Perl_cx_pushloop_for() 2354 cx->blk_loop.oldcomppad = PL_comppad; in Perl_cx_pushloop_for() 2372 SV *sv = cx->blk_loop.state_u.lazysv.cur; in Perl_cx_poploop() 2373 cx->blk_loop.state_u.lazysv.cur = NULL; in Perl_cx_poploop() 2376 sv = cx->blk_loop.state_u.lazysv.end; in Perl_cx_poploop() 2383 SV **svp = (cx)->blk_loop.itervar_u.svp; in Perl_cx_poploop() 2387 *svp = cx->blk_loop.itersave; in Perl_cx_poploop() [all …]
|
H A D | cop.h | 729 ? (c)->blk_loop.itervar_u.svp \ 731 ? &GvSV((c)->blk_loop.itervar_u.gv) \ 732 : (SV **)&(c)->blk_loop.itervar_u.gv) 796 #define blk_loop cx_u.cx_blk.blk_u.blku_loop macro
|
H A D | pp_ctl.c | 2271 cx->blk_loop.state_u.lazyiv.cur = SvIV_nomg(sv); in PP() 2276 cx->blk_loop.state_u.lazysv.cur = newSVsv(sv); in PP() 2277 cx->blk_loop.state_u.lazysv.end = right; in PP() 2287 cx->blk_loop.state_u.lazysv.end = &PL_sv_no; in PP() 2296 cx->blk_loop.state_u.ary.ix = in PP() 2298 AvFILL(cx->blk_loop.state_u.ary.ary) + 1 : in PP() 2307 cx->blk_loop.state_u.stack.ix = in PP() 2310 : cx->blk_loop.state_u.stack.basesp; in PP() 2661 return (cx)->blk_loop.my_op->op_nextop; in PP() 2667 OP* redo_op = cx->blk_loop.my_op->op_redoop; in PP() [all …]
|
H A D | scope.c | 1555 PTR2UV(cx->blk_loop.my_op)); in Perl_cx_dump() 1560 PTR2UV(cx->blk_loop.itersave)); in Perl_cx_dump() 1564 PTR2UV(cx->blk_loop.state_u.ary.ary)); in Perl_cx_dump() 1566 (long)cx->blk_loop.state_u.ary.ix); in Perl_cx_dump()
|
H A D | pp_hot.c | 3898 SV* cur = cx->blk_loop.state_u.lazysv.cur; in PP() 3899 SV *end = cx->blk_loop.state_u.lazysv.end; in PP() 3935 IV cur = cx->blk_loop.state_u.lazyiv.cur; in PP() 3936 if (UNLIKELY(cur > cx->blk_loop.state_u.lazyiv.end)) in PP() 3971 cx->blk_loop.state_u.lazyiv.end = IV_MIN; in PP() 3973 ++cx->blk_loop.state_u.lazyiv.cur; in PP() 3981 ix = (cx->blk_loop.state_u.stack.ix += inc); in PP() 3984 : ix <= cx->blk_loop.state_u.stack.basesp) in PP() 3994 av = cx->blk_loop.state_u.ary.ary; in PP() 3996 ix = (cx->blk_loop.state_u.ary.ix += inc); in PP()
|
/dports/lang/perl5.34/perl-5.34.0/ |
H A D | inline.h | 2391 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_plain() 2405 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_for() 2407 cx->blk_loop.itervar_u.svp = (SV**)itervarp; in Perl_cx_pushloop_for() 2408 cx->blk_loop.itersave = itersave; in Perl_cx_pushloop_for() 2410 cx->blk_loop.oldcomppad = PL_comppad; in Perl_cx_pushloop_for() 2428 SV *sv = cx->blk_loop.state_u.lazysv.cur; in Perl_cx_poploop() 2429 cx->blk_loop.state_u.lazysv.cur = NULL; in Perl_cx_poploop() 2432 sv = cx->blk_loop.state_u.lazysv.end; in Perl_cx_poploop() 2439 SV **svp = (cx)->blk_loop.itervar_u.svp; in Perl_cx_poploop() 2443 *svp = cx->blk_loop.itersave; in Perl_cx_poploop() [all …]
|
H A D | pp_ctl.c | 2291 cx->blk_loop.state_u.lazysv.cur = newSVsv(sv); in PP() 2292 cx->blk_loop.state_u.lazysv.end = right; in PP() 2311 cx->blk_loop.state_u.ary.ix = in PP() 2313 AvFILL(cx->blk_loop.state_u.ary.ary) + 1 : in PP() 2322 cx->blk_loop.state_u.stack.ix = in PP() 2325 : cx->blk_loop.state_u.stack.basesp; in PP() 2648 ? cx->blk_loop.state_u.stack.basesp in PP() 2658 nextop = cx->blk_loop.my_op->op_lastop->op_next; in PP() 2676 return (cx)->blk_loop.my_op->op_nextop; in PP() 2682 OP* redo_op = cx->blk_loop.my_op->op_redoop; in PP() [all …]
|
H A D | cop.h | 867 ? (c)->blk_loop.itervar_u.svp \ 869 ? &GvSV((c)->blk_loop.itervar_u.gv) \ 870 : (SV **)&(c)->blk_loop.itervar_u.gv) 934 #define blk_loop cx_u.cx_blk.blk_u.blku_loop macro
|
H A D | scope.c | 1580 PTR2UV(cx->blk_loop.my_op)); in Perl_cx_dump() 1585 PTR2UV(cx->blk_loop.itersave)); in Perl_cx_dump() 1589 PTR2UV(cx->blk_loop.state_u.ary.ary)); in Perl_cx_dump() 1591 (long)cx->blk_loop.state_u.ary.ix); in Perl_cx_dump()
|
H A D | pp_hot.c | 3903 SV* cur = cx->blk_loop.state_u.lazysv.cur; in PP() 3904 SV *end = cx->blk_loop.state_u.lazysv.end; in PP() 3940 IV cur = cx->blk_loop.state_u.lazyiv.cur; in PP() 3941 if (UNLIKELY(cur > cx->blk_loop.state_u.lazyiv.end)) in PP() 3976 cx->blk_loop.state_u.lazyiv.end = IV_MIN; in PP() 3978 ++cx->blk_loop.state_u.lazyiv.cur; in PP() 3986 ix = (cx->blk_loop.state_u.stack.ix += inc); in PP() 3989 : ix <= cx->blk_loop.state_u.stack.basesp) in PP() 3999 av = cx->blk_loop.state_u.ary.ary; in PP() 4001 ix = (cx->blk_loop.state_u.ary.ix += inc); in PP()
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ |
H A D | inline.h | 2983 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_plain() 2997 cx->blk_loop.my_op = cLOOP; in Perl_cx_pushloop_for() 2999 cx->blk_loop.itervar_u.svp = (SV**)itervarp; in Perl_cx_pushloop_for() 3000 cx->blk_loop.itersave = itersave; in Perl_cx_pushloop_for() 3002 cx->blk_loop.oldcomppad = PL_comppad; in Perl_cx_pushloop_for() 3020 SV *sv = cx->blk_loop.state_u.lazysv.cur; in Perl_cx_poploop() 3021 cx->blk_loop.state_u.lazysv.cur = NULL; in Perl_cx_poploop() 3024 sv = cx->blk_loop.state_u.lazysv.end; in Perl_cx_poploop() 3031 SV **svp = (cx)->blk_loop.itervar_u.svp; in Perl_cx_poploop() 3035 *svp = cx->blk_loop.itersave; in Perl_cx_poploop() [all …]
|
H A D | pp_ctl.c | 2291 cx->blk_loop.state_u.lazysv.cur = newSVsv(sv); in PP() 2292 cx->blk_loop.state_u.lazysv.end = right; in PP() 2311 cx->blk_loop.state_u.ary.ix = in PP() 2313 AvFILL(cx->blk_loop.state_u.ary.ary) + 1 : in PP() 2322 cx->blk_loop.state_u.stack.ix = in PP() 2325 : cx->blk_loop.state_u.stack.basesp; in PP() 2661 ? cx->blk_loop.state_u.stack.basesp in PP() 2671 nextop = cx->blk_loop.my_op->op_lastop->op_next; in PP() 2689 return (cx)->blk_loop.my_op->op_nextop; in PP() 2695 OP* redo_op = cx->blk_loop.my_op->op_redoop; in PP() [all …]
|
H A D | cop.h | 858 ? (c)->blk_loop.itervar_u.svp \ 860 ? &GvSV((c)->blk_loop.itervar_u.gv) \ 861 : (SV **)&(c)->blk_loop.itervar_u.gv) 925 #define blk_loop cx_u.cx_blk.blk_u.blku_loop macro
|
H A D | scope.c | 1577 PTR2UV(cx->blk_loop.my_op)); in Perl_cx_dump() 1582 PTR2UV(cx->blk_loop.itersave)); in Perl_cx_dump() 1586 PTR2UV(cx->blk_loop.state_u.ary.ary)); in Perl_cx_dump() 1588 (long)cx->blk_loop.state_u.ary.ix); in Perl_cx_dump()
|
H A D | pp_hot.c | 3917 SV* cur = cx->blk_loop.state_u.lazysv.cur; in PP() 3918 SV *end = cx->blk_loop.state_u.lazysv.end; in PP() 3954 IV cur = cx->blk_loop.state_u.lazyiv.cur; in PP() 3955 if (UNLIKELY(cur > cx->blk_loop.state_u.lazyiv.end)) in PP() 3990 cx->blk_loop.state_u.lazyiv.end = IV_MIN; in PP() 3992 ++cx->blk_loop.state_u.lazyiv.cur; in PP() 4000 ix = (cx->blk_loop.state_u.stack.ix += inc); in PP() 4003 : ix <= cx->blk_loop.state_u.stack.basesp) in PP() 4013 av = cx->blk_loop.state_u.ary.ary; in PP() 4015 ix = (cx->blk_loop.state_u.ary.ix += inc); in PP()
|
/dports/math/dbcsr/dbcsr-2.1.0/src/tensors/ |
H A D | dbcsr_tensor_split.F | 638 blk_loop: DO iblk_all = 1, nblk 642 IF (bounds(1, idim) > blk_offset(idim) - 1 + blk_size(idim)) CYCLE blk_loop 643 IF (bounds(2, idim) < blk_offset(idim)) CYCLE blk_loop 647 ENDDO blk_loop
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/exts/dbcsr/src/tensors/ |
H A D | dbcsr_tensor_split.F | 642 blk_loop: DO iblk_all = 1, nblk 646 IF (bounds(1, idim) > blk_offset(idim) - 1 + blk_size(idim)) CYCLE blk_loop 647 IF (bounds(2, idim) < blk_offset(idim)) CYCLE blk_loop 651 ENDDO blk_loop
|
H A D | dbcsr_tensor.F | 1568 blk_loop: DO WHILE (dbcsr_t_iterator_blocks_left(iter)) 1571 IF (bounds(1, idim) > blk_offset(idim) - 1 + blk_size(idim)) CYCLE blk_loop 1572 IF (bounds(2, idim) < blk_offset(idim)) CYCLE blk_loop 1576 ENDDO blk_loop
|
/dports/devel/p5-Coro/Coro-6.57/Coro/ |
H A D | clone.c | 151 SvREFCNT_inc ((SV *)cx->blk_loop.itersave); in coro_clone() 152 SvREFCNT_inc ((SV *)cx->blk_loop.iterlval); in coro_clone() 153 SvREFCNT_inc ((SV *)cx->blk_loop.iterary); in coro_clone()
|