(replace-aliases) ( yaml-anchors obj -- obj' )

Vocabulary

yaml.private

Inputs

yaml-anchors	an object
obj	an object

Outputs

obj'

an object

Definition

IN: yaml.private

GENERIC: (replace-aliases) ( yaml-anchors obj -- obj' )

Methods

USING: assocs kernel yaml.private ;

M: assoc (replace-aliases)
    swap [ swap ?replace-aliases ] curry [ bi@ ] curry assoc-map
    ;


USING: byte-arrays kernel yaml.private ;

M: byte-array (replace-aliases) nip ;


USING: kernel yaml.private ;

M: object (replace-aliases) nip ;


USING: kernel sequences yaml.private ;

M: sequence (replace-aliases) [ ?replace-aliases ] with map ;


USING: kernel sets yaml.private ;

M: set (replace-aliases)
    [ members (replace-aliases) ] keep set-like ;


USING: kernel strings yaml.private ;

M: string (replace-aliases) nip ;