From f621a133e6e0a516c0586270fea8eaffb4829d82 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 8 Aug 2021 17:56:15 -0400
Subject: No more #export magic syntax.

---
 stdlib/source/program/aedifex/command/build.lux | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'stdlib/source/program/aedifex/command/build.lux')

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)]
-- 
cgit v1.2.3