X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=hv.h;h=58e7d1da4e29e9ead5b2b4075d0ad445ea5a9a82;hb=ecbfecb9e052974d6dde629b704db3485e8ae7df;hp=a9fc9fb9af42cbca8847592fe8c8d050596b8c8b;hpb=4fee5c7184334b5d6258d0f47b645f04accfe0b7;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/hv.h b/hv.h
index a9fc9fb..58e7d1d 100644
--- a/hv.h
+++ b/hv.h
@@ -123,7 +123,7 @@ C<SV*>.
 
 
 #define Nullhv Null(HV*)
-#define HvARRAY(hv)	((HE**)((XPVHV*)  SvANY(hv))->xhv_array)
+#define HvARRAY(hv)	(*(HE***)&((XPVHV*)  SvANY(hv))->xhv_array)
 #define HvFILL(hv)	((XPVHV*)  SvANY(hv))->xhv_fill
 #define HvMAX(hv)	((XPVHV*)  SvANY(hv))->xhv_max
 #define HvKEYS(hv)	((XPVHV*)  SvANY(hv))->xhv_keys