check-option-names ( options -- options )

Vocabulary

command-line.parser.private

Inputs

options

an object

Outputs

options

an object

Definition

USING: kernel sequences sets ;

IN: command-line.parser.private

:: check-option-names ( options -- options )
    options [ optional? ] filter :> optional optional
    [ option-names ] map concat duplicates [
        first dup optional [ option-names member? ] with filter
        duplicate-option-name
    ] unless-empty options ;