resulting-tuple ( exemplar-tuple row out-params -- tuple )

Vocabulary

db.tuples.private

Inputs

exemplar-tuple	an object
row	an object
out-params	an object

Outputs

tuple

an object

Definition

USING: accessors classes classes.tuple kernel sequences ;

IN: db.tuples.private

: resulting-tuple ( exemplar-tuple row out-params -- tuple )
    rot class-of new [
        [ [ slot-name>> ] ] dip [ set-slot-named ] curry compose
        2each
    ] keep ;