(get-anchor) ( yaml-anchors obj -- anchor/f )

Vocabulary

yaml.private

Inputs

yaml-anchors	an object
obj	an object

Outputs

anchor/f

an object

Definition

USING: accessors assocs kernel ;

IN: yaml.private

: (get-anchor) ( yaml-anchors obj -- anchor/f )
    swap objects>> at ;