diff options
| author | Yves Orton <demerphq@gmail.com> | 2017-06-02 04:17:51 +0200 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2017-06-02 05:14:14 +0200 |
| commit | f92b68087fa16c181807b1e16f020d76b45c4274 (patch) | |
| tree | 2a0a25fdf7f30b1a7ec7f921465ea39afd8de960 /hv_func.h | |
| parent | f0df1bdecfbdfc617ef7adf558d84b8f5ded7f6d (diff) | |
| download | perl-f92b68087fa16c181807b1e16f020d76b45c4274.tar.gz | |
revert the Perl_croak_nocontext() change to PERL_HASH()
it only appeared to work, but actually was not being invoked in my testing.
Once it was tested properly it became clear that Perl_croak_nocontext()
is not always available where things are calling PERL_HASH(). Need to investigate
further how to make this work.
Diffstat (limited to 'hv_func.h')
| -rw-r--r-- | hv_func.h | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -96,9 +96,7 @@ #define _PERL_HASH_WITH_STATE(state,str,len) \ (LIKELY(len <= SBOX32_MAX_LEN) \ ? sbox32_hash_with_state((state + __PERL_HASH_STATE_BYTES),(U8*)(str),(len)) \ - : UNLIKELY(len > (STRLEN) I32_MAX) \ - ? Perl_croak_nocontext("Sorry, hash keys must be smaller than 2**31 bytes") \ - : __PERL_HASH_WITH_STATE((state),(str),(len))) + : __PERL_HASH_WITH_STATE((state),(str),(len))) #endif |