check-no-key ( key assoc -- key assoc )

Vocabulary

toml.private

Inputs

key	an object
assoc	an object

Outputs

key	an object
assoc	an object

Definition

USING: assocs kernel toml ;

IN: toml.private

: check-no-key ( key assoc -- key assoc )
    2dup at* nip [ over duplicate-key ] when ;