@reventlessdev/reventless-local 3.0.0-alpha.192 → 3.0.0-alpha.194

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.
 
+# 3.0.0-alpha.194 (2026-08-03)
+
+### Features
+
+* **outbound:** let an outbound slice read an aggregate, and geocode addresses with it ([867e63e](https://github.com/ReventlessDev/reventless-core/commit/867e63e774ebc8b78b2b19c78645c8a12a8d06f6))
+* **platform:** let a deployment choose what the host shell does ([ae0aec3](https://github.com/ReventlessDev/reventless-core/commit/ae0aec33dcf641f02187e8d6a3f3594c506820b6))
+
+
+# 3.0.0-alpha.193 (2026-08-02)
+
+**Note:** Version bump only for package @reventlessdev/reventless-local
+
+
+
+
+
 # 3.0.0-alpha.192 (2026-08-02)
 
 **Note:** Version bump only for package @reventlessdev/reventless-local

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-local",
-  "version": "3.0.0-alpha.192",
+  "version": "3.0.0-alpha.194",
   "description": "Local platform for Reventless (in-memory or SQLite backend, for development and testing without AWS)",
   "license": "Apache-2.0",
   "bin": {
@@ -37,20 +37,20 @@
     "@reventlessdev/rescript-effect": "0.1.0-alpha.32",
     "@reventlessdev/rescript-graphql-yoga": "1.0.0-alpha.26",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.10",
-    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.21",
     "@reventlessdev/rescript-node": "2.0.0-alpha.1",
+    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.21",
     "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.18",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.204",
-    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.52",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.151",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.121",
-    "@reventlessdev/reventless-postgres": "3.0.0-alpha.68",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.96"
+    "@reventlessdev/reventless-core": "3.0.0-alpha.206",
+    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.54",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.123",
+    "@reventlessdev/reventless-postgres": "3.0.0-alpha.70",
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.153",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.98"
   },
   "devDependencies": {
     "rescript": "12.3.0",
     "sury-ppx": "11.0.0-alpha.2",
-    "@reventlessdev/reventless-ppx": "1.0.0-alpha.60"
+    "@reventlessdev/reventless-ppx": "1.0.0-alpha.62"
   },
   "peerDependencies": {
     "rescript": "12.3.0"

package/src/Platform.res

@@ -1972,6 +1972,11 @@ module MakeWithConfig = (
     // ignores them.
     geocoderPlaceIndex?: ReventlessInfra.Platform.geocoderIndex,
     uploadBucket?: ReventlessInfra.Platform.objectStore,
+    // Same terms: the AWS deploy writes these into the config.json it hosts, and
+    // local dev has no config.json of its own to write — the host-shell package
+    // serves `public/config.json`, which is where local turns a view mode on.
+    viewModes?: array<ReventlessInfra.Platform.viewMode>,
+    shellConfig?: dict<JSON.t>,
   }
   let deployPlatform = (
     ~version,

package/tests/components/outboundtranslationslice/OutboundTranslationSliceCallbackTest.res

@@ -35,7 +35,7 @@ describe("OutboundTranslationSlice Callback", () => {
 
   describe("Phase 1 — collect", () => {
     testPromise("OrderShipped event creates a pending outbound item", async () => {
-      FireForgetCallback.phase1([OrderShipped({orderId: "ord-1", email: "test@example.com"})])
+      FireForgetCallback.phase1([("evt", OrderShipped({orderId: "ord-1", email: "test@example.com"}))])
       let items = FireForgetCallback.todoItems
       expect(items->Dict.toArray->Array.length)->toBe(1)
       let row = items->Dict.get("ord-1")
@@ -46,16 +46,16 @@ describe("OutboundTranslationSlice Callback", () => {
     })
 
     testPromise("duplicate event does not create a second item (idempotent)", async () => {
-      FireForgetCallback.phase1([OrderShipped({orderId: "ord-1", email: "test@example.com"})])
-      FireForgetCallback.phase1([OrderShipped({orderId: "ord-1", email: "other@example.com"})])
+      FireForgetCallback.phase1([("evt", OrderShipped({orderId: "ord-1", email: "test@example.com"}))])
+      FireForgetCallback.phase1([("evt", OrderShipped({orderId: "ord-1", email: "other@example.com"}))])
       let items = FireForgetCallback.todoItems
       expect(items->Dict.toArray->Array.length)->toBe(1)
     })
 
     testPromise("multiple different events create multiple items", async () => {
       FireForgetCallback.phase1([
-        OrderShipped({orderId: "ord-1", email: "a@example.com"}),
-        OrderShipped({orderId: "ord-2", email: "b@example.com"}),
+        ("evt", OrderShipped({orderId: "ord-1", email: "a@example.com"})),
+        ("evt", OrderShipped({orderId: "ord-2", email: "b@example.com"})),
       ])
       let items = FireForgetCallback.todoItems
       expect(items->Dict.toArray->Array.length)->toBe(2)
@@ -65,7 +65,7 @@ describe("OutboundTranslationSlice Callback", () => {
 
   describe("Phase 2 — translate (fire-and-forget)", () => {
     testPromise("Ok(None) marks item as Completed, no command published", async () => {
-      FireForgetCallback.phase1([OrderShipped({orderId: "ord-1", email: "test@example.com"})])
+      FireForgetCallback.phase1([("evt", OrderShipped({orderId: "ord-1", email: "test@example.com"}))])
       let publishedCommands = ref([])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async cmds => {
         publishedCommands := cmds
@@ -88,7 +88,7 @@ describe("OutboundTranslationSlice Callback", () => {
 
   describe("Phase 2 — translate (command-back)", () => {
     testPromise("Ok(Some(...)) marks item as Completed and publishes command", async () => {
-      CommandBackCallback.phase1([PaymentReceived({orderId: "ord-1", amount: 50.0})])
+      CommandBackCallback.phase1([("evt", PaymentReceived({orderId: "ord-1", amount: 50.0}))])
       let publishedCommands = ref([])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async cmds => {
         publishedCommands := Array.concat(publishedCommands.contents, cmds)
@@ -104,7 +104,7 @@ describe("OutboundTranslationSlice Callback", () => {
     testPromise("Error marks item as Failed with incremented retryCount", async () => {
       ProcessPaymentSpec.translateFn := (async (_id, _item) => Error("gateway timeout"))
 
-      CommandBackCallback.phase1([PaymentReceived({orderId: "ord-1", amount: 50.0})])
+      CommandBackCallback.phase1([("evt", PaymentReceived({orderId: "ord-1", amount: 50.0}))])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async _cmds => ()
       await CommandBackCallback.phase2(mockPublish)
 
@@ -116,7 +116,7 @@ describe("OutboundTranslationSlice Callback", () => {
     testPromise("failed items with retryCount < maxRetries are retried", async () => {
       // First attempt fails
       ProcessPaymentSpec.translateFn := (async (_id, _item) => Error("timeout"))
-      CommandBackCallback.phase1([PaymentReceived({orderId: "ord-1", amount: 50.0})])
+      CommandBackCallback.phase1([("evt", PaymentReceived({orderId: "ord-1", amount: 50.0}))])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async _cmds => ()
       await CommandBackCallback.phase2(mockPublish)
       let row1 = CommandBackCallback.todoItems->Dict.get("ord-1")->Option.getOrThrow
@@ -138,7 +138,7 @@ describe("OutboundTranslationSlice Callback", () => {
     testPromise("failed items beyond maxRetries are not retried", async () => {
       // ProcessPaymentSpec.maxRetries = 2, so after 2 failures it should stop
       ProcessPaymentSpec.translateFn := (async (_id, _item) => Error("timeout"))
-      CommandBackCallback.phase1([PaymentReceived({orderId: "ord-1", amount: 50.0})])
+      CommandBackCallback.phase1([("evt", PaymentReceived({orderId: "ord-1", amount: 50.0}))])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async _cmds => ()
 
       // Fail twice
@@ -171,8 +171,8 @@ describe("OutboundTranslationSlice Callback", () => {
       })
 
       CommandBackCallback.phase1([
-        PaymentReceived({orderId: "ord-1", amount: 50.0}),
-        PaymentReceived({orderId: "ord-2", amount: 75.0}),
+        ("evt", PaymentReceived({orderId: "ord-1", amount: 50.0})),
+        ("evt", PaymentReceived({orderId: "ord-2", amount: 75.0})),
       ])
       let publishedCommands = ref([])
       let mockPublish: ReventlessInfra.CommandTopic.publishJsons = async cmds => {

package/tests/components/outboundtranslationslice/OutboundTranslationSliceCallbackTest.res.mjs

@@ -38,6 +38,7 @@ let FireForgetCallback = OutboundTranslationSlice_Callback$ReventlessCore.Make({
   maxRetries: OutboundTranslationSliceFixtures$ReventlessLocal.SendTrackingEmailSpec.maxRetries,
   heartbeatInterval: OutboundTranslationSliceFixtures$ReventlessLocal.SendTrackingEmailSpec.heartbeatInterval,
   targetName: OutboundTranslationSliceFixtures$ReventlessLocal.SendTrackingEmailSpec.targetName,
+  sourceNames: OutboundTranslationSliceFixtures$ReventlessLocal.SendTrackingEmailSpec.sourceNames,
   externalSystem: OutboundTranslationSliceFixtures$ReventlessLocal.SendTrackingEmailSpec.externalSystem
 })(SendTrackingEmailTranslation);
 
@@ -50,6 +51,7 @@ let CommandBackCallback = OutboundTranslationSlice_Callback$ReventlessCore.Make(
   maxRetries: OutboundTranslationSliceFixtures$ReventlessLocal.ProcessPaymentSpec.maxRetries,
   heartbeatInterval: OutboundTranslationSliceFixtures$ReventlessLocal.ProcessPaymentSpec.heartbeatInterval,
   targetName: OutboundTranslationSliceFixtures$ReventlessLocal.ProcessPaymentSpec.targetName,
+  sourceNames: OutboundTranslationSliceFixtures$ReventlessLocal.ProcessPaymentSpec.sourceNames,
   externalSystem: OutboundTranslationSliceFixtures$ReventlessLocal.ProcessPaymentSpec.externalSystem
 })(ProcessPaymentTranslation);
 
@@ -70,11 +72,14 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
   });
   globalThis.describe("Phase 1 — collect", () => {
     globalThis.test("OrderShipped event creates a pending outbound item", async () => {
-      FireForgetCallback.phase1([{
-          TAG: "OrderShipped",
-          orderId: "ord-1",
-          email: "test@example.com"
-        }]);
+      FireForgetCallback.phase1([[
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-1",
+            email: "test@example.com"
+          }
+        ]]);
       let items = FireForgetCallback.todoItems;
       globalThis.expect(Object.entries(items).length).toBe(1);
       let row = items["ord-1"];
@@ -84,41 +89,56 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
       globalThis.expect(r.retryCount).toBe(0);
     });
     globalThis.test("duplicate event does not create a second item (idempotent)", async () => {
-      FireForgetCallback.phase1([{
-          TAG: "OrderShipped",
-          orderId: "ord-1",
-          email: "test@example.com"
-        }]);
-      FireForgetCallback.phase1([{
-          TAG: "OrderShipped",
-          orderId: "ord-1",
-          email: "other@example.com"
-        }]);
+      FireForgetCallback.phase1([[
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-1",
+            email: "test@example.com"
+          }
+        ]]);
+      FireForgetCallback.phase1([[
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-1",
+            email: "other@example.com"
+          }
+        ]]);
       globalThis.expect(Object.entries(FireForgetCallback.todoItems).length).toBe(1);
     });
     globalThis.test("multiple different events create multiple items", async () => {
       FireForgetCallback.phase1([
-        {
-          TAG: "OrderShipped",
-          orderId: "ord-1",
-          email: "a@example.com"
-        },
-        {
-          TAG: "OrderShipped",
-          orderId: "ord-2",
-          email: "b@example.com"
-        }
+        [
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-1",
+            email: "a@example.com"
+          }
+        ],
+        [
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-2",
+            email: "b@example.com"
+          }
+        ]
       ]);
       globalThis.expect(Object.entries(FireForgetCallback.todoItems).length).toBe(2);
     });
   });
   globalThis.describe("Phase 2 — translate (fire-and-forget)", () => {
     globalThis.test("Ok(None) marks item as Completed, no command published", async () => {
-      FireForgetCallback.phase1([{
-          TAG: "OrderShipped",
-          orderId: "ord-1",
-          email: "test@example.com"
-        }]);
+      FireForgetCallback.phase1([[
+          "evt",
+          {
+            TAG: "OrderShipped",
+            orderId: "ord-1",
+            email: "test@example.com"
+          }
+        ]]);
       let publishedCommands = {
         contents: []
       };
@@ -143,11 +163,14 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
   });
   globalThis.describe("Phase 2 — translate (command-back)", () => {
     globalThis.test("Ok(Some(...)) marks item as Completed and publishes command", async () => {
-      CommandBackCallback.phase1([{
-          TAG: "PaymentReceived",
-          orderId: "ord-1",
-          amount: 50.0
-        }]);
+      CommandBackCallback.phase1([[
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-1",
+            amount: 50.0
+          }
+        ]]);
       let publishedCommands = {
         contents: []
       };
@@ -166,11 +189,14 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
         TAG: "Error",
         _0: "gateway timeout"
       });
-      CommandBackCallback.phase1([{
-          TAG: "PaymentReceived",
-          orderId: "ord-1",
-          amount: 50.0
-        }]);
+      CommandBackCallback.phase1([[
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-1",
+            amount: 50.0
+          }
+        ]]);
       let mockPublish = async _cmds => {};
       await CommandBackCallback.phase2(mockPublish);
       let row = Stdlib_Option.getOrThrow(CommandBackCallback.todoItems["ord-1"], undefined);
@@ -182,11 +208,14 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
         TAG: "Error",
         _0: "timeout"
       });
-      CommandBackCallback.phase1([{
-          TAG: "PaymentReceived",
-          orderId: "ord-1",
-          amount: 50.0
-        }]);
+      CommandBackCallback.phase1([[
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-1",
+            amount: 50.0
+          }
+        ]]);
       let mockPublish = async _cmds => {};
       await CommandBackCallback.phase2(mockPublish);
       let row1 = Stdlib_Option.getOrThrow(CommandBackCallback.todoItems["ord-1"], undefined);
@@ -217,11 +246,14 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
         TAG: "Error",
         _0: "timeout"
       });
-      CommandBackCallback.phase1([{
-          TAG: "PaymentReceived",
-          orderId: "ord-1",
-          amount: 50.0
-        }]);
+      CommandBackCallback.phase1([[
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-1",
+            amount: 50.0
+          }
+        ]]);
       let mockPublish = async _cmds => {};
       await CommandBackCallback.phase2(mockPublish);
       await CommandBackCallback.phase2(mockPublish);
@@ -263,16 +295,22 @@ globalThis.describe("OutboundTranslationSlice Callback", () => {
         }
       };
       CommandBackCallback.phase1([
-        {
-          TAG: "PaymentReceived",
-          orderId: "ord-1",
-          amount: 50.0
-        },
-        {
-          TAG: "PaymentReceived",
-          orderId: "ord-2",
-          amount: 75.0
-        }
+        [
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-1",
+            amount: 50.0
+          }
+        ],
+        [
+          "evt",
+          {
+            TAG: "PaymentReceived",
+            orderId: "ord-2",
+            amount: 75.0
+          }
+        ]
       ]);
       let publishedCommands = {
         contents: []

package/tests/components/outboundtranslationslice/OutboundTranslationSliceFixtures.res

@@ -30,7 +30,7 @@ module SendTrackingEmailSpec = {
   @schema
   type inboundCommand = unit
 
-  let collect = event =>
+  let collect = (event, ~sourceId as _) =>
     switch event {
     | OrderShipped({orderId, email}) => [(orderId, {orderId, email})]
     }
@@ -40,6 +40,7 @@ module SendTrackingEmailSpec = {
   let maxRetries = 3
   let heartbeatInterval = 60
   let targetName = None
+  let sourceNames: array<string> = []
   let externalSystem = None
 }
 
@@ -61,7 +62,7 @@ module ProcessPaymentSpec = {
   @schema
   type inboundCommand = ConfirmPayment({orderId: @s.matches(Reventless.DcbTag.string) string})
 
-  let collect = event =>
+  let collect = (event, ~sourceId as _) =>
     switch event {
     | PaymentReceived({orderId, amount}) => [(orderId, {orderId, amount})]
     }
@@ -76,5 +77,6 @@ module ProcessPaymentSpec = {
   let maxRetries = 2
   let heartbeatInterval = 30
   let targetName = Some("ConfirmPayment")
+  let sourceNames: array<string> = []
   let externalSystem = None
 }

package/tests/components/outboundtranslationslice/OutboundTranslationSliceFixtures.res.mjs

@@ -36,7 +36,7 @@ let outboundItemSchema = S.schema(s => ({
   email: s.m(S.string)
 }));
 
-function collect(event) {
+function collect(event, param) {
   let orderId = event.orderId;
   return [[
       orderId,
@@ -54,6 +54,8 @@ async function translate(_id, _item) {
   };
 }
 
+let sourceNames = [];
+
 let SendTrackingEmailSpec = {
   name: "SendTrackingEmail",
   moduleUrl: moduleUrl$1,
@@ -65,6 +67,7 @@ let SendTrackingEmailSpec = {
   maxRetries: 3,
   heartbeatInterval: 60,
   targetName: undefined,
+  sourceNames: sourceNames,
   externalSystem: undefined
 };
 
@@ -86,7 +89,7 @@ let inboundCommandSchema = S.schema(s => ({
   orderId: s.m(DcbTag$Reventless.string)
 }));
 
-function collect$1(event) {
+function collect$1(event, param) {
   let orderId = event.orderId;
   return [[
       orderId,
@@ -114,6 +117,8 @@ function translate$1(id, item) {
   return translateFn.contents(id, item);
 }
 
+let sourceNames$1 = [];
+
 let ProcessPaymentSpec_targetName = "ConfirmPayment";
 
 let ProcessPaymentSpec = {
@@ -128,6 +133,7 @@ let ProcessPaymentSpec = {
   maxRetries: 2,
   heartbeatInterval: 30,
   targetName: ProcessPaymentSpec_targetName,
+  sourceNames: sourceNames$1,
   externalSystem: undefined
 };
 

package/tests/components/outboundtranslationslice/OutboundTranslationSlicePlatformFixtures.res

@@ -86,6 +86,7 @@ module SendConfirmSpec = {
   let maxRetries = 3
   let heartbeatInterval = 60
   let targetName = None
+  let sourceNames: array<string> = []
   let externalSystem = Some("EmailService")
 }
 
@@ -99,7 +100,7 @@ module SendConfirmTranslation: OutboundTranslationSlice.Translation
   with module Spec := SendConfirmSpec = {
   let moduleUrl: string = %raw(`import.meta.url`)
 
-  let collect = (event: SendConfirmSpec.consumedEvent) =>
+  let collect = (event: SendConfirmSpec.consumedEvent, ~sourceId as _) =>
     switch event {
     | Placed({orderId}) =>
       collectCalls->Array.push(orderId)

package/tests/components/outboundtranslationslice/OutboundTranslationSlicePlatformFixtures.res.mjs

@@ -96,6 +96,8 @@ let outboundItemSchema = S.schema(s => ({
   orderId: s.m(S.string)
 }));
 
+let sourceNames = [];
+
 let SendConfirmSpec_externalSystem = "EmailService";
 
 let SendConfirmSpec = {
@@ -107,6 +109,7 @@ let SendConfirmSpec = {
   maxRetries: 3,
   heartbeatInterval: 60,
   targetName: undefined,
+  sourceNames: sourceNames,
   externalSystem: SendConfirmSpec_externalSystem
 };
 
@@ -116,7 +119,7 @@ let externalCalls = [];
 
 let moduleUrl$3 = import.meta.url;
 
-function collect(event) {
+function collect(event, param) {
   let orderId = event.orderId;
   collectCalls.push(orderId);
   return [[
@@ -216,7 +219,7 @@ let OutboundMaker = OutboundTranslationSlice_Builder$ReventlessLocal.Make(Bus);
 
 let SendConfirm = OutboundMaker.Make(SendConfirmSpec)(SendConfirmTranslation);
 
-let sendConfirmSlice = SendConfirm.make(dcbEventLog, publishJsonsOutput, undefined, undefined);
+let sendConfirmSlice = SendConfirm.make(dcbEventLog, undefined, publishJsonsOutput, undefined, undefined);
 
 function placeCmdJson(orderId) {
   return {