diff options
| author | Reini Urban <rurban@x-ray.at> | 2008-06-09 19:15:41 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-06-09 18:18:57 +0000 |
| commit | 3ec35e0f92217816d70cf483b3b012476ca9b9d7 (patch) | |
| tree | 49031891098e3c1d775c02af5966e6fba519ed96 /sv.h | |
| parent | e5ae200f29f943d2dad731c89f20babe8c7c8786 (diff) | |
| download | perl-3ec35e0f92217816d70cf483b3b012476ca9b9d7.tar.gz | |
Re: [PATCH] More COW lvalues
Message-ID: <484D491D.9050704@x-ray.at>
Date: Mon, 09 Jun 2008 17:15:41 +0200
p4raw-id: //depot/perl@34038
Diffstat (limited to 'sv.h')
| -rw-r--r-- | sv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1232,7 +1232,7 @@ the scalar's value cannot change unless written to. (((XPV*) SvANY(sv))->xpv_len = (val)); } STMT_END #define SvEND_set(sv, val) \ STMT_START { assert(SvTYPE(sv) >= SVt_PV); \ - (SvCUR(sv) = (val) - SvPVX(sv)); } STMT_END + SvCUR_set(sv, (val) - SvPVX(sv)); } STMT_END #define SvPV_renew(sv,n) \ STMT_START { SvLEN_set(sv, n); \ |