checksums.murmur: should be unsigned int32.

diff --git a/basis/checksums/murmur/murmur-tests.factor b/basis/checksums/murmur/murmur-tests.factor
index f07e21537eb40d576fea924497ab86d868ba1cb2..79769a8f24a9101779740cd4f2bd39da3657862e 100644 (file)
--- a/basis/checksums/murmur/murmur-tests.factor
+++ b/basis/checksums/murmur/murmur-tests.factor
@@ -3,7 +3,8 @@ IN: checksums.murmur
 
 { 455139366 } [ "asdf" 0 <murmur3-32> checksum-bytes ] unit-test
 { 417250299 } [ "asdf" 156 <murmur3-32> checksum-bytes ] unit-test
-{ -392455434 } [ "abcde" 0 <murmur3-32> checksum-bytes ] unit-test
-{ -1850534962 } [ "12345678" 0 <murmur3-32> checksum-bytes ] unit-test
-{ -1710454456 } [ "12345678" 156 <murmur3-32> checksum-bytes ] unit-test
-{ -734568571 } [ "hello, world!!!" 156 <murmur3-32> checksum-bytes ] unit-test
+{ 3902511862 } [ "abcde" 0 <murmur3-32> checksum-bytes ] unit-test
+{ 2517562459 } [ "abcde" 156 <murmur3-32> checksum-bytes ] unit-test
+{ 2444432334 } [ "12345678" 0 <murmur3-32> checksum-bytes ] unit-test
+{ 2584512840 } [ "12345678" 156 <murmur3-32> checksum-bytes ] unit-test
+{ 3560398725 } [ "hello, world!!!" 156 <murmur3-32> checksum-bytes ] unit-test

diff --git a/basis/checksums/murmur/murmur.factor b/basis/checksums/murmur/murmur.factor
index 13e645f44a7f8f3da1bc7588d5b43c2afcca2678..d0f7dc9e90ec8b53882666f57d4b7fb822703d51 100644 (file)
--- a/basis/checksums/murmur/murmur.factor
+++ b/basis/checksums/murmur/murmur.factor
@@ -1,7 +1,9 @@
 ! Copyright (C) 2013 John Benediktsson.
 ! See http://factorcode.org/license.txt for BSD license.
+
 USING: accessors checksums fry grouping io.binary kernel math
 math.bitwise sequences ;
+
 IN: checksums.murmur
 
 TUPLE: murmur3-32 seed ;
@@ -36,6 +38,6 @@ M: murmur3-32 checksum-bytes ( bytes checksum -- value )
     [ be> (hash-chunk) bitxor bitxor 32-bit ] bi*
     [ -16 shift ] [ bitxor 0x85ebca6b * 32-bit ] bi
     [ -13 shift ] [ bitxor 0xc2b2ae35 * 32-bit ] bi
-    [ -16 shift ] [ bitxor 32 >signed ] bi ;
+    [ -16 shift ] [ bitxor ] bi ;
 
 INSTANCE: murmur3-32 checksum