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.

---
 lux-jvm/source/luxc/lang/translation/jvm.lux | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

(limited to 'lux-jvm/source/luxc/lang/translation/jvm.lux')

diff --git a/lux-jvm/source/luxc/lang/translation/jvm.lux b/lux-jvm/source/luxc/lang/translation/jvm.lux
index 4cf712a45..46242abc7 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm.lux
@@ -57,23 +57,23 @@
 
 (import: java/lang/ClassLoader)
 
-(type: #export ByteCode Binary)
+(type: .public ByteCode Binary)
 
-(def: #export value_field Text "_value")
-(def: #export $Value (type.class "java.lang.Object" (list)))
+(def: .public value_field Text "_value")
+(def: .public $Value (type.class "java.lang.Object" (list)))
 
-(exception: #export (cannot_load {class Text} {error Text})
+(exception: .public (cannot_load {class Text} {error Text})
   (exception.report
    ["Class" class]
    ["Error" error]))
 
-(exception: #export (invalid_field {class Text} {field Text} {error Text})
+(exception: .public (invalid_field {class Text} {field Text} {error Text})
   (exception.report
    ["Class" class]
    ["Field" field]
    ["Error" error]))
 
-(exception: #export (invalid_value {class Text})
+(exception: .public (invalid_value {class Text})
   (exception.report
    ["Class" class]))
 
@@ -98,11 +98,11 @@
 
 (def: class_path_separator ".")
 
-(def: #export bytecode_name
+(def: .public bytecode_name
   (-> Text Text)
   (text.replace_all ..class_path_separator .module_separator))
 
-(def: #export (class_name [module_id artifact_id])
+(def: .public (class_name [module_id artifact_id])
   (-> generation.Context Text)
   (format lux_context
           ..class_path_separator (%.nat version.version)
@@ -154,7 +154,7 @@
                      custom)
          value definition])))
 
-(def: #export host
+(def: .public host
   (IO [java/lang/ClassLoader Host])
   (io (let [library (loader.new_library [])
             loader (loader.memory library)]
@@ -181,20 +181,20 @@
              (def: (re_load context custom [directive_name bytecode])
                (io.run
                 (do (try.with io.monad)
-                  [#let [class_name (maybe.else (..class_name context)
+                  [.let [class_name (maybe.else (..class_name context)
                                                 custom)]
                    _ (loader.store class_name bytecode library)
                    class (loader.load class_name loader)]
                   (\ io.monad in (..class_value class_name class)))))))])))
 
-(def: #export $Variant
+(def: .public $Variant
   (type.array ..$Value))
 
-(def: #export $Tuple
+(def: .public $Tuple
   (type.array ..$Value))
 
-(def: #export $Runtime
+(def: .public $Runtime
   (type.class (..class_name [0 0]) (list)))
 
-(def: #export $Function
+(def: .public $Function
   (type.class (..class_name [0 1]) (list)))
-- 
cgit v1.2.3