aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/control/parser/environment.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/library/lux/control/parser/environment.lux14
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)))