aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/command
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/aedifex/command')
-rw-r--r--stdlib/source/program/aedifex/command/auto.lux4
-rw-r--r--stdlib/source/program/aedifex/command/build.lux24
-rw-r--r--stdlib/source/program/aedifex/command/clean.lux4
-rw-r--r--stdlib/source/program/aedifex/command/deploy.lux4
-rw-r--r--stdlib/source/program/aedifex/command/deps.lux2
-rw-r--r--stdlib/source/program/aedifex/command/install.lux6
-rw-r--r--stdlib/source/program/aedifex/command/pom.lux4
-rw-r--r--stdlib/source/program/aedifex/command/test.lux8
-rw-r--r--stdlib/source/program/aedifex/command/version.lux2
9 files changed, 29 insertions, 29 deletions
diff --git a/stdlib/source/program/aedifex/command/auto.lux b/stdlib/source/program/aedifex/command/auto.lux
index f4e2ab18f..2c4c8ac19 100644
--- a/stdlib/source/program/aedifex/command/auto.lux
+++ b/stdlib/source/program/aedifex/command/auto.lux
@@ -35,7 +35,7 @@
(\ ! join)
(\ ! map (|>> list.concat (list& path))))))
-(def: #export delay
+(def: .public delay
Nat
1,000)
@@ -43,7 +43,7 @@
(-> Nat (Async (Try Any)))
(async.delay delay (#try.Success [])))
-(def: #export (do! delay watcher command)
+(def: .public (do! delay watcher command)
(All [a]
(-> Nat (Watcher Async)
(-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit a]))
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)]
diff --git a/stdlib/source/program/aedifex/command/clean.lux b/stdlib/source/program/aedifex/command/clean.lux
index c03a09b49..67d539db7 100644
--- a/stdlib/source/program/aedifex/command/clean.lux
+++ b/stdlib/source/program/aedifex/command/clean.lux
@@ -26,11 +26,11 @@
(\ ! map (monad.map ! (\ fs delete)))
(\ ! join))))
-(def: #export success
+(def: .public success
(-> ///.Target Text)
(|>> (format "Successfully cleaned target directory: ")))
-(def: #export (do! console fs profile)
+(def: .public (do! console fs profile)
(-> (Console Async) (file.System Async) (Command Any))
(do {! async.monad}
[.let [target (get@ #///.target profile)]
diff --git a/stdlib/source/program/aedifex/command/deploy.lux b/stdlib/source/program/aedifex/command/deploy.lux
index b7b08f517..2ff5ca8fb 100644
--- a/stdlib/source/program/aedifex/command/deploy.lux
+++ b/stdlib/source/program/aedifex/command/deploy.lux
@@ -53,10 +53,10 @@
["#/." extension (#+ Extension)]
["#/." type]]]])
-(def: #export success
+(def: .public success
"Successfully deployed the project.")
-(def: #export (do! console repository fs artifact profile)
+(def: .public (do! console repository fs artifact profile)
(-> (Console Async) (Repository Async) (file.System Async) Artifact (Command Any))
(do {! ///action.monad}
[library (|> profile
diff --git a/stdlib/source/program/aedifex/command/deps.lux b/stdlib/source/program/aedifex/command/deps.lux
index 342c9c0bc..9dbabbfca 100644
--- a/stdlib/source/program/aedifex/command/deps.lux
+++ b/stdlib/source/program/aedifex/command/deps.lux
@@ -37,7 +37,7 @@
///artifact.format
%.text))
-(def: #export (do! console local remotes new_repository profile)
+(def: .public (do! console local remotes new_repository profile)
(-> (Console Async) (Repository Async) (List (Repository Async)) (-> URL (Repository Async)) (Command Resolution))
(do async.monad
[.let [dependencies (|> (get@ #///.dependencies profile)
diff --git a/stdlib/source/program/aedifex/command/install.lux b/stdlib/source/program/aedifex/command/install.lux
index b39b30f85..c86400b6a 100644
--- a/stdlib/source/program/aedifex/command/install.lux
+++ b/stdlib/source/program/aedifex/command/install.lux
@@ -43,13 +43,13 @@
["#." artifact (#+ Artifact)
["#/." type]]]])
-(def: #export success
+(def: .public success
"Successfully installed the project locally.")
-(def: #export failure
+(def: .public failure
"Failure: No 'identity' defined for the project.")
-(def: #export (do! console fs repository profile)
+(def: .public (do! console fs repository profile)
(-> (Console Async) (file.System Async) (Repository Async) (Command Any))
(case (get@ #/.identity profile)
(#.Some identity)
diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux
index 3b6412070..163fa87fa 100644
--- a/stdlib/source/program/aedifex/command/pom.lux
+++ b/stdlib/source/program/aedifex/command/pom.lux
@@ -22,10 +22,10 @@
["#." action]
["#." pom]])
-(def: #export success
+(def: .public success
(format "Successfully created POM file: " ///pom.file))
-(def: #export (do! console fs profile)
+(def: .public (do! console fs profile)
(-> (Console Async) (file.System Async) (Command Any))
(do ///action.monad
[content (|> (///pom.write profile)
diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux
index 78859819d..a7279c5ec 100644
--- a/stdlib/source/program/aedifex/command/test.lux
+++ b/stdlib/source/program/aedifex/command/test.lux
@@ -24,11 +24,11 @@
[dependency
[resolution (#+ Resolution)]]]])
-(def: #export start "[TEST STARTED]")
-(def: #export success "[TEST ENDED]")
-(def: #export failure "[TEST FAILED]")
+(def: .public start "[TEST STARTED]")
+(def: .public success "[TEST ENDED]")
+(def: .public failure "[TEST FAILED]")
-(def: #export (do! console program fs shell resolution profile)
+(def: .public (do! console program fs shell resolution profile)
(-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit Any]))
(do async.monad
[environment (program.environment async.monad program)
diff --git a/stdlib/source/program/aedifex/command/version.lux b/stdlib/source/program/aedifex/command/version.lux
index 0c5c944b5..d66738f11 100644
--- a/stdlib/source/program/aedifex/command/version.lux
+++ b/stdlib/source/program/aedifex/command/version.lux
@@ -15,7 +15,7 @@
[///
[command (#+ Command)]])
-(def: #export (do! console profile)
+(def: .public (do! console profile)
(-> (Console Async) (Command Any))
(console.write_line (version.format language/lux.version)
console))