collect-assoc-by-multi ( ... assoc quot: ( ... key value -- ... new-keys value' ) -- ... assoc )


Vocabulary
assocs.extras

Inputs
assocan object
quota quotation with stack effect ( ... key value -- ... new-keys value' )


Outputs
assocan object


Definition


: collect-assoc-by-multi
( ... assoc quot: ( ... key value -- ... new-keys value' ) -- ... assoc )
[ H{ } clone ] 2dip collect-assoc-by-multi! ; inline