@reventlessdev/reventless-local 3.0.0-alpha.246 → 3.0.0-alpha.247

package/CHANGELOG.md

@@ -3,6 +3,13 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 3.0.0-alpha.247 (2026-09-07)
+
+### Bug Fixes
+
+* **core:** a state view slice composes its [@display](https://github.com/display)Name like a read model ([851aa1d](https://github.com/ReventlessDev/reventless-core/commit/851aa1d12ddae9dd39f91084f5719cd98fe1cbd4))
+
+
 # 3.0.0-alpha.246 (2026-09-07)
 
 ### Bug Fixes

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-local",
-  "version": "3.0.0-alpha.246",
+  "version": "3.0.0-alpha.247",
   "description": "Local platform for Reventless (in-memory or SQLite backend, for development and testing without AWS)",
   "license": "Apache-2.0",
   "bin": {
@@ -36,17 +36,17 @@
     "ws": "^8.18.0",
     "@reventlessdev/rescript-effect": "0.1.0-alpha.32",
     "@reventlessdev/rescript-graphql-yoga": "1.0.0-alpha.27",
+    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.21",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.10",
     "@reventlessdev/rescript-node": "2.0.0-alpha.9",
-    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.21",
-    "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.19",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.257",
-    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.105",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.158",
-    "@reventlessdev/reventless-postgres": "3.0.0-alpha.121",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.204",
+    "@reventlessdev/reventless-core": "3.0.0-alpha.258",
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.205",
+    "@reventlessdev/reventless-postgres": "3.0.0-alpha.122",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.159",
     "@reventlessdev/reventless-seed": "1.0.0-alpha.19",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.130"
+    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.106",
+    "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.19",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.131"
   },
   "devDependencies": {
     "rescript": "12.3.0",

package/tests/components/stateviewslice/StateViewSliceDisplayNameFixtures.res

@@ -0,0 +1,98 @@
+// E2E fixtures for the @displayName overlay on a StateViewSlice.
+// A slice's state carries the same synthetic `displayName` a read model's does;
+// this builds one by hand (the ppx writes the field and the metadata) so the
+// projection path can be asserted to compose it.
+
+open Reventless.Projection
+
+module OrderEventLog = {
+  @schema
+  type event =
+    | OrderPlaced({id: @s.matches(Reventless.DcbTag.string) string, placedAt: string})
+    | OrderShipped({id: @s.matches(Reventless.DcbTag.string) string, shippedAt: string})
+}
+
+module OrdersViewSpec = {
+  let name = "DnOrdersView"
+  let moduleUrl: string = %raw(`import.meta.url`)
+
+  @schema
+  type consumedEvent =
+    | OrderPlaced({id: string, placedAt: string})
+    | OrderShipped({id: string, shippedAt: string})
+
+  @schema
+  type state = {
+    id: string,
+    placedAt: string,
+    shippedAt: string,
+    displayName: option<string>,
+  }
+
+  // What the ppx emits for `@displayName placedAt`.
+  let stateSchema =
+    stateSchema->S.Metadata.set(
+      ~id=Reventless.DisplayName.displayNameId,
+      {Reventless.DisplayName.fields: ["placedAt"], separator: " "},
+    )
+
+  let config = Reventless.ReadModel.config()
+  let subIdConfig = None
+}
+
+module OrdersViewProjection = {
+  module Spec = OrdersViewSpec
+  open OrdersViewSpec
+
+  let moduleUrl: string = %raw(`import.meta.url`)
+
+  let project = ({event}: Reventless.StateViewSlice.consumed<consumedEvent>) =>
+    switch event {
+    | OrderPlaced({id, placedAt}) =>
+      [Set(id, {id, placedAt, shippedAt: "", displayName: None})]
+    | OrderShipped({id, shippedAt}) => [Update(id, s => {...s, shippedAt})]
+    }
+}
+
+module Bus = LocalBus.Make()
+
+let _ = TestRunner.setup()
+
+module OrderEventLogMaker = DcbEventLog_Builder.Make(Bus)
+let eventLog = OrderEventLogMaker.make(
+  ~name="DnOrderEventLog",
+  ~partitionTag=Reventless.DcbTag.Simple({key: "id"}),
+)
+
+module SVMaker = StateViewSlice_Builder.Make(Bus)
+module OrdersViewMaker = SVMaker.Make(OrdersViewSpec, OrdersViewProjection)
+let sv = OrdersViewMaker.make(~dcbEventLog=eventLog)
+
+let dcbEventTopicResource =
+  (eventLog->ReventlessCore.Component.outputs).eventTopic.resources->Array.getUnsafe(0)
+
+let encodeEvent = (event: OrderEventLog.event): ReventlessInfra.DcbEventLog.rawEvent => {
+  let json = event->Reventless.Util_Sury.toJson(OrderEventLog.eventSchema)
+  let (eventType, data) = json->ReventlessCore.Message.splitMessage
+  let tags = Reventless.DcbTag.extractTags(OrderEventLog.eventSchema, event)
+  let meta = ReventlessCore.Message.generateMeta(~service="test")
+  {eventType, data: JSON.Object(data), tags, meta}
+}
+
+let appendEvent = async event => {
+  let ops = await eventLog->OrderEventLogMaker.operations->TestRunner.resolve
+  let _ = await ops.append([encodeEvent(event)])
+}
+
+let loadState = async id => {
+  switch Bus.getQueryDb("DnOrdersView") {
+  | None => []
+  | Some(ops) =>
+    let states =
+      await ops.loadStream(id)
+      ->Stream.runCollect
+      ->Effect.catchAll(_ => Effect.succeed([]))
+      ->Effect.runPromise
+    states->Array.map(json => json->Reventless.Util_Sury.fromJson(OrdersViewSpec.stateSchema))
+  }
+}

package/tests/components/stateviewslice/StateViewSliceDisplayNameFixtures.res.mjs

@@ -0,0 +1,187 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Sury from "sury";
+import * as Stream from "@reventlessdev/rescript-effect/src/Stream.res.mjs";
+import * as Effect from "effect/Effect";
+import * as DcbTag$Reventless from "@reventlessdev/reventless-spec/src/components/DcbTag.res.mjs";
+import * as ReadModel$Reventless from "@reventlessdev/reventless-spec/src/components/ReadModel.res.mjs";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
+import * as DisplayName$Reventless from "@reventlessdev/reventless-spec/src/components/DisplayName.res.mjs";
+import * as Message$ReventlessCore from "@reventlessdev/reventless-core/src/Message.res.mjs";
+import * as Component$ReventlessCore from "@reventlessdev/reventless-core/src/components/Component.res.mjs";
+import * as LocalBus$ReventlessLocal from "../../../src/adapter/LocalBus.res.mjs";
+import * as TestRunner$ReventlessLocal from "../../../src/test/TestRunner.res.mjs";
+import * as DcbEventLog_Builder$ReventlessLocal from "../../../src/components/DcbEventLog_Builder.res.mjs";
+import * as StateViewSlice_Builder$ReventlessLocal from "../../../src/components/StateViewSlice_Builder.res.mjs";
+
+let eventSchema = Sury.union([
+  Sury.$schema(s => ({
+    TAG: "OrderPlaced",
+    id: s.m(DcbTag$Reventless.string),
+    placedAt: s.m(Sury.string)
+  })),
+  Sury.$schema(s => ({
+    TAG: "OrderShipped",
+    id: s.m(DcbTag$Reventless.string),
+    shippedAt: s.m(Sury.string)
+  }))
+]);
+
+let OrderEventLog = {
+  eventSchema: eventSchema
+};
+
+let name = "DnOrdersView";
+
+let moduleUrl = import.meta.url;
+
+let consumedEventSchema = Sury.union([
+  Sury.$schema(s => ({
+    TAG: "OrderPlaced",
+    id: s.m(Sury.string),
+    placedAt: s.m(Sury.string)
+  })),
+  Sury.$schema(s => ({
+    TAG: "OrderShipped",
+    id: s.m(Sury.string),
+    shippedAt: s.m(Sury.string)
+  }))
+]);
+
+let stateSchema = Sury.$schema(s => ({
+  id: s.m(Sury.string),
+  placedAt: s.m(Sury.string),
+  shippedAt: s.m(Sury.string),
+  displayName: s.m(Sury.$option(Sury.string))
+}));
+
+let stateSchema$1 = Sury.$Metadata_set(stateSchema, DisplayName$Reventless.displayNameId, {
+  fields: ["placedAt"],
+  separator: " "
+});
+
+let config = ReadModel$Reventless.config(undefined, undefined, undefined);
+
+let OrdersViewSpec = {
+  name: name,
+  moduleUrl: moduleUrl,
+  consumedEventSchema: consumedEventSchema,
+  stateSchema: stateSchema$1,
+  config: config,
+  subIdConfig: undefined,
+  authorization: "AllowAuthenticated",
+  visibility: "Public"
+};
+
+let moduleUrl$1 = import.meta.url;
+
+function project(param) {
+  let event = param.event;
+  if (event.TAG === "OrderPlaced") {
+    let id = event.id;
+    return [{
+        TAG: "Set",
+        _0: id,
+        _1: {
+          id: id,
+          placedAt: event.placedAt,
+          shippedAt: "",
+          displayName: undefined
+        }
+      }];
+  }
+  let shippedAt = event.shippedAt;
+  return [{
+      TAG: "Update",
+      _0: event.id,
+      _1: s => ({
+        id: s.id,
+        placedAt: s.placedAt,
+        shippedAt: shippedAt,
+        displayName: s.displayName
+      })
+    }];
+}
+
+let OrdersViewProjection = {
+  Spec: undefined,
+  moduleUrl: moduleUrl$1,
+  project: project
+};
+
+let Bus = LocalBus$ReventlessLocal.Make({});
+
+TestRunner$ReventlessLocal.setup();
+
+let OrderEventLogMaker = DcbEventLog_Builder$ReventlessLocal.Make(Bus);
+
+let eventLog = OrderEventLogMaker.make("DnOrderEventLog", undefined, {
+  TAG: "Simple",
+  _0: {
+    key: "id"
+  }
+}, undefined);
+
+let SVMaker = StateViewSlice_Builder$ReventlessLocal.Make(Bus);
+
+let OrdersViewMaker = SVMaker.Make({
+  name: name,
+  moduleUrl: moduleUrl,
+  stateSchema: stateSchema$1,
+  consumedEventSchema: consumedEventSchema,
+  config: config,
+  subIdConfig: undefined,
+  authorization: "AllowAuthenticated",
+  visibility: "Public"
+})({
+  project: project,
+  moduleUrl: moduleUrl$1
+});
+
+let sv = OrdersViewMaker.make(eventLog, undefined, undefined);
+
+let dcbEventTopicResource = Component$ReventlessCore.outputs(eventLog).eventTopic.resources[0];
+
+function encodeEvent(event) {
+  let json = Util_Sury$Reventless.toJson(event, eventSchema);
+  let match = Message$ReventlessCore.splitMessage(json);
+  let tags = DcbTag$Reventless.extractTags(eventSchema, event);
+  let meta = Message$ReventlessCore.generateMeta("test", undefined, undefined, undefined, undefined, undefined, undefined, undefined);
+  return {
+    eventType: match[0],
+    data: match[1],
+    tags: tags,
+    meta: meta
+  };
+}
+
+async function appendEvent(event) {
+  let ops = await TestRunner$ReventlessLocal.resolve(OrderEventLogMaker.operations(eventLog));
+  await ops.append([encodeEvent(event)], undefined);
+}
+
+async function loadState(id) {
+  let ops = Bus.getQueryDb("DnOrdersView");
+  if (ops === undefined) {
+    return [];
+  }
+  let states = await Effect.runPromise(Effect.catchAll(Stream.runCollect(ops.loadStream(id)), param => Effect.succeed([])));
+  return states.map(json => Util_Sury$Reventless.fromJson(json, stateSchema$1));
+}
+
+export {
+  OrderEventLog,
+  OrdersViewSpec,
+  OrdersViewProjection,
+  Bus,
+  OrderEventLogMaker,
+  eventLog,
+  SVMaker,
+  OrdersViewMaker,
+  sv,
+  dcbEventTopicResource,
+  encodeEvent,
+  appendEvent,
+  loadState,
+}
+/* eventSchema Not a pure module */

package/tests/components/stateviewslice/StateViewSliceDisplayNameTest.res

@@ -0,0 +1,32 @@
+// The @displayName overlay on the StateViewSlice projection path.
+// Without it the column stays null and every surface names the row by its id.
+
+open JestGlobals
+open StateViewSliceDisplayNameFixtures
+
+describe("StateViewSlice @displayName", () => {
+  let _ = beforeAllAsync(async () => {
+    let _ = await sv->OrdersViewMaker.operations->TestRunner.resolve
+    let _ = await dcbEventTopicResource.name->TestRunner.resolve
+  })
+
+  testPromise("a projected state carries the composed label", async () => {
+    let _ = await appendEvent(
+      OrderEventLog.OrderPlaced({id: "order-1", placedAt: "2026-09-01T10:00:00.000Z"}),
+    )
+    let states = await loadState("order-1")
+    expect(states->Array.length)->toBe(1)
+    let s = states->Array.getUnsafe(0)
+    expect(s.displayName)->toEqual(Some("2026-09-01T10:00:00.000Z"))
+  })
+
+  testPromise("an update recomposes it from the state it wrote", async () => {
+    let _ = await appendEvent(
+      OrderEventLog.OrderShipped({id: "order-1", shippedAt: "2026-09-02T10:00:00.000Z"}),
+    )
+    let states = await loadState("order-1")
+    let s = states->Array.getUnsafe(0)
+    expect(s.shippedAt)->toBe("2026-09-02T10:00:00.000Z")
+    expect(s.displayName)->toEqual(Some("2026-09-01T10:00:00.000Z"))
+  })
+})

package/tests/components/stateviewslice/StateViewSliceDisplayNameTest.res.mjs

@@ -0,0 +1,35 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as TestRunner$ReventlessLocal from "../../../src/test/TestRunner.res.mjs";
+import * as StateViewSliceDisplayNameFixtures$ReventlessLocal from "./StateViewSliceDisplayNameFixtures.res.mjs";
+
+globalThis.describe("StateViewSlice @displayName", () => {
+  globalThis.beforeAll(async () => {
+    await TestRunner$ReventlessLocal.resolve(StateViewSliceDisplayNameFixtures$ReventlessLocal.OrdersViewMaker.operations(StateViewSliceDisplayNameFixtures$ReventlessLocal.sv));
+    await TestRunner$ReventlessLocal.resolve(StateViewSliceDisplayNameFixtures$ReventlessLocal.dcbEventTopicResource.name);
+  });
+  globalThis.test("a projected state carries the composed label", async () => {
+    await StateViewSliceDisplayNameFixtures$ReventlessLocal.appendEvent({
+      TAG: "OrderPlaced",
+      id: "order-1",
+      placedAt: "2026-09-01T10:00:00.000Z"
+    });
+    let states = await StateViewSliceDisplayNameFixtures$ReventlessLocal.loadState("order-1");
+    globalThis.expect(states.length).toBe(1);
+    let s = states[0];
+    globalThis.expect(s.displayName).toEqual("2026-09-01T10:00:00.000Z");
+  });
+  globalThis.test("an update recomposes it from the state it wrote", async () => {
+    await StateViewSliceDisplayNameFixtures$ReventlessLocal.appendEvent({
+      TAG: "OrderShipped",
+      id: "order-1",
+      shippedAt: "2026-09-02T10:00:00.000Z"
+    });
+    let states = await StateViewSliceDisplayNameFixtures$ReventlessLocal.loadState("order-1");
+    let s = states[0];
+    globalThis.expect(s.shippedAt).toBe("2026-09-02T10:00:00.000Z");
+    globalThis.expect(s.displayName).toEqual("2026-09-01T10:00:00.000Z");
+  });
+});
+
+/*  Not a pure module */