make-tuple ( assoc -- tuple )

Vocabulary

mongodb.tuple.persistent.private

Inputs

assoc

an object

Outputs

tuple

an object

Definition

USING: assocs kernel mongodb.tuple.persistent sequences ;

IN: mongodb.tuple.persistent.private

: make-tuple ( assoc -- tuple )
    prepare-assoc>tuple
    '[ dup _ at assoc>tuple swap _ set-at ] each ; inline
    recursive