@reventlessdev/reventless-gwt 1.0.0-alpha.100

package/tests/CliWatchScopeTest.res.mjs

@@ -0,0 +1,95 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Cli$ReventlessGwt from "../src/Cli.res.mjs";
+
+globalThis.describe("Cli.mergeScope", () => {
+  globalThis.test("RunAll absorbs on the left", () => {
+    globalThis.expect(Cli$ReventlessGwt.mergeScope("RunAll", {
+      TAG: "RunPackages",
+      _0: ["/p/a"]
+    })).toEqual("RunAll");
+  });
+  globalThis.test("RunAll absorbs on the right", () => {
+    globalThis.expect(Cli$ReventlessGwt.mergeScope({
+      TAG: "RunPackages",
+      _0: ["/p/a"]
+    }, "RunAll")).toEqual("RunAll");
+  });
+  globalThis.test("two RunPackages union their dirs, deduplicated", () => {
+    globalThis.expect(Cli$ReventlessGwt.mergeScope({
+      TAG: "RunPackages",
+      _0: [
+        "/p/a",
+        "/p/b"
+      ]
+    }, {
+      TAG: "RunPackages",
+      _0: [
+        "/p/b",
+        "/p/c"
+      ]
+    })).toEqual({
+      TAG: "RunPackages",
+      _0: [
+        "/p/a",
+        "/p/b",
+        "/p/c"
+      ]
+    });
+  });
+  globalThis.test("RunAll merged with RunAll stays RunAll", () => {
+    globalThis.expect(Cli$ReventlessGwt.mergeScope("RunAll", "RunAll")).toEqual("RunAll");
+  });
+});
+
+globalThis.describe("Cli.pathUnderDir", () => {
+  globalThis.test("a file inside the dir is under it", () => {
+    globalThis.expect(Cli$ReventlessGwt.pathUnderDir("/p/pkgA/tests/FooGwt.res.mjs", "/p/pkgA")).toEqual(true);
+  });
+  globalThis.test("a sibling with a shared prefix is NOT under it", () => {
+    globalThis.expect(Cli$ReventlessGwt.pathUnderDir("/p/pkgABC/tests/FooGwt.res.mjs", "/p/pkgA")).toEqual(false);
+  });
+  globalThis.test("an unrelated path is not under it", () => {
+    globalThis.expect(Cli$ReventlessGwt.pathUnderDir("/p/pkgB/tests/BarGwt.res.mjs", "/p/pkgA")).toEqual(false);
+  });
+  globalThis.test("a trailing-slash dir still matches", () => {
+    globalThis.expect(Cli$ReventlessGwt.pathUnderDir("/p/pkgA/tests/FooGwt.res.mjs", "/p/pkgA/")).toEqual(true);
+  });
+});
+
+globalThis.describe("Cli.scopeSubset", () => {
+  let all = [
+    "/p/pkgA/tests/FooGwt.res.mjs",
+    "/p/pkgA/tests/BarGwt.res.mjs",
+    "/p/pkgB/tests/BazGwt.res.mjs"
+  ];
+  globalThis.test("RunAll returns every path", () => {
+    globalThis.expect(Cli$ReventlessGwt.scopeSubset("RunAll", all)).toEqual(all);
+  });
+  globalThis.test("RunPackages keeps only files under the given dirs", () => {
+    globalThis.expect(Cli$ReventlessGwt.scopeSubset({
+      TAG: "RunPackages",
+      _0: ["/p/pkgA"]
+    }, all)).toEqual([
+      "/p/pkgA/tests/FooGwt.res.mjs",
+      "/p/pkgA/tests/BarGwt.res.mjs"
+    ]);
+  });
+  globalThis.test("RunPackages over multiple dirs unions their files", () => {
+    globalThis.expect(Cli$ReventlessGwt.scopeSubset({
+      TAG: "RunPackages",
+      _0: [
+        "/p/pkgA",
+        "/p/pkgB"
+      ]
+    }, all)).toEqual(all);
+  });
+  globalThis.test("RunPackages with no matching dir yields no files", () => {
+    globalThis.expect(Cli$ReventlessGwt.scopeSubset({
+      TAG: "RunPackages",
+      _0: ["/p/pkgZ"]
+    }, all)).toEqual([]);
+  });
+});
+
+/*  Not a pure module */

package/tests/ComponentMetaTest.res

