(deserialize-seq) ( exemplar quot -- seq )

Vocabulary

serialize.private

Inputs

exemplar	an object
quot	an object

Outputs

seq

an object

Definition

USING: kernel sequences ;

IN: serialize.private

:: (deserialize-seq) ( exemplar quot -- seq )
    deserialize-cell exemplar new-sequence
    [ intern-object ] [ [ drop quot call ] map! ] bi ; inline