(replace-anchors) ( yaml-anchors obj -- obj' ) - Factor Documentation

(replace-anchors) ( 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-anchors) ( yaml-anchors obj -- obj' )

Methods

USING: assocs kernel yaml.private ;

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

USING: byte-arrays kernel yaml.private ;

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

USING: kernel yaml.private ;

M: object (replace-anchors) nip ;

USING: kernel sequences yaml.private ;

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

USING: kernel sets yaml.private ;

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

USING: kernel strings yaml.private ;

M: string (replace-anchors) nip ;