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/extension/host.lux | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux') diff --git a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux index 137633847..e32e35869 100644 --- a/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux +++ b/lux-jvm/source/luxc/lang/translation/jvm/extension/host.lux @@ -980,7 +980,7 @@ (_.ALOAD (++ register)) (_.PUTFIELD class (///reference.foreign_name register) $Object)))) _.fuse)] - (_def.method #$.Public $.noneM "" (anonymous_init_method env) + (_def.method {$.#Public} $.noneM "" (anonymous_init_method env) (|>> (_.ALOAD 0) ((_.fuse (list#each product.right inputsTI))) (_.INVOKESPECIAL super_class "" (type.method [(list) (list#each product.left inputsTI) type.void (list)])) @@ -1132,7 +1132,7 @@ [bodyG (generation.with_context artifact_id (generate archive bodyS)) .let [argumentsT (list#each product.right arguments)]] - (in (_def.method #$.Public + (in (_def.method {$.#Public} (if strict_fp? ($_ $.++M $.finalM $.strictM) $.finalM) @@ -1143,7 +1143,7 @@ (returnI returnT))))))) (# ! each _def.fuse)) .let [directive [anonymous_class_name - (_def.class #$.V1_6 #$.Public $.finalC + (_def.class {$.#V1_6} {$.#Public} $.finalC anonymous_class_name (list) super_class super_interfaces (|>> (///function.with_environment total_environment) -- cgit v1.2.3