X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/828dad175cf45f4e83d61df735a510f0314063c8..c9a0cae924d6331f0cc9997f1841d0544a2e5f63:/av.h diff --git a/av.h b/av.h index c8ff2a3..f8c9d1b 100644 --- a/av.h +++ b/av.h @@ -8,22 +8,13 @@ * */ -#define _XPVAV_ALLOCATED_HEAD \ - SSize_t xav_fill; /* Index of last element present */ \ - SSize_t xav_max /* max index for which array has space */ - -#define _XPVAV_HEAD \ - union _xnvu xnv_u; \ - _XPVAV_ALLOCATED_HEAD - struct xpvav { - _XPVAV_HEAD; + union _xnvu xnv_u; + SSize_t xav_fill; /* Index of last element present */ + SSize_t xav_max; /* max index for which array has space */ _XPVMG_HEAD; }; -#undef _XPVAV_ALLOCATED_HEAD -#undef _XPVAV_HEAD - /* SV** xav_alloc; */ #define xav_alloc xiv_u.xivu_p1 /* SV* xav_arylen; */