aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/jvm
diff options
context:
space:
mode:
authorEduardo Julian2018-08-16 06:22:54 -0400
committerEduardo Julian2018-08-16 06:22:54 -0400
commite4c1b1645fa1a62a0bf8c90723eab7be634dd67f (patch)
tree8413a7270493bc18c7af67d9458e7c31331a0fc7 /new-luxc/source/luxc/lang/translation/jvm
parent18bb5f90d24376d3731986bf2c16bf6b58dcd3cb (diff)
Extension-related fixes.
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/jvm')
-rw-r--r--new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux2
-rw-r--r--new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux18
2 files changed, 10 insertions, 10 deletions
diff --git a/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux
index f250604b5..9579acaa3 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/expression.jvm.lux
@@ -67,4 +67,4 @@
(function.function translate abstraction)
(#synthesis.Extension extension)
- (extension.apply translate extension)))
+ (extension.apply "Translation" translate extension)))
diff --git a/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux b/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
index efccb25f6..d1826669a 100644
--- a/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/jvm/procedure/common.jvm.lux
@@ -307,27 +307,27 @@
(bundle.install "is" (binary lux::is))
(bundle.install "try" (unary lux::try))))
-(def: bundle::bit
+(def: bundle::i64
Bundle
- (<| (bundle.prefix "bit")
+ (<| (bundle.prefix "i64")
(|> (: Bundle bundle.empty)
(bundle.install "and" (binary bit::and))
(bundle.install "or" (binary bit::or))
(bundle.install "xor" (binary bit::xor))
(bundle.install "left-shift" (binary bit::left-shift))
(bundle.install "logical-right-shift" (binary bit::logical-right-shift))
- (bundle.install "arithmetic-right-shift" (binary bit::arithmetic-right-shift)))))
+ (bundle.install "arithmetic-right-shift" (binary bit::arithmetic-right-shift))
+ (bundle.install "+" (binary i64::+))
+ (bundle.install "-" (binary i64::-))
+ (bundle.install "=" (binary i64::=)))))
-(def: bundle::i64
+(def: bundle::int
Bundle
- (<| (bundle.prefix "i64")
+ (<| (bundle.prefix "int")
(|> (: Bundle bundle.empty)
- (bundle.install "+" (binary i64::+))
- (bundle.install "-" (binary i64::-))
(bundle.install "*" (binary i64::*))
(bundle.install "/" (binary i64::/))
(bundle.install "%" (binary i64::%))
- (bundle.install "=" (binary i64::=))
(bundle.install "<" (binary i64::<))
(bundle.install "to-f64" (unary i64::to-f64))
(bundle.install "char" (unary i64::char)))))
@@ -375,8 +375,8 @@
Bundle
(<| (bundle.prefix "lux")
(|> bundle::lux
- (dictionary.merge bundle::bit)
(dictionary.merge bundle::i64)
+ (dictionary.merge bundle::int)
(dictionary.merge bundle::f64)
(dictionary.merge bundle::text)
(dictionary.merge bundle::io))))