[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl5-changes
Subject:    [perl.git]  branch smoke-me/nicholas/rt-117687, updated. v5.17.11-33-g651937e
From:       "Nicholas Clark" <nick () ccl4 ! org>
Date:       2013-04-30 9:49:31
Message-ID: E1UX7Bj-0003yQ-Ca () camel ! ams6 ! corp ! booking ! com
[Download RAW message or body]

In perl.git, the branch smoke-me/nicholas/rt-117687 has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/651937e9dc54b5e580fc6b457162031c1ed369b6?hp=ee901278692902248f7ad3bf72820233b3f9269a>


- Log -----------------------------------------------------------------
commit 651937e9dc54b5e580fc6b457162031c1ed369b6
Author: Nicholas Clark <nick@ccl4.org>
Date:   Tue Apr 30 09:38:05 2013 +0100

    Use PTR2IV() instead of casting a pointer to IV, to avoid warnings.
    
    The cast to IV was added to avoid problems on platforms where pointers are
    larger than longs. However, the change instead generates warnings on
    platforms where IVs are larger than pointers. Instead, use the PTR2IV()
    macro provided by perl.h to make everyone happy.
-----------------------------------------------------------------------

Summary of changes:
 hv_func.h |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/hv_func.h b/hv_func.h
index 0a66356..3be514a 100644
--- a/hv_func.h
+++ b/hv_func.h
@@ -392,7 +392,7 @@ S_perl_hash_murmur3(const unsigned char * const seed, const \
unsigned char *ptr,  /* This CPU does not handle unaligned word access */
 
     /* Consume enough so that the next data byte is word aligned */
-    int i = -(IV)ptr & 3;
+    int i = -PTR2IV(ptr) & 3;
     if(i && (STRLEN)i <= len) {
       MURMUR_DOBYTES(i, h1, carry, bytes_in_carry, ptr, len);
     }

--
Perl5 Master Repository


[prev in list] [next in list] [prev in thread] [next in thread]