summaryrefslogtreecommitdiff
path: root/cop.h
diff options
context:
space:
mode:
authorSteve Peters <steve@fisharerojo.org>2005-04-16 06:05:02 -0500
committerNicholas Clark <nick@ccl4.org>2005-04-18 12:18:20 +0000
commitf880fe2f705a50a69328065c7b46fe16e2c252e8 (patch)
treeb6416494bb1c7d69a0aa108e470892dd09a6f3c3 /cop.h
parentbfe08c74b6c277925a0a4c6d707ff24113ccca13 (diff)
downloadperl-f880fe2f705a50a69328065c7b46fe16e2c252e8.tar.gz
Refactoring to Sv*_set() macros - patch #4
Message-ID: <20050416160502.GA26957@mccoy.peters.homeunix.org> plus fix to Perl_rvpv_dup assigning to an RV with SvPVX p4raw-id: //depot/perl@24239
Diffstat (limited to 'cop.h')
-rw-r--r--cop.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/cop.h b/cop.h
index fb119b20c6..bddc328d13 100644
--- a/cop.h
+++ b/cop.h
@@ -168,7 +168,7 @@ struct block_sub {
#define CLEAR_ARGARRAY(ary) \
STMT_START { \
AvMAX(ary) += AvARRAY(ary) - AvALLOC(ary); \
- SvPVX(ary) = (char*)AvALLOC(ary); \
+ SvPV_set(ary, (char*)AvALLOC(ary)); \
AvFILLp(ary) = -1; \
} STMT_END