summaryrefslogtreecommitdiff
path: root/pad.c
diff options
context:
space:
mode:
authorMarcus Holland-Moritz <mhx-perl@gmx.net>2008-10-29 23:04:34 +0000
committerDavid Mitchell <davem@iabyn.com>2009-01-04 22:59:12 +0000
commit15f96fb58d7d6cd483d4b9e7d3723e642ece04ef (patch)
treee01e4031fa7e858a9d846123eae8647885ed6d74 /pad.c
parentade96aec912f9dab0cbd81d82b7fdf8d0b7b1af3 (diff)
downloadperl-15f96fb58d7d6cd483d4b9e7d3723e642ece04ef.tar.gz
Use pvs macros instead of pvn where possible.
p4raw-id: //depot/perl@34653 (cherry-picked from commit 76f68e9bb86f29e34e2aeb5c177571288f05b7ca)
Diffstat (limited to 'pad.c')
-rw-r--r--pad.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pad.c b/pad.c
index 9895bc7fe3..fe2aba649a 100644
--- a/pad.c
+++ b/pad.c
@@ -489,7 +489,7 @@ Perl_pad_add_anon(pTHX_ SV* sv, OPCODE op_type)
PADOFFSET ix;
SV* const name = newSV_type(SVt_PVNV);
pad_peg("add_anon");
- sv_setpvn(name, "&", 1);
+ sv_setpvs(name, "&");
/* Are these two actually ever read? */
COP_SEQ_RANGE_HIGH_set(name, ~0);
COP_SEQ_RANGE_LOW_set(name, 1);