diff options
Diffstat (limited to '')
| -rw-r--r-- | lux-jvm/source/luxc/lang/translation/jvm/function.lux | 18 | 
1 files changed, 9 insertions, 9 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/function.lux b/lux-jvm/source/luxc/lang/translation/jvm/function.lux index fc8670946..17a246833 100644 --- a/lux-jvm/source/luxc/lang/translation/jvm/function.lux +++ b/lux-jvm/source/luxc/lang/translation/jvm/function.lux @@ -127,7 +127,7 @@  (def: (with_reset class arity env)    (-> (Type Class) Arity (Environment Synthesis) Def) -  (def.method #$.Public $.noneM "reset" (reset_method class) +  (def.method {$.#Public} $.noneM "reset" (reset_method class)                (if (poly_arg? arity)                  (let [env_size (list.size env)                        captureI (|> (case env_size @@ -151,7 +151,7 @@  (def: (with_implementation arity @begin bodyI)    (-> Nat Label Inst Def) -  (def.method #$.Public $.strictM "impl" (implementation_method arity) +  (def.method {$.#Public} $.strictM "impl" (implementation_method arity)                (|>> (_.label @begin)                     bodyI                     _.ARETURN))) @@ -189,7 +189,7 @@                                                   (_.PUTFIELD class (reference.partial_name idx) //.$Value)))))                               _.fuse)                           function.identity)] -    (def.method #$.Public $.noneM "<init>" (init_method env arity) +    (def.method {$.#Public} $.noneM "<init>" (init_method env arity)                  (|>> (_.ALOAD 0)                       (function_init arity env_size)                       store_capturedI @@ -253,7 +253,7 @@                                                 _.ARETURN))                                          ))))                     _.fuse)] -    (def.method #$.Public $.noneM //runtime.apply_method (//runtime.apply_signature apply_arity) +    (def.method {$.#Public} $.noneM //runtime.apply_method (//runtime.apply_signature apply_arity)                  (|>> get_amount_of_partialsI                       (_.TABLESWITCH +0 (|> num_partials -- .int)                                      @default @labels) @@ -264,7 +264,7 @@    (-> (Environment Synthesis) Def)    (|>> list.enumeration         (list@each (.function (_ [env_idx env_source]) -                    (def.field #$.Private $.finalF (reference.foreign_name env_idx) //.$Value))) +                    (def.field {$.#Private} $.finalF (reference.foreign_name env_idx) //.$Value)))         def.fuse))  (def: (with_partial arity) @@ -272,7 +272,7 @@    (if (poly_arg? arity)      (|> (enum.range n.enum 0 (n.- 2 arity))          (list@each (.function (_ idx) -                     (def.field #$.Private $.finalF (reference.partial_name idx) //.$Value))) +                     (def.field {$.#Private} $.finalF (reference.partial_name idx) //.$Value)))          def.fuse)      function.identity)) @@ -287,12 +287,12 @@                          (list@each (with_apply classD env arity @begin bodyI))                          (list& (with_implementation arity @begin bodyI))                          def.fuse) -                    (def.method #$.Public $.strictM //runtime.apply_method (//runtime.apply_signature 1) +                    (def.method {$.#Public} $.strictM //runtime.apply_method (//runtime.apply_signature 1)                                  (|>> (_.label @begin)                                       bodyI                                       _.ARETURN))))          functionD (: Def -                     (|>> (def.int_field #$.Public ($_ $.++F $.staticF $.finalF) arity_field (.int arity)) +                     (|>> (def.int_field {$.#Public} ($_ $.++F $.staticF $.finalF) arity_field (.int arity))                            (with_environment env)                            (with_partial arity)                            (with_init classD env arity) @@ -322,7 +322,7 @@       .let [function_class (//.class_name function_context)]       [functionD instanceI] (..with_function generate archive @begin function_class env arity bodyI)       .let [directive [function_class -                      (def.class #$.V1_6 #$.Public $.finalC +                      (def.class {$.#V1_6} {$.#Public} $.finalC                                   function_class (list)                                   //.$Function (list)                                   functionD)]]  | 
