construct-mapping ( obj prev-event -- obj' )

Vocabulary

yaml.conversion

Inputs

obj	an object
prev-event	an object

Outputs

obj'

an object

Definition

USING: accessors combinators kernel ;

IN: yaml.conversion

: construct-mapping ( obj prev-event -- obj' )
    tag>> { { YAML_SET_TAG [ construct-set ] } [ drop ] } case ;