diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-02-25 15:38:25 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-02-25 15:38:25 +0000 |
| commit | 584307902de552f84517013f42d1db478f4102bd (patch) | |
| tree | 5c30770d078b412e7ced2d07b3444c7ead5ee1a4 /gv.h | |
| parent | 27bd069fdd0f917015e698e36bfc41a29daa63be (diff) | |
| download | perl-584307902de552f84517013f42d1db478f4102bd.tar.gz | |
xgv_stash can be stored as a union with the NV, reducing the size of
PVGVs by another pointer.
p4raw-id: //depot/perl@27326
Diffstat (limited to 'gv.h')
| -rw-r--r-- | gv.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -41,7 +41,7 @@ struct gp { (*({ GV *_gv = (GV *) gv; \ assert(isGV_with_GP(_gv)); \ assert(SvTYPE(_gv) == SVt_PVGV || SvTYPE(_gv) >= SVt_PVLV); \ - &(GvXPVGV(_gv)->xgv_stash); \ + &(GvXPVGV(_gv)->xnv_u.xgv_stash); \ })) # define GvNAME(gv) \ (*({ GV *zzzz = (GV *) gv; \ @@ -58,7 +58,7 @@ struct gp { #else # define GvGP(gv) ((gv)->sv_u.svu_gp) # define GvFLAGS(gv) (GvXPVGV(gv)->xgv_flags) -# define GvSTASH(gv) (GvXPVGV(gv)->xgv_stash) +# define GvSTASH(gv) (GvXPVGV(gv)->xnv_u.xgv_stash) # define GvNAME(gv) (GvXPVGV(gv)->xgv_name) # define GvNAMELEN(gv) (GvXPVGV(gv)->xgv_namelen) #endif |