with-md5-round ( ops quot -- quot )

Vocabulary

checksums.md5.private

Inputs

ops	an object
quot	an object

Outputs

quot

an object

Definition

USING: combinators kernel sequences ;

IN: checksums.md5.private

MACRO: with-md5-round ( ops quot -- quot )
    '[ [ _ (ABCD) ] compose ] map '[ _ 2cleave ] ;