with-ripemd-160-round ( ops quot -- quot )

Vocabulary

checksums.ripemd.private

Inputs

ops	an object
quot	an object

Outputs

quot

an object

Definition

USING: combinators kernel sequences ;

IN: checksums.ripemd.private

MACRO: with-ripemd-160-round ( ops quot -- quot )
    '[ [ _ (ABCDE) ] compose ] map '[ _ 2cleave ] ;