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.

---
 .../source/luxc/lang/translation/jvm/runtime.lux   | 34 +++++++++++-----------
 1 file changed, 17 insertions(+), 17 deletions(-)

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

diff --git a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
index e8f678211..13c5fe074 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/runtime.lux
@@ -40,11 +40,11 @@
   ["." // (#+ ByteCode)])
 
 (def: $Text (type.class "java.lang.String" (list)))
-(def: #export $Tag type.int)
-(def: #export $Flag (type.class "java.lang.Object" (list)))
-(def: #export $Value (type.class "java.lang.Object" (list)))
-(def: #export $Index type.int)
-(def: #export $Stack (type.array $Value))
+(def: .public $Tag type.int)
+(def: .public $Flag (type.class "java.lang.Object" (list)))
+(def: .public $Value (type.class "java.lang.Object" (list)))
+(def: .public $Index type.int)
+(def: .public $Stack (type.array $Value))
 (def: $Throwable (type.class "java.lang.Throwable" (list)))
 
 (def: nullary_init_methodT
@@ -53,7 +53,7 @@
 (def: throw_methodT
   (type.method [(list) (list) type.void (list)]))
 
-(def: #export logI
+(def: .public logI
   Inst
   (let [PrintStream (type.class "java.io.PrintStream" (list))
         outI (_.GETSTATIC (type.class "java.lang.System" (list)) "out" PrintStream)
@@ -65,11 +65,11 @@
 (def: variant_method
   (type.method [(list) (list $Tag $Flag $Value) //.$Variant (list)]))
 
-(def: #export variantI
+(def: .public variantI
   Inst
   (_.INVOKESTATIC //.$Runtime "variant_make" variant_method))
 
-(def: #export leftI
+(def: .public leftI
   Inst
   (|>> _.ICONST_0
        _.NULL
@@ -77,7 +77,7 @@
        _.POP2
        variantI))
 
-(def: #export rightI
+(def: .public rightI
   Inst
   (|>> _.ICONST_1
        (_.string "")
@@ -85,9 +85,9 @@
        _.POP2
        variantI))
 
-(def: #export someI Inst rightI)
+(def: .public someI Inst rightI)
 
-(def: #export noneI
+(def: .public noneI
   Inst
   (|>> _.ICONST_0
        _.NULL
@@ -109,11 +109,11 @@
            noneI
            _.ARETURN)))
 
-(def: #export partials_field Text "partials")
-(def: #export apply_method Text "apply")
-(def: #export num_apply_variants Nat 8)
+(def: .public partials_field Text "partials")
+(def: .public apply_method Text "apply")
+(def: .public num_apply_variants Nat 8)
 
-(def: #export (apply_signature arity)
+(def: .public (apply_signature arity)
   (-> Arity (Type Method))
   (type.method [(list) (list.repeat arity $Value) $Value (list)]))
 
@@ -292,7 +292,7 @@
                              )))
          )))
 
-(def: #export try (type.method [(list) (list //.$Function) //.$Variant (list)]))
+(def: .public try (type.method [(list) (list //.$Function) //.$Variant (list)]))
 
 (def: io_methods
   Def
@@ -390,7 +390,7 @@
        _ (generation.save! ..function_id #.None directive)]
       (in [..function_id #.None bytecode]))))
 
-(def: #export translate
+(def: .public translate
   (Operation [Registry Output])
   (do phase.monad
     [runtime_payload ..translate_runtime
-- 
cgit v1.2.3