aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux')
-rw-r--r--new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux b/new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux
index 2104dbf81..ea1b82e98 100644
--- a/new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux
+++ b/new-luxc/source/luxc/lang/translation/js/runtime.jvm.lux
@@ -63,7 +63,7 @@
(`` (def: ((~' ~~) (runtime-implementation-name <lux-name>))
Runtime
(feature <lux-name>
- (function [(~' @)]
+ (function ((~' _) (~' @))
<js-definition>)))))
(def: #export (int value)
@@ -475,13 +475,13 @@
(runtime: int/// "divI64"
(let [negate (|>> (list) (js.apply int//negate))
- negative? (function [value]
+ negative? (function (_ value)
(js.apply int//< (list value int//zero)))
valid-division-check [(=I int//zero "parameter")
(js.throw! (js.string "Cannot divide by zero!"))]
short-circuit-check [(=I int//zero "subject")
(js.return! int//zero)]
- recur (function [subject parameter]
+ recur (function (_ subject parameter)
(js.apply @ (list subject parameter)))]
(js.function @ (list "subject" "parameter")
(list (js.cond! (list valid-division-check
@@ -585,9 +585,9 @@
__int//%))
(runtime: nat//< "ltN64"
- (let [high (function [i64] (format "(" i64 "." //.int-high-field ")"))
- low (function [i64] (format "(" i64 "." //.int-low-field ")"))
- i32 (function [word] (format "(" word " >>> 0)"))]
+ (let [high (function (_ i64) (format "(" i64 "." //.int-high-field ")"))
+ low (function (_ i64) (format "(" i64 "." //.int-low-field ")"))
+ i32 (function (_ word) (format "(" word " >>> 0)"))]
(js.function @ (list "subject" "parameter")
(list (js.return! (js.or (js.> (i32 (high "subject"))
(i32 (high "parameter")))
@@ -615,7 +615,7 @@
(js.apply int//= (list subject param))))
(runtime: nat/// "divN64"
- (let [negative? (function [value]
+ (let [negative? (function (_ value)
(js.apply int//< (list value int//zero)))
valid-division-check [(=I int//zero "parameter")
(js.throw! (js.string "Cannot divide by zero!"))]