aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux')
-rw-r--r--stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
index 4ef27d1d8..4913607a6 100644
--- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
+++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux
@@ -363,7 +363,7 @@
(phase\map jvm.array (jvm_type elemT))
(#.Primitive class parametersT)
- (case (dictionary.get class ..boxes)
+ (case (dictionary.value class ..boxes)
(#.Some [_ primitive_type])
(case parametersT
#.End
@@ -556,7 +556,7 @@
[jvm.char]))
(text.starts_with? descriptor.array_prefix name)
- (let [[_ unprefixed] (maybe.assume (text.split_with descriptor.array_prefix name))]
+ (let [[_ unprefixed] (maybe.assume (text.split_by descriptor.array_prefix name))]
(\ phase.monad map jvm.array
(check_jvm (#.Primitive unprefixed (list)))))
@@ -604,7 +604,7 @@
(def: (check_return type)
(-> .Type (Operation (Type Return)))
- (if (is? .Any type)
+ (if (same? .Any type)
(phase\in jvm.void)
(check_jvm type)))
@@ -1116,7 +1116,7 @@
(case (jvm_parser.var? actualJC)
(#.Some name)
(|> aliasing
- (dictionary.get name)
+ (dictionary.value name)
(maybe.else name)
jvm.var)
@@ -1146,7 +1146,7 @@
(case (jvm_parser.var? actualJC)
(#.Some name)
(|> aliasing
- (dictionary.get name)
+ (dictionary.value name)
(maybe.else name)
jvm.var)