diff options
Diffstat (limited to 'stdlib/source/lux/cli.lux')
| -rw-r--r-- | stdlib/source/lux/cli.lux | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/stdlib/source/lux/cli.lux b/stdlib/source/lux/cli.lux index 73c78a7a6..a8604180b 100644 --- a/stdlib/source/lux/cli.lux +++ b/stdlib/source/lux/cli.lux @@ -19,6 +19,7 @@ ## [Types] (type: #export (CLI a) + {#;doc "A command-line interface parser."} (-> (List Text) (Error [(List Text) a]))) ## [Utils] @@ -126,6 +127,7 @@ _ (#;Left (Text/append "Unknown parameters: " (text;join-with " " inputs)))))) (def: #export (assert message test) + {#;doc "Fails with the given message if the test is false."} (-> Text Bool (CLI Unit)) (lambda [inputs] (if test @@ -166,6 +168,7 @@ (#;Right [inputs' (sum;left l)])))) (def: #export (not opt) + {#;doc "The opposite of the given CLI."} (All [a] (-> (CLI a) (CLI Unit))) (lambda [inputs] (case (opt inputs) |