aboutsummaryrefslogtreecommitdiff
path: root/lux-jvm/source/luxc/lang/translation/jvm/primitive.lux
diff options
context:
space:
mode:
Diffstat (limited to 'lux-jvm/source/luxc/lang/translation/jvm/primitive.lux')
-rw-r--r--lux-jvm/source/luxc/lang/translation/jvm/primitive.lux20
1 files changed, 10 insertions, 10 deletions
diff --git a/lux-jvm/source/luxc/lang/translation/jvm/primitive.lux b/lux-jvm/source/luxc/lang/translation/jvm/primitive.lux
index d8ab2cbee..2e0aba43e 100644
--- a/lux-jvm/source/luxc/lang/translation/jvm/primitive.lux
+++ b/lux-jvm/source/luxc/lang/translation/jvm/primitive.lux
@@ -34,14 +34,14 @@
(-> (I64 Any) (Operation Inst))
(case (.int value)
(^template [<int> <instruction>]
- <int>
- (operation@wrap (|>> <instruction> (_.wrap type.long))))
+ [<int>
+ (operation@wrap (|>> <instruction> (_.wrap type.long)))])
([+0 _.LCONST_0]
[+1 _.LCONST_1])
(^template [<int> <instruction>]
- <int>
- (operation@wrap (|>> <instruction> _.I2L (_.wrap type.long))))
+ [<int>
+ (operation@wrap (|>> <instruction> _.I2L (_.wrap type.long)))])
([-1 _.ICONST_M1]
## [+0 _.ICONST_0]
## [+1 _.ICONST_1]
@@ -74,18 +74,18 @@
(-> Frac (Operation Inst))
(case value
(^template [<int> <instruction>]
- <int>
- (operation@wrap (|>> <instruction> (_.wrap type.double))))
+ [<int>
+ (operation@wrap (|>> <instruction> (_.wrap type.double)))])
([+1.0 _.DCONST_1])
(^template [<int> <instruction>]
- <int>
- (operation@wrap (|>> <instruction> _.F2D (_.wrap type.double))))
+ [<int>
+ (operation@wrap (|>> <instruction> _.F2D (_.wrap type.double)))])
([+2.0 _.FCONST_2])
(^template [<int> <instruction>]
- <int>
- (operation@wrap (|>> <instruction> _.I2D (_.wrap type.double))))
+ [<int>
+ (operation@wrap (|>> <instruction> _.I2D (_.wrap type.double)))])
([-1.0 _.ICONST_M1]
## [+0.0 _.ICONST_0]
## [+1.0 _.ICONST_1]