diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-01-03 17:54:38 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-01-03 17:54:38 +0000 |
commit | ad25789c15269a04312e0efede81842547aa8212 (patch) | |
tree | 2aaac52db8554401f8e520d7ff235d9bb6f8aa98 /sv.h | |
parent | 84bafc024a74c819ac3d2b4406253dbe983e6502 (diff) | |
download | perl-ad25789c15269a04312e0efede81842547aa8212.tar.gz |
Missed three sv_2mortal(newSVpvn(...))s in the headers.
p4raw-id: //depot/perl@32820
Diffstat (limited to 'sv.h')
-rw-r--r-- | sv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1761,7 +1761,7 @@ Like C<sv_catsv> but doesn't process magic. #define sv_catpvn_utf8_upgrade(dsv, sstr, slen, nsv) \ STMT_START { \ if (!(nsv)) \ - nsv = sv_2mortal(newSVpvn(sstr, slen)); \ + nsv = newSVpvn_flags(sstr, slen, SVs_TEMP); \ else \ sv_setpvn(nsv, sstr, slen); \ SvUTF8_off(nsv); \ |