slot-option? ( tuple slot option -- ? )


Vocabulary
mongodb.tuple.collection.private

Inputs
tuplean object
slotan object
optionan object


Outputs
?an object


Definition
USING: assocs kernel mongodb.tuple.collection sequences ;

IN: mongodb.tuple.collection.private

: slot-option? ( tuple slot option -- ? )
[ swap mdb-slot-map at ] dip [ swap member-eq? ] curry
[ f ] if* ;