From c19b19a2d48c3937bae72982cbb88b78d21b3891 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Mon, 13 Sep 2021 01:35:52 -0400 Subject: Updated new compilers w.r.t. removal of tags/labels. --- lux-jvm/source/luxc/lang/translation/jvm/function.lux | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) (limited to 'lux-jvm/source/luxc/lang/translation/jvm/function.lux') 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_method env arity) + (def.method {$.#Public} $.noneM "" (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)]] -- cgit v1.2.3