This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Follow-up to d229247c: use U64TYPE consistently.
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 26 Jul 2015 01:51:08 +0000 (21:51 -0400)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 26 Jul 2015 01:51:08 +0000 (21:51 -0400)
Why exactly we are using U64TYPE here and not U64, I dunno.  What I do
know is that if U64TYPE is changed to U64 everywhere in hv_func.h,
win32 build dies.  Maybe hv_func.h gets included before the typedef
for U64 in handy.h takes place, and only the U64TYPE define is available.

hv_func.h

index 1aaaae7..37336b7 100644 (file)
--- a/hv_func.h
+++ b/hv_func.h
@@ -577,7 +577,7 @@ S_perl_hash_old_one_at_a_time(const unsigned char * const seed, const unsigned c
 PERL_STATIC_INLINE U32
 S_perl_hash_murmur_hash_64a (const unsigned char * const seed, const unsigned char *str, const STRLEN len)
 {
-        const U64 m = UINT64_C(0xc6a4a7935bd1e995);
+        const U64TYPE m = UINT64_C(0xc6a4a7935bd1e995);
         const int r = 47;
         U64TYPE h = *((U64TYPE*)seed) ^ len;
         const U64TYPE * data = (const U64TYPE *)str;