add-object ( obj -- )

Vocabulary

serialize.private

Inputs

obj

an object

Outputs

None

Definition

USING: assocs kernel namespaces ;

IN: serialize.private

: add-object ( obj -- )
    serialized get [ assoc-size swap ] keep set-at ;