Convert more tests to the node test runner (rescript-lang#6978)

* Convert more tests to the node test runner

* CHANGELOG

Author: cknitt

CHANGELOG.md

@@ -33,6 +33,7 @@
 #### :house: Internal
 
 - Add dev container. https://github.com/rescript-lang/rescript-compiler/pull/6962
+- Convert more tests to the node test runner. https://github.com/rescript-lang/rescript-compiler/pull/6956
 
 # 12.0.0-alpha.1
 
@@ -95,7 +96,7 @@
 - Remove the transformation of `foo(1,2)` into `Js.Internal.opaqueFullApply(Internal.opaque(f), 1, 2)`, and change the back-end to treat all applications as uncurried. https://github.com/rescript-lang/rescript-compiler/pull/6893
 - Remove `@uncurry` from ReScript sources (others, tests). https://github.com/rescript-lang/rescript-compiler/pull/6938
 - Remove leftover uncurried handling. https://github.com/rescript-lang/rescript-compiler/pull/6939 https://github.com/rescript-lang/rescript-compiler/pull/6940
-- Use node test runner instead of mocha. https://github.com/rescript-lang/rescript-compiler/pull/6956
+- Start converting tests from mocha to the node test runner. https://github.com/rescript-lang/rescript-compiler/pull/6956
 
 #### :nail_care: Polish
 

jscomp/build_tests/react_ppx/src/gpr_3987_test.bs.js

@@ -1,9 +1,8 @@
 open Node_test
+open Node_test_util
 
 module F = Belt.Float
 
-let eq = (loc, a, b) => Node_assert.equal(a, b, ~message=loc)
-
 describe("Belt.Float", () => {
   test("fromInt", () => {
     eq(__LOC__, F.fromInt(1), 1.0)

jscomp/test/belt_float_ntest.js

@@ -0,0 +1,46 @@
+open Node_test
+open Node_test_util
+
+module N = Belt.HashMap
+module S = Belt.Map.Int
+module I = Array_data_util
+module A = Belt.Array
+module So = Belt.SortArray
+
+let intEq = (x: int, y) => x == y
+let intHash = (x: int) => Hashtbl.hash(x)
+let cmp = (x: int, y) => compare(x, y)
+module Y = unpack(Belt.Id.hashable(~eq=intEq, ~hash=intHash))
+let empty: N.t<int, int, _> = N.make(~id=module(Y), ~hintSize=30)
+
+describe("Belt.HashMap", () => {
+  test("fromArray", () => {
+    let u = A.concat(I.randomRange(30, 100), I.randomRange(40, 120))
+    let v = A.zip(u, u)
+    let xx = N.fromArray(~id=module(Y), v)
+    eq(__LOC__, N.size(xx), 91)
+    eq(__LOC__, So.stableSortBy(N.keysToArray(xx), cmp), I.range(30, 120))
+  })
+
+  test("mergeMany", () => {
+    N.mergeMany(empty, [(1, 1), (2, 3), (3, 3), (2, 2)])
+    eq(__LOC__, N.get(empty, 2), Some(2))
+    eq(__LOC__, N.size(empty), 3)
+  })
+
+  test("remove", () => {
+    let u = A.concat(I.randomRange(0, 100_000), I.randomRange(0, 100))
+    let v = N.make(~id=module(Y), ~hintSize=40)
+    N.mergeMany(v, A.zip(u, u))
+    eq(__LOC__, N.size(v), 100_001)
+    for i in 0 to 1_000 {
+      N.remove(v, i)
+    }
+    eq(__LOC__, N.size(v), 99_000)
+    for i in 0 to 2_000 {
+      N.remove(v, i)
+    }
+    eq(__LOC__, N.size(v), 98_000)
+    ok(__LOC__, A.every(I.range(2_001, 100_000), x => N.has(v, x)))
+  })
+})