@reventlessdev/reventless-gwt 1.0.0-alpha.127 → 1.0.0-alpha.129

package/CHANGELOG.md

@@ -3,6 +3,22 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 1.0.0-alpha.129 (2026-07-26)
+
+**Note:** Version bump only for package @reventlessdev/reventless-gwt
+
+
+
+
+
+# 1.0.0-alpha.128 (2026-07-26)
+
+**Note:** Version bump only for package @reventlessdev/reventless-gwt
+
+
+
+
+
 # 1.0.0-alpha.127 (2026-07-24)
 
 **Note:** Version bump only for package @reventlessdev/reventless-gwt

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-gwt",
-  "version": "1.0.0-alpha.127",
+  "version": "1.0.0-alpha.129",
   "description": "Given-When-Then DSLs and test harness for Reventless slice testing",
   "license": "Apache-2.0",
   "jest": {
@@ -14,16 +14,16 @@
   },
   "dependencies": {
     "sury": "11.0.0-alpha.4",
-    "@reventlessdev/rescript-effect": "0.1.0-alpha.30",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.9",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.180",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.104",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.80"
+    "@reventlessdev/reventless-core": "3.0.0-alpha.182",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.81",
+    "@reventlessdev/rescript-effect": "0.1.0-alpha.31",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.105"
   },
   "devDependencies": {
     "rescript": "12.3.0",
     "sury-ppx": "11.0.0-alpha.2",
-    "@reventlessdev/reventless-ppx": "1.0.0-alpha.54"
+    "@reventlessdev/reventless-ppx": "1.0.0-alpha.56"
   },
   "peerDependencies": {
     "rescript": "12.3.0"

package/src/Projection_GWT.res

@@ -30,7 +30,9 @@ module type Spec = {
 module type Projection = {
   module Spec: Spec
 
-  let project: Spec.consumedEvent => array<Reventless.Projection.action<string, Spec.state>>
+  let project: Reventless.StateViewSlice.consumed<Spec.consumedEvent> => array<
+    Reventless.Projection.action<string, Spec.state>,
+  >
 }
 
 module type T = {
@@ -163,10 +165,18 @@ module Make = (
 
   let update = async (store, events) => {
     // Projection.project produces an array of actions per event — flatten and
-    // feed them through handleActions against the dict store.
+    // feed them through handleActions against the dict store. Each bare event is
+    // wrapped in the `consumed` envelope with the deterministic test `meta` /
+    // `recordedAt` so a projection reading `meta.time` asserts a fixed value.
     let actions =
       events
-      ->Array.map(ev => ev->Projection.project)
+      ->Array.map(ev =>
+        {
+          Reventless.StateViewSlice.event: ev,
+          meta: TestFixtures.meta,
+          recordedAt: TestFixtures.recordedAt,
+        }->Projection.project
+      )
       ->Array.flat
     await actions->runActions({
       load: load(store, ...),

package/src/Projection_GWT.res.mjs

@@ -61,7 +61,11 @@ function Make(Spec) {
     };
     let runActions = (actions, operations) => Projection$ReventlessCore.handleActions(undefined, actions, operations, Spec.subIdConfig);
     let update = async (store, events) => {
-      let actions = events.map(ev => Projection.project(ev)).flat();
+      let actions = events.map(ev => Projection.project({
+        event: ev,
+        meta: TestFixtures$ReventlessGwt.meta,
+        recordedAt: TestFixtures$ReventlessGwt.recordedAt
+      })).flat();
       await runActions(actions, {
         load: extra => Promise.resolve({
           TAG: "Ok",

package/src/TestFixtures.res

@@ -8,6 +8,11 @@ let meta = {
   correlationId: "correlationId",
 }
 
+// Deterministic storage timestamp for StateViewSlice projection envelopes
+// (`consumed.recordedAt`). Distinct from `meta.time` (producer time) so a test
+// projecting either clock asserts against an unambiguous fixed value.
+let recordedAt = "recordedAt"
+
 let context = {Reventless.Message.meta, id}
 
 let statusChange = {

package/src/TestFixtures.res.mjs

@@ -25,9 +25,12 @@ let statusChange = {
   by: statusChange_by
 };
 
+let recordedAt = "recordedAt";
+
 export {
   id,
   meta,
+  recordedAt,
   context,
   statusChange,
 }

package/tests/FlowGwtTest.res

@@ -138,7 +138,7 @@ module OrdersViewProjection = {
   module Spec = OrdersViewSlice
   open Reventless.Projection
 
-  let project = (event: OrdersViewSlice.consumedEvent) =>
+  let project = ({event}: Reventless.StateViewSlice.consumed<OrdersViewSlice.consumedEvent>) =>
     switch event {
     | OrderPlaced({orderId, item}) => [
         Set(orderId, ({orderId, item, status: "Placed"}: OrdersViewSlice.state)),

package/tests/FlowGwtTest.res.mjs

@@ -254,7 +254,8 @@ let OrdersViewSlice = {
   visibility: "Public"
 };
 
-function project(event) {
+function project(param) {
+  let event = param.event;
   if (event.TAG !== "OrderPlaced") {
     return [{
         TAG: "Update",

package/tests/QueryGwtTest.res

@@ -123,7 +123,7 @@ module OrdersView = {
   @schema
   type consumedEvent = OrderPlaced({orderId: string, customerId: string, total: int})
 
-  let project = event =>
+  let project = ({event}: Reventless.StateViewSlice.consumed<consumedEvent>) =>
     switch event {
     | OrderPlaced({orderId, customerId, total}) => [
         Reventless.Projection.Set(orderId, {orderId, customerId, total}),

package/tests/QueryGwtTest.res.mjs

@@ -220,7 +220,8 @@ let consumedEventSchema = S.schema(s => ({
   total: s.m(S.int)
 }));
 
-function project(event) {
+function project(param) {
+  let event = param.event;
   let orderId = event.orderId;
   return [{
       TAG: "Set",

package/tests/StateViewSliceGwtTest.res

@@ -29,7 +29,7 @@ module CategoriesViewProjection = {
   module Spec = CategoriesView
   open CategoriesView
 
-  let project = (event: consumedEvent) =>
+  let project = ({event}: Reventless.StateViewSlice.consumed<consumedEvent>) =>
     switch event {
     | CategoryAdded({categoryId, name}) => [
         Set(categoryId, {categoryId, name, archived: false}),

package/tests/StateViewSliceGwtTest.res.mjs

@@ -35,7 +35,8 @@ let CategoriesView = {
   visibility: "Public"
 };
 
-function project(event) {
+function project(param) {
+  let event = param.event;
   switch (event.TAG) {
     case "CategoryAdded" :
       let categoryId = event.categoryId;