read-body ( header -- val key )

Vocabulary

memcached.private

Inputs

header

an object

Outputs

val	an object
key	an object

Definition

USING: combinators kernel ;

IN: memcached.private

: read-body ( header -- val key )
    {
        [ check-magic ]
        [ check-status ]
        [ read-key ]
        [ read-val ]
    } cleave swap ;