kv-with ( obj assoc quot -- assoc curried )


Vocabulary
assocs.extras

Inputs
objan object
assocan object
quotan object


Outputs
assocan object
curriedan object


Definition
USING: kernel ;

IN: assocs.extras

: kv-with ( obj assoc quot -- assoc curried )
swapd [ -rotd call ] 2curry ; inline