combine-hashcodes ( index hash0 hash1 -- hash )

Vocabulary

bloom-filters.private

Inputs

index	an object
hash0	an object
hash1	an object

Outputs

hash

an object

Definition

USING: kernel kernel.private math math.functions math.private ;

IN: bloom-filters.private

: combine-hashcodes ( index hash0 hash1 -- hash )
    { fixnum fixnum fixnum } declare
    [ [ [ 3 ^ ] [ - ] bi 6 /i ] keep ] [ fixnum*fast ]
    [ fixnum+fast ] tri* + abs ;