diff options
author | Steve Peters <steve@fisharerojo.org> | 2007-09-20 13:32:18 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2007-09-20 13:32:18 +0000 |
commit | 59af68cca7100de7cbb578e02ffa17383ff74a5f (patch) | |
tree | e19c419f058a994c8a95a834542af468fdd90a0d /mathoms.c | |
parent | 63c893452f9c16b03be0a54c60b062d7e98a4471 (diff) | |
download | perl-59af68cca7100de7cbb578e02ffa17383ff74a5f.tar.gz |
Casts needed in mathoms.c to make it compile with g++ after the
making Perl_hv_common() return void *.
p4raw-id: //depot/perl@31927
Diffstat (limited to 'mathoms.c')
-rw-r--r-- | mathoms.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1214,7 +1214,7 @@ Perl_pack_cat(pTHX_ SV *cat, const char *pat, const char *patend, register SV ** HE * Perl_hv_store_ent(pTHX_ HV *hv, SV *keysv, SV *val, U32 hash) { - return hv_common(hv, keysv, NULL, 0, 0, HV_FETCH_ISSTORE, val, hash); + return (HE *)hv_common(hv, keysv, NULL, 0, 0, HV_FETCH_ISSTORE, val, hash); } bool @@ -1227,7 +1227,7 @@ Perl_hv_exists_ent(pTHX_ HV *hv, SV *keysv, U32 hash) HE * Perl_hv_fetch_ent(pTHX_ HV *hv, SV *keysv, I32 lval, U32 hash) { - return hv_common(hv, keysv, NULL, 0, 0, + return (HE *)hv_common(hv, keysv, NULL, 0, 0, (lval ? HV_FETCH_LVALUE : 0), NULL, hash); } |