<command-option> ( commands -- option )

Vocabulary

command-line.parser.private

Inputs

commands

an object

Outputs

option

an object

Definition

USING: accessors assocs command-line.parser kernel sequences ;

IN: command-line.parser.private

: <command-option> ( commands -- option )
    option new "command" >>name swap keys "," join
    "{" "}" surround >>help command >>variable ;