xgv_stash can be stored as a union with the NV, reducing the size of

PVGVs by another pointer.

p4raw-id: //depot/perl@27326

1 files changed, 4 insertions, 1 deletions

diff --git a/cv.h b/cv.h
index 960e72735b..6d93d7171f 100644
--- a/cv.h
+++ b/cv.h
@@ -11,7 +11,10 @@
 /* This structure must the beginning of XPVFM in sv.h  */
 
 struct xpvcv {
-    NV		xnv_nv;		/* numeric value, if any */
+    union {
+	NV	xnv_nv;		/* numeric value, if any */
+	HV *	xgv_stash;
+    }		xnv_u;
     STRLEN	xpv_cur;	/* length of xp_pv as a C string */
     STRLEN	xpv_len;	/* allocated size */
     union {