diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-05-10 15:38:07 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-05-10 15:38:07 +0000 |
| commit | c69006e4a4556d3b1d6e1a57c49a95b1d16efeb0 (patch) | |
| tree | 98297c1327e41049d27edc7b25511919e0ad2f2b /pp_hot.c | |
| parent | ea6e9374082ba65411b39d56a62387c8a2bd2879 (diff) | |
| download | perl-c69006e4a4556d3b1d6e1a57c49a95b1d16efeb0.tar.gz | |
s/sv_setpv(sv,"")/sv_setpvn(sv,"",0)/
plus a couple of 1 byte sv_setpv()s too.
p4raw-id: //depot/perl@24439
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -172,7 +172,7 @@ PP(pp_concat) if (SvGMAGICAL(left)) mg_get(left); /* or mg_get(left) may happen here */ if (!SvOK(TARG)) - sv_setpv(left, ""); + sv_setpvn(left, "", 0); (void)SvPV_nomg(left, llen); /* Needed to set UTF8 flag */ lbyte = !DO_UTF8(left); if (IN_BYTES) |