aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux
index ce2265a8e..d641041d2 100644
--- a/new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/r/runtime.jvm.lux
@@ -163,7 +163,7 @@
(r.named-list (list [//.int-high-field (as-integer (@@ high))]
[//.int-low-field (as-integer (@@ low))])))
-(do-template [<name> <value>]
+(template [<name> <value>]
[(runtime: <name>
(..int <value>))]
@@ -597,7 +597,7 @@
@@sum//get
))
-(do-template [<name> <op>]
+(template [<name> <op>]
[(runtime: (<name> mask input)
(int//new (<op> (int64-high (@@ mask))
(int64-high (@@ input)))
@@ -659,7 +659,7 @@
(def: inc (-> Expression Expression) (|>> (r.+ (r.int 1))))
-(do-template [<name> <top-cmp>]
+(template [<name> <top-cmp>]
[(def: (<name> top value)
(-> Expression Expression Expression)
(|> (|> value (r.>= (r.int 0)))