assoc-operator ( assoc quot -- alist quot' )


Vocabulary
assocs.private

Inputs
assocan object
quotan object


Outputs
alistan object
quot'an object


Definition
USING: assocs kernel sequences ;

IN: assocs.private

: assoc-operator ( assoc quot -- alist quot' )
[ >alist ] dip [ first2 ] prepose ; inline