summaryrefslogtreecommitdiff
path: root/gv.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-06-30 09:57:31 +0000
committerNicholas Clark <nick@ccl4.org>2005-06-30 09:57:31 +0000
commitcc8382cb63e73f1c3483d327d0b7d0f58659fd51 (patch)
treeb043b3424a8cf830de2e30f47c93986ba4d30b4f /gv.h
parent49c0300d76f341c038d0193748526c5c0e652a90 (diff)
downloadperl-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.h3
1 files changed, 0 insertions, 3 deletions
diff --git a/gv.h b/gv.h
index e087c9abde..9034e5984f 100644
--- a/gv.h
+++ b/gv.h
@@ -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)))