option-argument ( option -- argument )

Vocabulary

command-line.parser.private

Inputs

option

an object

Outputs

argument

an object

Definition

USING: accessors kernel sequences ;

IN: command-line.parser.private

:: option-argument ( option -- argument )
    option positional?
    [ option option-name ] [
        option aliases>> option option-name "--" prepend prefix
        ", " join option option-meta [ " " glue ] when*
    ] if ;