option-name ( option -- name )

Vocabulary

command-line.parser.private

Inputs

option

an object

Outputs

name

an object

Definition

USING: accessors combinators.short-circuit kernel sequences
strings ;

IN: command-line.parser.private

: option-name ( option -- name )
    { [ name>> ] [ variable>> dup string? [ name>> ] unless ] }
    1|| [ 45 = ] trim-head ;