diff options
author | Andy Lester <andy@petdance.com> | 2006-02-25 14:52:16 -0600 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-02-27 15:43:41 +0000 |
commit | dd3874d7bd7bd60c75dc2e7efa06380d81f13287 (patch) | |
tree | ef645fc965c6dd167fbad76ff6ed61c97b1c2e75 /gv.h | |
parent | 22f43f2c71561997b91864c37ea97e2d3ad7e327 (diff) | |
download | perl-dd3874d7bd7bd60c75dc2e7efa06380d81f13287.tar.gz |
fix up gv.c and gv.h
Message-ID: <20060226025216.GA12758@petdance.com>
p4raw-id: //depot/perl@27344
Diffstat (limited to 'gv.h')
-rw-r--r-- | gv.h | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -38,19 +38,19 @@ struct gp { assert(isGV_with_GP(yaah)); \ &(GvXPVGV(yaah)->xpv_cur);})) # define GvSTASH(gv) \ - (*({ GV *_gv = (GV *) (gv); \ + (*({ GV * const _gv = (GV *) (gv); \ assert(isGV_with_GP(_gv)); \ assert(SvTYPE(_gv) == SVt_PVGV || SvTYPE(_gv) >= SVt_PVLV); \ &(GvXPVGV(_gv)->xnv_u.xgv_stash); \ })) # define GvNAME(gv) \ - (*({ GV *zzzz = (GV *) (gv); \ + (*({ GV * const zzzz = (GV *) (gv); \ assert(isGV_with_GP(zzzz)); \ assert(SvTYPE(zzzz) == SVt_PVGV || SvTYPE(zzzz) >= SVt_PVLV); \ &(GvXPVGV(zzzz)->xgv_name); \ })) # define GvNAMELEN(gv) \ - (*({ GV *glank = (GV *) (gv); \ + (*({ GV * const glank = (GV *) (gv); \ assert(isGV_with_GP(glank)); \ assert(SvTYPE(glank) == SVt_PVGV || SvTYPE(glank) >= SVt_PVLV); \ &(GvXPVGV(glank)->xgv_namelen); \ |