roc-lang/roc
1
1
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2024-09-22 00:09:33 +03:00
Code Issues Packages Projects Releases Wiki Activity

Start on parseFormatted

Browse Source
This commit is contained in:
Ayaz Hafiz 2022-09-12 09:02:25 -04:00
parent e7c0cad1e7
commit 9c34aac6fd
No known key found for this signature in database
GPG Key ID: 0E2A37416A25EF58
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
examples/interactive/cli-platform/Arg.roc
View File

@ -197,6 +197,15 @@ parse = \@Parser parser, args ->
WithConfig parser2 _config ->
parse parser2 args
## Like [parse], runs a parser to completion on a list of arguments.
## If the parser fails, a formatted error and help message is returned.
parseFormatted : Parser a, List Str -> Result a Str
parseFormatted = \parser, args ->
when parse parser args is
Ok a -> Ok a
Err e ->
Str.concat (Str.concat (formatHelp parser) "\n\n") (formatError e)
bool : _ -> Parser Bool # TODO: panics if OptConfig annotated
bool = \{ long, short ? NotProvided, help ? NotProvided } ->
fn = \args ->