diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/program/aedifex/command/build.lux | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/stdlib/source/program/aedifex/command/build.lux b/stdlib/source/program/aedifex/command/build.lux index 23429f123..ff7825678 100644 --- a/stdlib/source/program/aedifex/command/build.lux +++ b/stdlib/source/program/aedifex/command/build.lux @@ -55,12 +55,12 @@ (#.Some dependency) #.None))))) -(def: #export lux_group +(def: .public lux_group Group "com.github.luxlang") (template [<dependency> <definition>] - [(def: #export <definition> + [(def: .public <definition> Name <dependency>)] @@ -71,10 +71,10 @@ ["lux-ruby" ruby_compiler_name] ) -(exception: #export no_available_compiler) -(exception: #export no_specified_program) +(exception: .public no_available_compiler) +(exception: .public no_specified_program) -(type: #export Compiler +(type: .public Compiler (#JVM Dependency) (#JS Dependency) (#Python Dependency) @@ -154,7 +154,7 @@ [#.End #.End] false)))) -(def: #export (host_dependencies fs home) +(def: .public (host_dependencies fs home) (All [!] (-> (file.System !) Path Resolution (List Path))) (|>> dictionary.keys (list.only (|>> (get@ #///dependency.type) @@ -186,12 +186,12 @@ (-> Text (List Text) (List Text)) (|>> (list\map (|>> (list name))) list.concat)) -(def: #export start "[BUILD STARTED]") -(def: #export success "[BUILD ENDED]") -(def: #export failure "[BUILD FAILED]") +(def: .public start "[BUILD STARTED]") +(def: .public success "[BUILD ENDED]") +(def: .public failure "[BUILD FAILED]") (template [<name> <capability>] - [(def: #export (<name> console process) + [(def: .public (<name> console process) (-> (Console Async) (Process Async) (Async (Try Any))) ## This is a very odd way of implementing this function. ## But it's written this way because the more straightforward way (i.e. by using (try.with async.monad)) @@ -249,7 +249,7 @@ (text.join_with ..jvm_class_path_separator) %.text)) -(def: #export (with_jvm_class_path host_dependencies runtime) +(def: .public (with_jvm_class_path host_dependencies runtime) (-> (List Path) ///runtime.Runtime ///runtime.Runtime) (case host_dependencies #.End @@ -260,7 +260,7 @@ (|>> (list& "-classpath" (..jvm_class_path host_dependencies))) runtime))) -(def: #export (do! console program fs shell resolution) +(def: .public (do! console program fs shell resolution) (-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit Compiler Path])) (function (_ profile) (let [target (get@ #///.target profile)] |