diff options
| author | Steve Peters <steve@fisharerojo.org> | 2005-04-20 01:27:20 -0500 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-04-20 13:51:54 +0000 |
| commit | 87a1ef3dbc71790d3dec7643306775e0d1e4768a (patch) | |
| tree | 2c16cb1d368f45d3771e5d57065ec0d7f74dc419 /bytecode.pl | |
| parent | bd4b1eb5b0b53616d16d03ba8f6aedf325adfa1d (diff) | |
| download | perl-87a1ef3dbc71790d3dec7643306775e0d1e4768a.tar.gz | |
Refactoring to Sv*_set() macros - patch #6
Message-ID: <20050420112720.GA31042@mccoy.peters.homeunix.org>
Date: Wed, 20 Apr 2005 06:27:20 -0500
p4raw-id: //depot/perl@24260
Diffstat (limited to 'bytecode.pl')
| -rw-r--r-- | bytecode.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/bytecode.pl b/bytecode.pl index d471763a9f..adf1d1fa46 100644 --- a/bytecode.pl +++ b/bytecode.pl @@ -368,12 +368,12 @@ sv_upgrade bstate->bs_sv U8 x sv_refcnt SvREFCNT(bstate->bs_sv) U32 sv_refcnt_add SvREFCNT(bstate->bs_sv) I32 x sv_flags SvFLAGS(bstate->bs_sv) U32 -xrv SvRV(bstate->bs_sv) svindex +xrv bstate->bs_sv svindex x xpv bstate->bs_sv none x -xpv_cur SvCUR(bstate->bs_sv) STRLEN -xpv_len SvLEN(bstate->bs_sv) STRLEN -xiv SvIVX(bstate->bs_sv) IV -xnv SvNVX(bstate->bs_sv) NV +xpv_cur bstate->bs_sv STRLEN x +xpv_len bstate->bs_sv STRLEN x +xiv bstate->bs_sv IV x +xnv bstate->bs_sv NV x xlv_targoff LvTARGOFF(bstate->bs_sv) STRLEN xlv_targlen LvTARGLEN(bstate->bs_sv) STRLEN xlv_targ LvTARG(bstate->bs_sv) svindex @@ -422,7 +422,7 @@ mg_private SvMAGIC(bstate->bs_sv)->mg_private U16 mg_flags SvMAGIC(bstate->bs_sv)->mg_flags U8 mg_name SvMAGIC(bstate->bs_sv) pvcontents x mg_namex SvMAGIC(bstate->bs_sv) svindex x -xmg_stash *(SV**)&SvSTASH(bstate->bs_sv) svindex +xmg_stash bstate->bs_sv svindex X gv_fetchpv bstate->bs_sv strconst x gv_fetchpvx bstate->bs_sv strconst x gv_stashpv bstate->bs_sv strconst x |