aboutsummaryrefslogtreecommitdiff
path: root/lux-js
diff options
context:
space:
mode:
Diffstat (limited to 'lux-js')
-rw-r--r--lux-js/source/program.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/lux-js/source/program.lux b/lux-js/source/program.lux
index 6d13abf41..d90d5e711 100644
--- a/lux-js/source/program.lux
+++ b/lux-js/source/program.lux
@@ -176,11 +176,11 @@
(org/openjdk/nashorn/api/scripting/AbstractJSObject
[] (getMember self [member java/lang/String]) java/lang/Object
(case (ffi.of_string member)
- (pattern (static runtime.i64_high_field))
+ (static runtime.i64_high_field)
(|> value .nat runtime.high jvm_int
(ffi.is java/lang/Object))
- (pattern (static runtime.i64_low_field))
+ (static runtime.i64_low_field)
(|> value .nat runtime.low jvm_int
(ffi.is java/lang/Object))
@@ -275,12 +275,12 @@
(|> (::slice js_object value)
(ffi.is java/lang/Object))
- (pattern (static runtime.variant_tag_field))
+ (static runtime.variant_tag_field)
(|> value
(array.read! 0)
maybe.trusted)
- (pattern (static runtime.variant_flag_field))
+ (static runtime.variant_flag_field)
(case (array.read! 1 value)
{.#Some set!}
set!
@@ -288,7 +288,7 @@
_
(ffi.null))
- (pattern (static runtime.variant_value_field))
+ (static runtime.variant_value_field)
(|> value
(array.read! 2)
maybe.trusted