aboutsummaryrefslogtreecommitdiff
path: root/lux-jvm/source/luxc/lang/directive/jvm.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-08-12 03:12:42 -0400
committerEduardo Julian2021-08-12 03:12:42 -0400
commit17629d66062b88b040a2397032f6c08361a5f3a7 (patch)
treebdc6110750b895667b9e45da5e46bec9609f9a7c /lux-jvm/source/luxc/lang/directive/jvm.lux
parenta62ce3f9c2b605e0033f4772b0f64c4525de4d86 (diff)
Improved binding syntax for "syntax:".
Diffstat (limited to 'lux-jvm/source/luxc/lang/directive/jvm.lux')
-rw-r--r--lux-jvm/source/luxc/lang/directive/jvm.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/lux-jvm/source/luxc/lang/directive/jvm.lux b/lux-jvm/source/luxc/lang/directive/jvm.lux
index fa8b1420e..bc038bc92 100644
--- a/lux-jvm/source/luxc/lang/directive/jvm.lux
+++ b/lux-jvm/source/luxc/lang/directive/jvm.lux
@@ -426,7 +426,7 @@
#.None
(let [label' (org/objectweb/asm/Label::new)]
- [(dictionary.put label label' mapping) label'])))
+ [(dictionary.has label label' mapping) label'])))
(def: (relabel_branching [mapping instruction])
(Re_labeler /.Branching)
@@ -1477,6 +1477,6 @@
(def: .public (bundle class_loader extender)
(-> java/lang/ClassLoader jvm.Extender (directive.Bundle jvm.Anchor jvm.Inst jvm.Definition))
(|> bundle.empty
- (dictionary.put "lux def generation" (..def::generation extender))
- (dictionary.put "jvm class" (..jvm::class class_loader))
- (dictionary.put "jvm class interface" ..jvm::class::interface)))
+ (dictionary.has "lux def generation" (..def::generation extender))
+ (dictionary.has "jvm class" (..jvm::class class_loader))
+ (dictionary.has "jvm class interface" ..jvm::class::interface)))