diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-01-20 19:56:21 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-01-20 19:56:21 +0000 |
| commit | f9c764c5b8dcfa74adde8337ee9a5db227b55f56 (patch) | |
| tree | 3bef743c1500b5191940af9dffa587e8a719f819 /sv.c | |
| parent | c2d565bf20398393b9b05727867496686647584f (diff) | |
| download | perl-f9c764c5b8dcfa74adde8337ee9a5db227b55f56.tar.gz | |
Split struct block_sub into struct block_sub and struct block_format.
(CXt_SUB and CXt_FORMAT were using some comon members, but some members
were only for one or the other.)
p4raw-id: //depot/perl@33014
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -10558,9 +10558,9 @@ Perl_cx_dup(pTHX_ PERL_CONTEXT *cxs, I32 ix, I32 max, CLONE_PARAMS* param) param); break; case CXt_FORMAT: - ncx->blk_sub.cv = cv_dup(ncx->blk_sub.cv, param); - ncx->blk_sub.gv = gv_dup(ncx->blk_sub.gv, param); - ncx->blk_sub.dfoutgv = gv_dup_inc(ncx->blk_sub.dfoutgv, + ncx->blk_format.cv = cv_dup(ncx->blk_format.cv, param); + ncx->blk_format.gv = gv_dup(ncx->blk_format.gv, param); + ncx->blk_format.dfoutgv = gv_dup_inc(ncx->blk_format.dfoutgv, param); break; case CXt_BLOCK: |