(incr/decr) ( amt key cmd -- response )

Vocabulary

memcached.private

Inputs

amt	an object
key	an object
cmd	an object

Outputs

response

an object

Definition

USING: accessors kernel pack sequences ;

IN: memcached.private

: (incr/decr) ( amt key cmd -- response )
    (cmd) swap [ 0 0 ] curry "QQI" pack-be >>extra
    submit "Q" unpack-be first ;