Remove remaining assignments to SvCUR and SvLEN in core

Also make the macros non-lvalues under PERL_CORE

1 files changed, 1 insertions, 1 deletions

diff --git a/pp.c b/pp.c
index 62a548bc0a..26c682d6a9 100644
--- a/pp.c
+++ b/pp.c
@@ -2543,7 +2543,7 @@ S_scomplement(pTHX_ SV *targ, SV *sv)
             if (len && ! utf8_to_bytes(tmps, &len)) {
                 Perl_croak(aTHX_ FATAL_ABOVE_FF_MSG, PL_op_desc[PL_op->op_type]);
             }
-            SvCUR(TARG) = len;
+            SvCUR_set(TARG, len);
             SvUTF8_off(TARG);
         }