(with-options) ( ... options command-line quot: ( ... -- ... ) -- ... )

Vocabulary

command-line.parser

Inputs

options	an object
command-line	an object
quot	a quotation with stack effect ( ... -- ... )

Outputs

None

See also

with-options

Definition

USING: command-line.parser.private continuations debugger io
kernel namespaces ;

IN: command-line.parser

: (with-options)
    ( ... options command-line quot: ( ... -- ... ) -- ... )
    [ [ (parse-options) ] 2curry ] dip [ with-variables ] curry
    compose [
        dup option-error? [
            dup usage-error? [ "ERROR: " write ] unless
            print-error
        ] [ rethrow ] if
    ] recover ; inline