index-list>map ( seq -- map )

Vocabulary

mongodb.tuple.collection.private

Inputs

seq

an object

Outputs

map

an object

Definition

USING: accessors assocs kernel sequences ;

IN: mongodb.tuple.collection.private

: index-list>map ( seq -- map )
    [ H{ } clone ] dip over [ [ dup name>> ] ] dip
    [ set-at ] curry compose each ; inline