check-duplicate-keys ( alist -- alist )

Vocabulary

bare.private

Inputs

alist

an object

Outputs

alist

an object

Definition

USING: assocs bare kernel sequences sets ;

IN: bare.private

: check-duplicate-keys ( alist -- alist )
    dup keys duplicates [ duplicate-keys ] unless-empty ;