read-pickle ( -- obj )

Vocabulary

pickle

Inputs

None

Outputs

obj

an object

Definition

USING: assocs kernel namespaces pickle.private ;

IN: pickle

: read-pickle ( -- obj )
    H{ } clone V{ } clone \ stack pick set-at
    H{ } clone \ memo pick set-at [ unpickle ] with-variables ;