farm32 ( bytes -- hash )

Vocabulary

checksums.farmhash.private

Inputs

bytes

an object

Outputs

hash

an object

Definition

USING: checksums.cityhash.private combinators kernel math
sequences ;

IN: checksums.farmhash.private

: farm32 ( bytes -- hash )
    dup length {
        { [ dup 4 <= ] [ drop 0 hash32-0to4 ] }
        { [ dup 12 <= ] [ drop 0 hash32-5to12 ] }
        { [ dup 24 <= ] [ drop 0 farm32-13to24 ] }
        [ drop farm32-long ]
    } cond ;