X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/9faf471aadb0009c0def1e2e9ab174082632af3b..cb2dcfb25ec8a3cf487a54f645efffed55b50153:/hv.c

diff --git a/hv.c b/hv.c
index cbeed30..22d5603 100644
--- a/hv.c
+++ b/hv.c
@@ -750,7 +750,8 @@ Perl_hv_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen,
 	       recursive call would call the key conversion routine again.
 	       However, as we replace the original key with the converted
 	       key, this would result in a double conversion, which would show
-	       up as a bug if the conversion routine is not idempotent.  */
+	       up as a bug if the conversion routine is not idempotent.
+	       Hence the use of HV_DISABLE_UVAR_XKEY.  */
 	    return hv_common(hv, keysv, key, klen, flags,
 			     HV_FETCH_ISSTORE|HV_DISABLE_UVAR_XKEY|return_svp,
 			     val, hash);
@@ -2894,7 +2895,7 @@ S_share_hek_flags(pTHX_ const char *str, I32 len, U32 hash, int flags)
     return HeKEY_hek(entry);
 }
 
-I32 *
+SSize_t *
 Perl_hv_placeholders_p(pTHX_ HV *hv)
 {
     dVAR;