end-case ( seq hash -- hash' )

Vocabulary

checksums.murmur.private

Inputs

seq	an object
hash	an object

Outputs

hash'

an object

Definition

USING: endian kernel math math.bitwise sequences ;

IN: checksums.murmur.private

: end-case ( seq hash -- hash' )
    swap dup length
    [ 4 mod tail-slice* be> (hash-chunk) bitxor ] [ bitxor ] bi
    32 bits ; inline