X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=av.h;h=c65b9482af35c12174cb3430fbf40379a06ad1b1;hb=d8c68341336c2ab59ef1b9d783c692a467d56a53;hp=93dcc0cfdc9653f653ef267b909c3861170a4538;hpb=4633a7c4bad06b471d9310620b7fe8ddd158cccd;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/av.h b/av.h
index 93dcc0c..c65b948 100644
--- a/av.h
+++ b/av.h
@@ -8,7 +8,7 @@
  */
 
 struct xpvav {
-    char*	xav_array;	/* pointer to malloced string */
+    char*	xav_array;      /* pointer to first array element */
     SSize_t	xav_fill;
     SSize_t	xav_max;
     IV		xof_off;	/* ptr is incremented by offset */
@@ -16,7 +16,7 @@ struct xpvav {
     MAGIC*	xmg_magic;	/* magic for scalar array */
     HV*		xmg_stash;	/* class package */
 
-    SV**	xav_alloc;
+    SV**	xav_alloc;	/* pointer to malloced string */
     SV*		xav_arylen;
     U8		xav_flags;
 };
@@ -44,5 +44,5 @@ struct xpvav {
 #define AvREUSED_on(av)	(AvFLAGS(av) |= AVf_REUSED)
 #define AvREUSED_off(av) (AvFLAGS(av) &= ~AVf_REUSED)
 
-#define AvREALISH(av)	AvFLAGS(av)	/* REAL or REIFY -- shortcut */
+#define AvREALISH(av)	(AvFLAGS(av) & (AVf_REAL|AVf_REIFY))