Use pvs macros instead of pvn where possible.

p4raw-id: //depot/perl@34653

1 files changed, 3 insertions, 3 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index f4364acdb7..f00b3bee54 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -95,7 +95,7 @@ PP(pp_regcomp)
 	/* multiple args; concatentate them */
 	dMARK; dORIGMARK;
 	tmpstr = PAD_SV(ARGTARG);
-	sv_setpvn(tmpstr, "", 0);
+	sv_setpvs(tmpstr, "");
 	while (++MARK <= SP) {
 	    if (PL_amagic_generation) {
 		SV *sv;
@@ -1154,7 +1154,7 @@ PP(pp_flip)
 		RETURNOP(((LOGOP*)cUNOP->op_first)->op_other);
 	    }
 	}
-	sv_setpvn(TARG, "", 0);
+	sv_setpvs(TARG, "");
 	SETs(targ);
 	RETURN;
     }
@@ -1537,7 +1537,7 @@ Perl_die_where(pTHX_ const char *message, STRLEN msglen)
 		SV * const err = ERRSV;
 		const char *e = NULL;
 		if (!SvPOK(err))
-		    sv_setpvn(err,"",0);
+		    sv_setpvs(err,"");
 		else if (SvCUR(err) >= sizeof(prefix)+msglen-1) {
 		    STRLEN len;
 		    e = SvPV_const(err, len);