diff options
Diffstat (limited to 'stdlib/source/library/lux/control/parser/environment.lux')
| -rw-r--r-- | stdlib/source/library/lux/control/parser/environment.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/library/lux/control/parser/environment.lux b/stdlib/source/library/lux/control/parser/environment.lux index b7d2d8ebf..fe7c0ea59 100644 --- a/stdlib/source/library/lux/control/parser/environment.lux +++ b/stdlib/source/library/lux/control/parser/environment.lux @@ -12,28 +12,28 @@ ["." dictionary (#+ Dictionary)]]]]] ["." //]) -(type: #export Property +(type: .public Property {#.doc (doc "A property in the environment.")} Text) -(type: #export Environment +(type: .public Environment {#.doc (doc "An abstraction for environment variables of a program.")} (Dictionary Property Text)) -(exception: #export (unknown_property {property Property}) +(exception: .public (unknown_property {property Property}) (exception.report ["Property" (%.text property)])) -(type: #export (Parser a) +(type: .public (Parser a) {#.doc (doc "A parser of environment variables of a program.")} (//.Parser Environment a)) -(def: #export empty +(def: .public empty {#.doc (doc "An empty environment.")} Environment (dictionary.empty text.hash)) -(def: #export (property name) +(def: .public (property name) (-> Property (Parser Text)) (function (_ environment) (case (dictionary.get name environment) @@ -43,7 +43,7 @@ #.None (exception.except ..unknown_property [name])))) -(def: #export (run parser environment) +(def: .public (run parser environment) {#.doc (doc "Executes a parser against the given environment variables." "Does not check whether all environment variables were parsed, since they're usually an open set.")} (All [a] (-> (Parser a) Environment (Try a))) |