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

Vocabulary

yaml.private

Inputs

yaml-anchors	an object
obj	an object

Outputs

obj'

an object

Definition

USING: kernel math ;

IN: yaml.private

: ?replace-aliases ( yaml-anchors obj -- obj' )
    dup fixnum? [ nip ] [ (?replace-aliases) ] if ;