@reventlessdev/reventless-gwt 1.0.0-alpha.100

package/tests/WatchDebounceTest.res.mjs

@@ -0,0 +1,128 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Watch$ReventlessGwt from "../src/Watch.res.mjs";
+
+function delay(ms) {
+  return new Promise((resolve, _reject) => {
+    setTimeout(() => resolve(), ms);
+  });
+}
+
+globalThis.describe("Watch.isStructuralSource", () => {
+  globalThis.test("an unlink of a .res source is structural", async () => {
+    globalThis.expect(Watch$ReventlessGwt.isStructuralSource("Unlink", "/p/src/Foo/Bar.res")).toEqual(true);
+  });
+  globalThis.test("a generated .res.mjs unlink is NOT structural (ends in .mjs)", async () => {
+    globalThis.expect(Watch$ReventlessGwt.isStructuralSource("Unlink", "/p/src/Foo/Bar.res.mjs")).toEqual(false);
+  });
+  globalThis.test("an add of a .res source is not structural (incremental handles it)", async () => {
+    globalThis.expect(Watch$ReventlessGwt.isStructuralSource("Add", "/p/src/Foo/Bar.res")).toEqual(false);
+  });
+  globalThis.test("a change of a .res source is not structural", async () => {
+    globalThis.expect(Watch$ReventlessGwt.isStructuralSource("Change", "/p/src/Foo/Bar.res")).toEqual(false);
+  });
+});
+
+globalThis.describe("Watch.debounce coalescing", () => {
+  globalThis.test("a burst collapses to one call carrying the strongest event", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, p) => {
+      calls.contents = calls.contents.concat([[
+          e,
+          p
+        ]]);
+    });
+    fire("Change", "/p/src/A.res");
+    fire("Add", "/p/src/new/A.res");
+    fire("Unlink", "/p/src/old/A.res");
+    await delay(120);
+    globalThis.expect(calls.contents.length).toEqual(1);
+    let match = calls.contents[0];
+    globalThis.expect(match[0]).toEqual("Unlink");
+    globalThis.expect(match[1]).toEqual("/p/src/old/A.res");
+  });
+  globalThis.test("a later weaker event does not mask an earlier unlink", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, _p) => {
+      calls.contents = calls.contents.concat([e]);
+    });
+    fire("Unlink", "/p/src/old/A.res");
+    fire("Change", "/p/src/A.res");
+    await delay(120);
+    globalThis.expect(calls.contents).toEqual(["Unlink"]);
+  });
+  globalThis.test("interleaved .res.mjs unlinks never surface; each distinct .res source does", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, p) => {
+      calls.contents = calls.contents.concat([[
+          e,
+          p
+        ]]);
+    });
+    fire("Unlink", "/p/src/old/A.res");
+    fire("Unlink", "/p/src/old/A.res.mjs");
+    fire("Unlink", "/p/src/old/A_Behavior.res");
+    fire("Unlink", "/p/src/old/A_Behavior.res.mjs");
+    fire("Add", "/p/src/new/A.res");
+    fire("Add", "/p/src/new/A.res.mjs");
+    await delay(120);
+    let paths = calls.contents.map(param => param[1]);
+    globalThis.expect(calls.contents.every(param => Watch$ReventlessGwt.isStructuralSource(param[0], param[1]))).toEqual(true);
+    globalThis.expect(paths.includes("/p/src/old/A.res")).toEqual(true);
+    globalThis.expect(paths.includes("/p/src/old/A_Behavior.res")).toEqual(true);
+    globalThis.expect(paths.some(p => p.endsWith(".mjs"))).toEqual(false);
+    globalThis.expect(calls.contents.length).toEqual(2);
+  });
+  globalThis.test("a burst spanning two packages emits an unlink per package (A4.1)", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, p) => {
+      calls.contents = calls.contents.concat([[
+          e,
+          p
+        ]]);
+    });
+    fire("Unlink", "/pkgA/src/Foo.res");
+    fire("Unlink", "/pkgB/src/Bar.res");
+    await delay(120);
+    let paths = calls.contents.map(param => param[1]);
+    globalThis.expect(paths.includes("/pkgA/src/Foo.res")).toEqual(true);
+    globalThis.expect(paths.includes("/pkgB/src/Bar.res")).toEqual(true);
+    globalThis.expect(calls.contents.length).toEqual(2);
+  });
+  globalThis.test("a structural signal suppresses a co-occurring plain change", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, _p) => {
+      calls.contents = calls.contents.concat([e]);
+    });
+    fire("Change", "/p/src/Edited.res");
+    fire("Unlink", "/p/src/old/Moved.res");
+    await delay(120);
+    globalThis.expect(calls.contents).toEqual(["Unlink"]);
+  });
+  globalThis.test("a lone change stays a change (incremental re-run)", async () => {
+    let calls = {
+      contents: []
+    };
+    let fire = Watch$ReventlessGwt.debounce(40, (e, _p) => {
+      calls.contents = calls.contents.concat([e]);
+    });
+    fire("Change", "/p/src/A.res");
+    await delay(120);
+    globalThis.expect(calls.contents).toEqual(["Change"]);
+  });
+});
+
+export {
+  delay,
+}
+/*  Not a pure module */