From c7f67a85f980db2dab2e2d7df4168af83e9013a8 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 29 Nov 2022 18:48:42 -0400
Subject: Added money-handling machinery.

---
 stdlib/source/unsafe/lux/data/binary.lux           | 20 ++++++++++----------
 stdlib/source/unsafe/lux/data/collection/array.lux | 12 ++++++------
 2 files changed, 16 insertions(+), 16 deletions(-)

(limited to 'stdlib/source/unsafe')

diff --git a/stdlib/source/unsafe/lux/data/binary.lux b/stdlib/source/unsafe/lux/data/binary.lux
index fd68e39e0..7895f0f55 100644
--- a/stdlib/source/unsafe/lux/data/binary.lux
+++ b/stdlib/source/unsafe/lux/data/binary.lux
@@ -72,9 +72,9 @@
                          .int
                          .int_f64#
                          []
-                         ("js object new" ("js constant" "ArrayBuffer"))
+                         (.js_object_new# (.js_constant# "ArrayBuffer"))
                          []
-                         ("js object new" ("js constant" "Uint8Array"))
+                         (.js_object_new# (.js_constant# "Uint8Array"))
                          (.as ..Binary))
 
                     (,, (.static @.python))
@@ -99,7 +99,7 @@
 
                       (,, (.static @.js))
                       (.|> <it>
-                           ("js object get" "length")
+                           (.js_object_get# "length")
                            (.as .Frac)
                            .f64_int#
                            .nat)
@@ -137,7 +137,7 @@
                       (,, (.static @.js))
                       (.|> <it>
                            (.as (array.Array .Frac))
-                           ("js array read" <index>)
+                           (.js_array_read# <index>)
                            (.as .Frac)
                            .f64_int#
                            .i64)
@@ -216,12 +216,12 @@
                       (.|> <it>
                            (.is ..Binary)
                            (.as (array.Array .Frac))
-                           ("js array write" <index>
-                            (.|> <value>
-                                 .int
-                                 (.i64_and# (.int <byte>))
-                                 .int_f64#
-                                 .as_expected))
+                           (.js_array_write# <index>
+                                             (.|> <value>
+                                                  .int
+                                                  (.i64_and# (.int <byte>))
+                                                  .int_f64#
+                                                  .as_expected))
                            (.as ..Binary))
                       
                       (,, (.static @.python))
diff --git a/stdlib/source/unsafe/lux/data/collection/array.lux b/stdlib/source/unsafe/lux/data/collection/array.lux
index 3472d6d36..6fcd99736 100644
--- a/stdlib/source/unsafe/lux/data/collection/array.lux
+++ b/stdlib/source/unsafe/lux/data/collection/array.lux
@@ -45,7 +45,7 @@
                               .jvm_array_new_object#
                               (.is (..Array <item_type>)))
 
-                          (,, (.static @.js)) ("js array new" size)
+                          (,, (.static @.js)) (.js_array_new# size)
                           (,, (.static @.python)) (.python_array_new# size)
                           (,, (.static @.lua)) (.lua_array_new# size)
                           (,, (.static @.ruby)) (.ruby_array_new# size)
@@ -68,7 +68,7 @@
                               (.is <index_type>)
                               (.as .Nat))
 
-                         (,, (.static @.js)) ("js array length" array)
+                         (,, (.static @.js)) (.js_array_length# array)
                          (,, (.static @.python)) (.python_array_length# array)
                          (,, (.static @.lua)) (.lua_array_length# array)
                          (,, (.static @.ruby)) (.ruby_array_length# array)
@@ -95,7 +95,7 @@
                                   (.jvm_array_read_object# (,, (jvm_int index)))
                                   .jvm_object_null?#)
 
-                             (,, (.static @.js)) (,, (lacks?' "js array read" "js object undefined?" index array))
+                             (,, (.static @.js)) (,, (lacks?' .js_array_read# .js_object_undefined?# index array))
                              (,, (.static @.python)) (,, (lacks?' .python_array_read# .python_object_none?# index array))
                              (,, (.static @.lua)) (,, (lacks?' .lua_array_read# .lua_object_nil?# index array))
                              (,, (.static @.ruby)) (,, (lacks?' .ruby_array_read# .ruby_object_nil?# index array))
@@ -120,7 +120,7 @@
                           (,, (.static @.jvm))
                           (.jvm_array_read_object# (,, (jvm_int index)) array)
 
-                          (,, (.static @.js)) ("js array read" index array)
+                          (,, (.static @.js)) (.js_array_read# index array)
                           (,, (.static @.python)) (.python_array_read# index array)
                           (,, (.static @.lua)) (.lua_array_read# index array)
                           (,, (.static @.ruby)) (.ruby_array_read# index array)
@@ -141,7 +141,7 @@
                               (.jvm_array_write_object# (,, (jvm_int index)) value)
                               .as_expected)
 
-                         (,, (.static @.js)) ("js array write" index (.as_expected value) array)
+                         (,, (.static @.js)) (.js_array_write# index (.as_expected value) array)
                          (,, (.static @.python)) (.python_array_write# index (.as_expected value) array)
                          (,, (.static @.lua)) (.lua_array_write# index (.as_expected value) array)
                          (,, (.static @.ruby)) (.ruby_array_write# index (.as_expected value) array)
@@ -162,7 +162,7 @@
                              (,, (.static @.jvm))
                              (..has! index (.as_expected (is <item_type> (.jvm_object_null#))) array)
 
-                             (,, (.static @.js)) ("js array delete" index array)
+                             (,, (.static @.js)) (.js_array_delete# index array)
                              (,, (.static @.python)) (.python_array_delete# index array)
                              (,, (.static @.lua)) (.lua_array_delete# index array)
                              (,, (.static @.ruby)) (.ruby_array_delete# index array)
-- 
cgit v1.2.3