diff options
author | Nicholas Clark <nick@ccl4.org> | 2005-08-17 09:06:33 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2005-08-17 09:06:33 +0000 |
commit | 43e6e717d18ccf9c351f44370ef56abe09dc1cc4 (patch) | |
tree | d4a494b13c1c139229e46fa7017e3d35765dfab4 /hv.h | |
parent | 724e67cb5119c18364c1131d2478435750263a24 (diff) | |
download | perl-43e6e717d18ccf9c351f44370ef56abe09dc1cc4.tar.gz |
Given that we now have a union, there's no need for all the HvARRAY()
casting games.
p4raw-id: //depot/perl@25297
Diffstat (limited to 'hv.h')
-rw-r--r-- | hv.h | 6 |
1 files changed, 1 insertions, 5 deletions
@@ -8,10 +8,6 @@ * */ -/* typedefs to eliminate some typing */ -typedef struct he HE; -typedef struct hek HEK; - /* entry in hash value chain */ struct he { /* Keep hent_next first in this structure, because sv_free_arenas take @@ -209,7 +205,7 @@ C<SV*>. #define Nullhv Null(HV*) -#define HvARRAY(hv) (*(HE***)&((hv)->sv_u.svu_array)) +#define HvARRAY(hv) ((hv)->sv_u.svu_hash) #define HvFILL(hv) ((XPVHV*) SvANY(hv))->xhv_fill #define HvMAX(hv) ((XPVHV*) SvANY(hv))->xhv_max /* This quite intentionally does no flag checking first. That's your |