Vocabulary
assocs.extras

Inputs
assocan object
quota quotation with stack effect ( key -- key' )


Outputs
assoc'an object


Definition


: filter-keys ( assoc quot: ( key -- key' ) -- assoc' )
[ [ drop ] ] dip compose assoc-filter ; inline