diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-06-30 09:57:31 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-06-30 09:57:31 +0000 |
commit | cc8382cb63e73f1c3483d327d0b7d0f58659fd51 (patch) | |
tree | b043b3424a8cf830de2e30f47c93986ba4d30b4f /gv.h | |
parent | 49c0300d76f341c038d0193748526c5c0e652a90 (diff) | |
download | perl-cc8382cb63e73f1c3483d327d0b7d0f58659fd51.tar.gz |
If gp_flags is unused, why are we even allocating it?
p4raw-id: //depot/perl@25019
Diffstat (limited to 'gv.h')
-rw-r--r-- | gv.h | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -18,7 +18,6 @@ struct gp { GV * gp_egv; /* effective gv, if *glob */ CV * gp_cv; /* subroutine value */ U32 gp_cvgen; /* generational validity of cached gv_cv */ - U32 gp_flags; /* XXX unused */ line_t gp_line; /* line first declared at (for -w) */ char * gp_file; /* file first declared in (for -w) */ }; @@ -74,8 +73,6 @@ Return the SV from the GV. #define GvCVGEN(gv) (GvGP(gv)->gp_cvgen) #define GvCVu(gv) (GvGP(gv)->gp_cvgen ? Nullcv : GvGP(gv)->gp_cv) -#define GvGPFLAGS(gv) (GvGP(gv)->gp_flags) - #define GvLINE(gv) (GvGP(gv)->gp_line) #define GvFILE(gv) (GvGP(gv)->gp_file) #define GvFILEGV(gv) (gv_fetchfile(GvFILE(gv))) |