diff options
| author | Yves Orton <demerphq@gmail.com> | 2016-10-19 11:14:26 +0200 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2016-10-19 13:28:01 +0200 |
| commit | e8f7c79fe82af5804e5ea7902214cc4a9d992332 (patch) | |
| tree | 7a4f8bc9150139ba37eb57169aca013bcace9872 /pp_pack.c | |
| parent | adf14ec66ef2f2908759585c3d71e0c01f6a17a4 (diff) | |
| download | perl-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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); |