update-toml ( root table entry -- root table' )

Vocabulary

toml.private

Inputs

root	an object
table	an object
entry	an object

Outputs

root	an object
table'	an object

Definition

IN: toml.private

GENERIC: update-toml ( root table entry -- root table' )

Methods

USING: accessors assocs kernel toml.private ;

M: entry update-toml
    dupd [ key>> entries-at ] [ value>> ] bi
    -rot check-no-key set-at ;


USING: accessors assocs kernel toml.private ;

M: table update-toml
    nip dupd [ name>> entries-at ] [ array?>> ] bi
    [ H{ } clone [ -rot push-at ] keep ] [ check-no-value ] if ;