serialize-seq ( obj code -- )

Vocabulary

serialize.private

Inputs

obj	an object
code	an object

Outputs

None

Definition

USING: io kernel sequences serialize ;

IN: serialize.private

: serialize-seq ( obj code -- )
    [
        write1
        [ add-object ] [ length serialize-cell ]
        [ [ (serialize) ] each ] tri
    ] curry serialize-shared ;