summaryrefslogtreecommitdiff
path: root/pp_pack.c
diff options
context:
space:
mode:
authorYves Orton <demerphq@gmail.com>2016-10-19 11:14:26 +0200
committerYves Orton <demerphq@gmail.com>2016-10-19 13:28:01 +0200
commite8f7c79fe82af5804e5ea7902214cc4a9d992332 (patch)
tree7a4f8bc9150139ba37eb57169aca013bcace9872 /pp_pack.c
parentadf14ec66ef2f2908759585c3d71e0c01f6a17a4 (diff)
downloadperl-e8f7c79fe82af5804e5ea7902214cc4a9d992332.tar.gz
pp_pack.c: use new SvPVCLEAR and constant string friendly macros
Diffstat (limited to 'pp_pack.c')
-rw-r--r--pp_pack.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_pack.c b/pp_pack.c
index 40c310003c..7e6dc4d423 100644
--- a/pp_pack.c
+++ b/pp_pack.c
@@ -3125,7 +3125,7 @@ PP(pp_pack)
const char *patend = pat + fromlen;
MARK++;
- sv_setpvs(cat, "");
+ SvPVCLEAR(cat);
SvUTF8_off(cat);
packlist(cat, pat, patend, MARK, SP + 1);