diff options
| author | David Mitchell <davem@iabyn.com> | 2010-09-08 12:41:14 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2010-09-08 14:48:29 +0100 |
| commit | d873ee11fec56c8f6e86858fdb41e2a540ada0ea (patch) | |
| tree | cb1b8f07a14927f9a558fe016abe6254c41e5795 /cop.h | |
| parent | d57ce4dfca04719829a488a820a1248efb7e81a7 (diff) | |
| download | perl-d873ee11fec56c8f6e86858fdb41e2a540ada0ea.tar.gz | |
eliminate targoffset from struct block_loop
This value is also available via via cx->blk_loop.my_op->op_targ
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -448,9 +448,7 @@ struct block_loop { I32 resetsp; LOOP * my_op; /* My op, that contains redo, next and last ops. */ #ifdef USE_ITHREADS - PAD *oldcomppad; /* Also used for the GV, if targoffset is 0 */ - /* This is also accesible via cx->blk_loop.my_op->op_targ */ - PADOFFSET targoffset; + PAD *oldcomppad; /* Also used for the GV, if my_op->op_targ is 0 */ #else SV ** itervar; #endif @@ -474,11 +472,11 @@ struct block_loop { # define CxITERVAR(c) \ ((c)->blk_loop.oldcomppad \ ? (CxPADLOOP(c) \ - ? &CX_CURPAD_SV( (c)->blk_loop, (c)->blk_loop.targoffset ) \ + ? &CX_CURPAD_SV( (c)->blk_loop, (c)->blk_loop.my_op->op_targ) \ : &GvSV((GV*)(c)->blk_loop.oldcomppad)) \ : (SV**)NULL) # define CX_ITERDATA_SET(cx,idata,o) \ - if ((cx->blk_loop.targoffset = (o))) \ + if (cx->blk_loop.my_op->op_targ) \ CX_CURPAD_SAVE(cx->blk_loop); \ else \ cx->blk_loop.oldcomppad = (idata); @@ -701,7 +699,7 @@ struct context { /* private flags for CXt_LOOP */ #define CXp_FOR_DEF 0x10 /* foreach using $_ */ #ifdef USE_ITHREADS -# define CxPADLOOP(c) ((c)->blk_loop.targoffset) +# define CxPADLOOP(c) ((c)->blk_loop.my_op->op_targ) #endif /* private flags for CXt_SUBST */ |