diff options
author | Zefram <zefram@fysh.org> | 2017-11-29 14:12:51 +0000 |
---|---|---|
committer | Zefram <zefram@fysh.org> | 2017-11-29 14:12:51 +0000 |
commit | df9e1bc13efe0941735d662db5683d62b3851535 (patch) | |
tree | 3571158d87f6fb3d9f850e9440f44238aa2015ee /sv.c | |
parent | af8bd34d16b94bde32535062ba4e88407be233a0 (diff) | |
download | perl-df9e1bc13efe0941735d662db5683d62b3851535.tar.gz |
use blk_loop format for CXt_GIVEN
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -14639,8 +14639,8 @@ Perl_cx_dup(pTHX_ PERL_CONTEXT *cxs, I32 ix, I32 max, CLONE_PARAMS* param) param); break; case CXt_GIVEN: - ncx->blk_givwhen.defsv_save = - sv_dup_inc(ncx->blk_givwhen.defsv_save, param); + ncx->blk_loop.itersave = + sv_dup_inc(ncx->blk_loop.itersave, param); break; case CXt_BLOCK: case CXt_NULL: |