From a4847190df926d35f7ece97da50a2a8b1462a24f Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Thu, 28 Jul 2022 02:44:45 -0400 Subject: Now statically resolving values from globals in pattern-matching. --- lux-js/source/program.lux | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'lux-js/source') diff --git a/lux-js/source/program.lux b/lux-js/source/program.lux index 69656c4bc..b7053d6e9 100644 --- a/lux-js/source/program.lux +++ b/lux-js/source/program.lux @@ -177,14 +177,14 @@ (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (getMember self [member java/lang/String]) java/lang/Object (case (ffi.of_string member) - (static runtime.i64_high_field) + runtime.i64_high_field (|> value .nat runtime.high jvm_int (ffi.is java/lang/Object)) - (static runtime.i64_low_field) + runtime.i64_low_field (|> value .nat runtime.low @@ -203,7 +203,7 @@ [] (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (isFunction self []) boolean - (ffi.as_boolean #1)) + (ffi.as_boolean true)) (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (call self [this java/lang/Object args [java/lang/Object]]) @@ -221,7 +221,7 @@ [] (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (isFunction self []) boolean - (ffi.as_boolean #1)) + (ffi.as_boolean true)) (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (call self [this java/lang/Object args [java/lang/Object]]) @@ -269,7 +269,7 @@ (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (isArray self []) boolean - (ffi.as_boolean #1)) + (ffi.as_boolean true)) (org/openjdk/nashorn/api/scripting/AbstractJSObject [] (getMember self [member java/lang/String]) java/lang/Object @@ -288,12 +288,12 @@ (|> (::slice js_object value) (ffi.is java/lang/Object)) - (static runtime.variant_tag_field) + runtime.variant_tag_field (|> value (array.item 0) maybe.trusted) - (static runtime.variant_flag_field) + runtime.variant_flag_field (case (array.item 1 value) {.#Some set!} set! @@ -301,7 +301,7 @@ _ (ffi.null)) - (static runtime.variant_value_field) + runtime.variant_value_field (|> value (array.item 2) maybe.trusted -- cgit v1.2.3