@@ -0,0 +1,67 @@
+// Unit tests for ComponentMeta — the pure folder-convention → {kind, name}
+// derivation behind the `component` field on file items and the `components`
+// inventory. No I/O; path strings only.
+
+open JestGlobals
+
+describe("ComponentMeta.componentOfTestFile", () => {
+  testPromise("derives kind + name from a slice GWT test path", async () => {
+    let c = ComponentMeta.componentOfTestFile(
+      "/repo/catalog/tests/Product/StateChangeSlice/AddProduct_GWT.res.mjs",
+    )
+    expect(c)->toEqual(Some({ComponentMeta.kind: "StateChangeSlice", name: "AddProduct"}))
+  })
+
+  testPromise("derives a ReadModel component", async () => {
+    let c = ComponentMeta.componentOfTestFile(
+      "/repo/catalog/tests/CatalogActivity/ReadModel/CatalogActivity_GWT.res.mjs",
+    )
+    expect(c)->toEqual(Some({ComponentMeta.kind: "ReadModel", name: "CatalogActivity"}))
+  })
+
+  testPromise("strips the GwtTest marker shape too", async () => {
+    let c = ComponentMeta.componentOfTestFile("/repo/x/tests/Order/Aggregate/OrderGwtTest.res.mjs")
+    expect(c)->toEqual(Some({ComponentMeta.kind: "Aggregate", name: "Order"}))
+  })
+
+  testPromise("returns None outside a recognised kind folder", async () => {
+    let c = ComponentMeta.componentOfTestFile("/repo/x/tests/Helpers/Thing_GWT.res.mjs")
+    expect(c)->toEqual(None)
+  })
+
+  testPromise("recognises a plural folder spelling with the canonical kind (C2)", async () => {
+    // The generator accepts `Aggregates/`; previously the gwt discovery only knew
+    // the singular `Aggregate/` and silently returned None. Now it derives from
+    // the shared vocabulary and reports the canonical singular kind.
+    let c = ComponentMeta.componentOfTestFile("/repo/x/tests/Order/Aggregates/Order_GWT.res.mjs")
+    expect(c)->toEqual(Some({ComponentMeta.kind: "Aggregate", name: "Order"}))
+  })
+
+  testPromise("recognises a short slice folder spelling (StateChange) too (C2)", async () => {
+    let c = ComponentMeta.componentOfTestFile(
+      "/repo/catalog/tests/Product/StateChange/AddProduct_GWT.res.mjs",
+    )
+    expect(c)->toEqual(Some({ComponentMeta.kind: "StateChangeSlice", name: "AddProduct"}))
+  })
+})
+
+describe("ComponentMeta.componentOfSrcFile", () => {
+  testPromise("collapses a spec file to its component", async () => {
+    let c = ComponentMeta.componentOfSrcFile("/repo/catalog/src/Product/Aggregate/Product.res")
+    expect(c)->toEqual(Some({ComponentMeta.kind: "Aggregate", name: "Product"}))
+  })
+
+  testPromise("collapses a behavior body file to the same component", async () => {
+    let c = ComponentMeta.componentOfSrcFile(
+      "/repo/catalog/src/Product/Aggregate/Product_Behavior.res",
+    )
+    expect(c)->toEqual(Some({ComponentMeta.kind: "Aggregate", name: "Product"}))
+  })
+
+  testPromise("strips the longest body suffix first (ExtensionPointMapping)", async () => {
+    let c = ComponentMeta.componentOfSrcFile(
+      "/repo/catalog/src/Products/ExtensionPoint/Products_ExtensionPointMapping.res",
+    )
+    expect(c)->toEqual(Some({ComponentMeta.kind: "ExtensionPoint", name: "Products"}))
+  })
+})

package/tests/ComponentMetaTest.res.mjs

@@ -0,0 +1,71 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as ComponentMeta$ReventlessGwt from "../src/ComponentMeta.res.mjs";
+
+globalThis.describe("ComponentMeta.componentOfTestFile", () => {
+  globalThis.test("derives kind + name from a slice GWT test path", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/catalog/tests/Product/StateChangeSlice/AddProduct_GWT.res.mjs");
+    globalThis.expect(c).toEqual({
+      kind: "StateChangeSlice",
+      name: "AddProduct"
+    });
+  });
+  globalThis.test("derives a ReadModel component", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/catalog/tests/CatalogActivity/ReadModel/CatalogActivity_GWT.res.mjs");
+    globalThis.expect(c).toEqual({
+      kind: "ReadModel",
+      name: "CatalogActivity"
+    });
+  });
+  globalThis.test("strips the GwtTest marker shape too", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/x/tests/Order/Aggregate/OrderGwtTest.res.mjs");
+    globalThis.expect(c).toEqual({
+      kind: "Aggregate",
+      name: "Order"
+    });
+  });
+  globalThis.test("returns None outside a recognised kind folder", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/x/tests/Helpers/Thing_GWT.res.mjs");
+    globalThis.expect(c).toEqual(undefined);
+  });
+  globalThis.test("recognises a plural folder spelling with the canonical kind (C2)", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/x/tests/Order/Aggregates/Order_GWT.res.mjs");
+    globalThis.expect(c).toEqual({
+      kind: "Aggregate",
+      name: "Order"
+    });
+  });
+  globalThis.test("recognises a short slice folder spelling (StateChange) too (C2)", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfTestFile("/repo/catalog/tests/Product/StateChange/AddProduct_GWT.res.mjs");
+    globalThis.expect(c).toEqual({
+      kind: "StateChangeSlice",
+      name: "AddProduct"
+    });
+  });
+});
+
+globalThis.describe("ComponentMeta.componentOfSrcFile", () => {
+  globalThis.test("collapses a spec file to its component", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfSrcFile("/repo/catalog/src/Product/Aggregate/Product.res");
+    globalThis.expect(c).toEqual({
+      kind: "Aggregate",
+      name: "Product"
+    });
+  });
+  globalThis.test("collapses a behavior body file to the same component", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfSrcFile("/repo/catalog/src/Product/Aggregate/Product_Behavior.res");
+    globalThis.expect(c).toEqual({
+      kind: "Aggregate",
+      name: "Product"
+    });
+  });
+  globalThis.test("strips the longest body suffix first (ExtensionPointMapping)", async () => {
+    let c = ComponentMeta$ReventlessGwt.componentOfSrcFile("/repo/catalog/src/Products/ExtensionPoint/Products_ExtensionPointMapping.res");
+    globalThis.expect(c).toEqual({
+      kind: "ExtensionPoint",
+      name: "Products"
+    });
+  });
+});
+
+/*  Not a pure module */