diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-09-20 12:59:25 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-09-20 12:59:25 +0000 |
| commit | 63c893452f9c16b03be0a54c60b062d7e98a4471 (patch) | |
| tree | 2b46f4fd5714ded00fbea5380060e615bf41a84b /hv.h | |
| parent | b8934dab8e60c1d376ff929f8bed2d4864e46219 (diff) | |
| download | perl-63c893452f9c16b03be0a54c60b062d7e98a4471.tar.gz | |
Switch Perl_hv_common() to returning void * rather than HE *.
p4raw-id: //depot/perl@31926
Diffstat (limited to 'hv.h')
| -rw-r--r-- | hv.h | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -413,14 +413,15 @@ C<SV*>. hek) #define hv_store_ent(zlonk, awk, touche, zgruppp) \ - hv_common((zlonk), (awk), NULL, 0, 0, HV_FETCH_ISSTORE, (touche), (zgruppp)) + ((HE *) hv_common((zlonk), (awk), NULL, 0, 0, HV_FETCH_ISSTORE, \ + (touche), (zgruppp))) #define hv_exists_ent(zlonk, awk, zgruppp) \ (hv_common((zlonk), (awk), NULL, 0, 0, HV_FETCH_ISEXISTS, 0, (zgruppp))\ ? TRUE : FALSE) #define hv_fetch_ent(zlonk, awk, touche, zgruppp) \ - hv_common((zlonk), (awk), NULL, 0, 0, ((touche) ? HV_FETCH_LVALUE : 0), \ - NULL, (zgruppp)) + ((HE *) hv_common((zlonk), (awk), NULL, 0, 0, \ + ((touche) ? HV_FETCH_LVALUE : 0), NULL, (zgruppp))) #define hv_delete_ent(zlonk, awk, touche, zgruppp) \ ((SV *) hv_common((zlonk), (awk), NULL, 0, 0, (touche) | HV_DELETE, \ NULL, (zgruppp))) |