class-predicates ( assoc -- assoc )

Vocabulary

generic.single

Inputs

assoc

an object

Outputs

assoc

an object

Definition

USING: assocs classes kernel sequences ;

IN: generic.single

: class-predicates ( assoc -- assoc )
    [ [ predicate-def [ dup ] prepend ] dip ] assoc-map ;