summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorMarcus Holland-Moritz <mhx-perl@gmx.net>2008-10-29 23:04:34 +0000
committerMarcus Holland-Moritz <mhx-perl@gmx.net>2008-10-29 23:04:34 +0000
commit76f68e9bb86f29e34e2aeb5c177571288f05b7ca (patch)
tree5d94b541dac7cf118c0a7f00f82e41b8883db427 /pp.c
parent502c6561fcd473b7da3277363169d75f16ac2f8b (diff)
downloadperl-76f68e9bb86f29e34e2aeb5c177571288f05b7ca.tar.gz
Use pvs macros instead of pvn where possible.
p4raw-id: //depot/perl@34653
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp.c b/pp.c
index c749cc2f7f..fb66c08891 100644
--- a/pp.c
+++ b/pp.c
@@ -2431,7 +2431,7 @@ PP(pp_negate)
STRLEN len;
const char * const s = SvPV_const(sv, len);
if (isIDFIRST(*s)) {
- sv_setpvn(TARG, "-", 1);
+ sv_setpvs(TARG, "-");
sv_catsv(TARG, sv);
}
else if (*s == '+' || *s == '-') {
@@ -2445,7 +2445,7 @@ PP(pp_negate)
if (SvNOK(sv))
sv_setnv(TARG, -SvNV(sv));
else {
- sv_setpvn(TARG, "-", 1);
+ sv_setpvs(TARG, "-");
sv_catsv(TARG, sv);
}
}