diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-06-07 21:16:13 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-06-07 21:16:13 +0000 |
commit | 10516c54a74630cf74b5f3650f62a47cae3b2ac0 (patch) | |
tree | bf97f300ff97cf11727fc86c6de43751b823c6da /pp_ctl.c | |
parent | 245d4a47e185d4e38ca6440eb62ae19d5e411fd1 (diff) | |
download | perl-10516c54a74630cf74b5f3650f62a47cae3b2ac0.tar.gz |
More SvPV consting
p4raw-id: //depot/perl@24743
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1835,7 +1835,7 @@ PP(pp_enteriter) STRLEN n_a; cx->blk_loop.iterlval = newSVsv(sv); (void) SvPV_force(cx->blk_loop.iterlval,n_a); - (void) SvPV(right,n_a); + (void) SvPV_nolen_const(right); } } else if (PL_op->op_private & OPpITER_REVERSED) { |