make-tuple ( seq class -- tuple )

Vocabulary

classes.tuple.private

Inputs

seq	an object
class	an object

Outputs

tuple

an object

Definition

USING: kernel sequences sequences.private ;

IN: classes.tuple.private

: make-tuple ( seq class -- tuple )
    tuple-layout <tuple> [
        [ tuple-size <iota> ] [ [ set-array-nth ] curry ] bi
        2each
    ] keep ; inline