@reventlessdev/reventless-local 3.0.0-alpha.288 → 3.0.0-alpha.290

package/CHANGELOG.md

@@ -3,6 +3,26 @@
 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.290 (2026-10-17)
+
+**Note:** Version bump only for package @reventlessdev/reventless-local
+
+
+
+
+
+# 3.0.0-alpha.289 (2026-10-16)
+
+* feat!(inbound): a translation slice can declare a signed webhook URL ([0ad6994](https://github.com/ReventlessDev/reventless-core/commit/0ad69949fcc91c2756c60ca8cb120dd468841d8b))
+
+### BREAKING CHANGES
+
+* InboundTranslationSlice.Spec requires `endpoint`. Specs under
+@@reventless.spec get it from the PPX (republish reventless-ppx with this
+release); hand-written specs add `let endpoint = None`.
+
+
+
 # 3.0.0-alpha.288 (2026-10-16)
 
 **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.288",
+  "version": "3.0.0-alpha.290",
   "description": "Local platform for Reventless (in-memory or SQLite backend, for development and testing without AWS)",
   "license": "Apache-2.0",
   "bin": {
@@ -34,24 +34,24 @@
     "graphql-yoga": "^5.21.0",
     "sury": "11.0.0",
     "ws": "^8.18.0",
-    "@reventlessdev/rescript-effect": "1.0.0-alpha.0",
     "@reventlessdev/rescript-graphql-yoga": "1.0.0-alpha.29",
+    "@reventlessdev/rescript-effect": "1.0.0-alpha.0",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.12",
     "@reventlessdev/rescript-node": "2.0.0-alpha.22",
     "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.23",
-    "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.23",
-    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.145",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.245",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.194",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.297",
-    "@reventlessdev/reventless-postgres": "3.0.0-alpha.161",
+    "@reventlessdev/rescript-pulumi-pulumi": "3.0.0-alpha.0",
+    "@reventlessdev/reventless-core": "3.0.0-alpha.299",
+    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.147",
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.247",
+    "@reventlessdev/reventless-postgres": "3.0.0-alpha.163",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.196",
     "@reventlessdev/reventless-seed": "1.0.0-alpha.34",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.166"
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.168"
   },
   "devDependencies": {
     "rescript": "12.3.1",
     "sury-ppx": "11.0.0",
-    "@reventlessdev/reventless-ppx": "1.0.0-alpha.102"
+    "@reventlessdev/reventless-ppx": "1.0.0-alpha.103"
   },
   "peerDependencies": {
     "rescript": "^12.3.1"

package/src/adapter/Webhook/LocalWebhookRegistry.res

@@ -0,0 +1,64 @@
+// The local platform's webhook routes, served in process: no HTTP server, so a
+// test (or a dev tool) posts a raw body with `post`, which runs the same
+// signature check and dispatch as the AWS Function URL.
+
+open ReventlessCore
+
+let slices: dict<InboundTranslationSlice_Webhook.slice> = Dict.make()
+
+/** Register a slice's route now, and bind its operations when they resolve. A
+    request posted before then waits for them rather than failing. Two slices may
+    not share a path. */
+let register = (
+  ~route: InboundTranslationSlice_Webhook.route,
+  ~operations: Pulumi.Output.t<ReventlessInfra.InboundTranslationSlice.operations>,
+) => {
+  switch slices->Dict.get(route.path) {
+  | Some({route: taken}) =>
+    JsError.throwWithMessage(
+      `webhook path /${route.path} is declared by both ${taken.slice} and ${route.slice}`,
+    )
+  | None => ()
+  }
+  let bind = ref(_ => ())
+  let bound: promise<ReventlessInfra.InboundTranslationSlice.operations> = Promise.make((
+    resolve,
+    _,
+  ) => bind := resolve)
+  let _ = operations->Pulumi.Output.apply(ops => bind.contents(ops))
+  slices->Dict.set(
+    route.path,
+    {
+      route,
+      receive: async (input, ~caller) => await (await bound).receive(input, ~caller, ~door=Webhook),
+      refuse: async (~body, ~errorCode, error) =>
+        await (await bound).refuse(~body, ~errorCode, error),
+    },
+  )
+}
+
+/** Serve one request. Header names are matched case-insensitively. */
+let post = (
+  ~path: string,
+  ~method: string="POST",
+  ~headers: dict<string>=Dict.make(),
+  ~secretOf=?,
+  ~nowSeconds=?,
+  body: string,
+): promise<InboundTranslationSlice_Webhook.response> =>
+  InboundTranslationSlice_Webhook.dispatch(
+    slices->Dict.valuesToArray,
+    ~secretOf?,
+    ~nowSeconds?,
+    {
+      method,
+      path,
+      headers: headers
+      ->Dict.toArray
+      ->Array.map(((name, value)) => (name->String.toLowerCase, value))
+      ->Dict.fromArray,
+      body,
+    },
+  )
+
+let reset = () => slices->Dict.keysToArray->Array.forEach(path => slices->Dict.delete(path))

package/src/adapter/Webhook/LocalWebhookRegistry.res.mjs

@@ -0,0 +1,52 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Stdlib_Dict from "@rescript/runtime/lib/es6/Stdlib_Dict.js";
+import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
+import * as InboundTranslationSlice_Webhook$ReventlessCore from "@reventlessdev/reventless-core/src/components/InboundTranslationSlice/InboundTranslationSlice_Webhook.res.mjs";
+
+let slices = {};
+
+function register(route, operations) {
+  let match = slices[route.path];
+  if (match !== undefined) {
+    Stdlib_JsError.throwWithMessage(`webhook path /` + route.path + ` is declared by both ` + match.route.slice + ` and ` + route.slice);
+  }
+  let bind = {
+    contents: param => {}
+  };
+  let bound = new Promise((resolve, param) => {
+    bind.contents = resolve;
+  });
+  operations.apply(ops => bind.contents(ops));
+  slices[route.path] = {
+    route: route,
+    receive: async (input, caller) => await (await bound).receive(input, caller, "Webhook"),
+    refuse: async (body, errorCode, error) => await (await bound).refuse(body, errorCode, error)
+  };
+}
+
+function post(path, methodOpt, headersOpt, secretOf, nowSeconds, body) {
+  let method = methodOpt !== undefined ? methodOpt : "POST";
+  let headers = headersOpt !== undefined ? headersOpt : ({});
+  return InboundTranslationSlice_Webhook$ReventlessCore.dispatch(Object.values(slices), secretOf, nowSeconds, {
+    method: method,
+    path: path,
+    headers: Object.fromEntries(Object.entries(headers).map(param => [
+      param[0].toLowerCase(),
+      param[1]
+    ])),
+    body: body
+  });
+}
+
+function reset() {
+  Object.keys(slices).forEach(path => Stdlib_Dict.$$delete(slices, path));
+}
+
+export {
+  slices,
+  register,
+  post,
+  reset,
+}
+/* InboundTranslationSlice_Webhook-ReventlessCore Not a pure module */

package/src/components/InboundTranslationSlice_Builder.res

@@ -26,7 +26,16 @@ module Make = (Bus: LocalBus.T) => {
     module Translation = Translation
     type component = Inner.component
     let queryDbName = Inner.queryDbName
-    let make = Inner.make
+    let make = (~publishJsons, ~runtime=?, ~opts=?) => {
+      let component = Inner.make(~publishJsons, ~runtime?, ~opts?)
+      Spec.endpoint->Option.forEach(endpoint =>
+        LocalWebhookRegistry.register(
+          ~route=ReventlessCore.InboundTranslationSlice_Webhook.routeOf(~slice=Spec.name, endpoint),
+          ~operations=component->ReventlessCore.Component.operations,
+        )
+      )
+      component
+    }
     // Re-expose operations for test resolution
     let operations: component => Pulumi.Output.t<
       ReventlessCore.InboundTranslationSlice.operations,

package/src/components/InboundTranslationSlice_Builder.res.mjs

@@ -1,9 +1,12 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
+import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
 import * as Component$ReventlessCore from "@reventlessdev/reventless-core/src/components/Component.res.mjs";
 import * as LocalQueryDbStorage$ReventlessLocal from "../adapter/QueryDb/LocalQueryDbStorage.res.mjs";
+import * as LocalWebhookRegistry$ReventlessLocal from "../adapter/Webhook/LocalWebhookRegistry.res.mjs";
 import * as QueryDbResolvers_GraphQL$ReventlessLocal from "../adapter/QueryDb/QueryDbResolvers_GraphQL.res.mjs";
 import * as InboundTranslationSlice_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/InboundTranslationSlice/InboundTranslationSlice_Builder.res.mjs";
+import * as InboundTranslationSlice_Webhook$ReventlessCore from "@reventlessdev/reventless-core/src/components/InboundTranslationSlice/InboundTranslationSlice_Webhook.res.mjs";
 
 function Make(Bus) {
   let QueryDbStorage = LocalQueryDbStorage$ReventlessLocal.Make(Bus);
@@ -21,12 +24,17 @@ function Make(Bus) {
   })(Api);
   let Make$1 = Spec => (Translation => {
     let Inner = CoreMaker.Make(Spec)(Translation);
+    let make = (publishJsons, runtime, opts) => {
+      let component = Inner.make(publishJsons, runtime, opts);
+      Stdlib_Option.forEach(Spec.endpoint, endpoint => LocalWebhookRegistry$ReventlessLocal.register(InboundTranslationSlice_Webhook$ReventlessCore.routeOf(Spec.name, endpoint), Component$ReventlessCore.operations(component)));
+      return component;
+    };
     return {
       Inner: Inner,
       Spec: Spec,
       Translation: Translation,
       queryDbName: Inner.queryDbName,
-      make: Inner.make,
+      make: make,
       operations: Component$ReventlessCore.operations
     };
   });

package/tests/adapter/InboundTranslationMutationTest.res.mjs

@@ -29,7 +29,8 @@ let Callback = InboundTranslationSlice_Callback$ReventlessCore.Make({
   commandSchema: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.commandSchema,
   targetName: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.targetName,
   externalSystem: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.externalSystem,
-  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.authorizationOf
+  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.authorizationOf,
+  endpoint: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.endpoint
 })(PaymentWebhookTranslation);
 
 let scope = "Payments";
@@ -106,7 +107,7 @@ globalThis.describe("InboundTranslationSlice mutation — response envelope", ()
     DomainGraphQL_Server$ReventlessLocal.setScope(scope);
     InboundTranslationResolvers_GraphQL$ReventlessLocal.register(fieldName, InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.externalInputSchema, "AllowAuthenticated", DomainGraphQL_Server$ReventlessLocal.asInterface);
     DomainGraphQL_Server$ReventlessLocal.resetScope();
-    InboundTranslationResolvers_GraphQL$ReventlessLocal.bindReceive(fieldName, (inputJson, caller) => Callback.receive(publishJsons, inputJson, caller));
+    InboundTranslationResolvers_GraphQL$ReventlessLocal.bindReceive(fieldName, (inputJson, caller) => Callback.receive(publishJsons, inputJson, caller, undefined));
   });
   globalThis.test("a successful translation resolves as CommandAccepted, with no errors", async () => {
     let result = await runMutation("completed");
@@ -157,7 +158,8 @@ let CatalogFeedCallback = InboundTranslationSlice_Callback$ReventlessCore.Make({
   commandSchema: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.commandSchema,
   targetName: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.targetName,
   externalSystem: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.externalSystem,
-  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.authorizationOf
+  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.authorizationOf,
+  endpoint: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.endpoint
 })(CatalogFeedTranslation);
 
 let feedField = "Catalog_CatalogFeed";
@@ -173,7 +175,7 @@ globalThis.describe("InboundTranslationSlice mutation — the door", () => {
     DomainGraphQL_Server$ReventlessLocal.setScope("Catalog");
     InboundTranslationResolvers_GraphQL$ReventlessLocal.register(feedField, InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.externalInputSchema, Dcb_Builder$ReventlessCore.inboundDoorPermission(InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.commandSchema, InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.authorizationOf), DomainGraphQL_Server$ReventlessLocal.asInterface);
     DomainGraphQL_Server$ReventlessLocal.resetScope();
-    InboundTranslationResolvers_GraphQL$ReventlessLocal.bindReceive(feedField, (inputJson, caller) => CatalogFeedCallback.receive(publishJsons, inputJson, caller));
+    InboundTranslationResolvers_GraphQL$ReventlessLocal.bindReceive(feedField, (inputJson, caller) => CatalogFeedCallback.receive(publishJsons, inputJson, caller, undefined));
   });
   globalThis.test("a caller holding none of the commands' roles is refused", async () => {
     let node = payload(await runFeed(signedIn(["Ops"]), "product"));

package/tests/components/automationslice/AutomationRescheduleFixtures.res

@@ -26,7 +26,6 @@ module DigestSpec = {
   type command = SendDigest({recipientId: @s.matches(DcbTag.string) string})
 
   let maxRetries = 2
-  let heartbeatInterval = 60
   let targetName = "SendDigest"
   let schedule = None
 }

package/tests/components/automationslice/AutomationRescheduleFixtures.res.mjs

@@ -69,7 +69,6 @@ let DigestSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: "SendDigest",
   schedule: undefined,
   authorizationOf: authorizationOf,

package/tests/components/automationslice/AutomationScheduleFixtures.res

@@ -16,7 +16,6 @@ module DemandReportSpec = {
   type command = RequestDemandReport({day: float})
 
   let maxRetries = 2
-  let heartbeatInterval = 60
   let targetName = "ReportSettings"
   let schedule = Some(Schedule.Calendar({calendar: Daily({hour: 6, minute: 0})}))
 }

package/tests/components/automationslice/AutomationScheduleFixtures.res.mjs

@@ -54,7 +54,6 @@ let DemandReportSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: targetName,
   schedule: DemandReportSpec_schedule,
   authorizationOf: authorizationOf,
@@ -124,7 +123,6 @@ let UnscheduledSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: targetName,
   authorizationOf: authorizationOf,
   commandTransition: commandTransition,
@@ -155,7 +153,6 @@ let FromClockUnscheduled = AutomationSlice$Reventless.Mapping.Make({
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: targetName,
   schedule: undefined
 })({
@@ -180,7 +177,6 @@ AutomationSlice$Reventless.Mappings.Make({
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: targetName,
   schedule: undefined
 });
@@ -208,7 +204,6 @@ let Unscheduled = AutomationSliceMaker.Make({
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: targetName,
   schedule: undefined
 })(UnscheduledAutomation);

package/tests/components/automationslice/AutomationSliceFixtures.res

@@ -39,7 +39,6 @@ module ShipOrderSpec = {
   type command = CreateShipment({orderId: @s.matches(Reventless.DcbTag.string) string})
 
   let maxRetries = 3
-  let heartbeatInterval = 60
   let targetName = "CreateShipment"
   let schedule = None
 }
@@ -55,7 +54,6 @@ module SkipProcessSpec = {
   type command = Noop
 
   let maxRetries = 0
-  let heartbeatInterval = 60
   let targetName = "Noop"
   let schedule = None
 }

package/tests/components/automationslice/AutomationSliceFixtures.res.mjs

@@ -75,7 +75,6 @@ let ShipOrderSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 3,
-  heartbeatInterval: 60,
   targetName: "CreateShipment",
   schedule: undefined,
   authorizationOf: authorizationOf,
@@ -107,7 +106,6 @@ let SkipProcessSpec = {
   todoItemSchema: todoItemSchema$1,
   commandSchema: commandSchema$1,
   maxRetries: 0,
-  heartbeatInterval: 60,
   targetName: "Noop",
   schedule: undefined,
   authorizationOf: authorizationOf$1,

package/tests/components/automationslice/AutomationSliceSelfDeadlockFixtures.res

@@ -134,7 +134,6 @@ module AutoShipSpec = {
   type command = Ship({orderId: @s.matches(Reventless.DcbTag.string) string})
 
   let maxRetries = 3
-  let heartbeatInterval = 60
   let targetName = "Ship"
   let schedule = None
 }

package/tests/components/automationslice/AutomationSliceSelfDeadlockFixtures.res.mjs

@@ -241,7 +241,6 @@ let AutoShipSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema$2,
   maxRetries: 3,
-  heartbeatInterval: 60,
   targetName: "Ship",
   schedule: undefined,
   authorizationOf: authorizationOf$2,

package/tests/components/automationslice/AutomationSweepFixtures.res

@@ -24,7 +24,6 @@ module CancelUnshippedSpec = {
   type command = CancelOrder({orderId: @s.matches(DcbTag.string) string})
 
   let maxRetries = 2
-  let heartbeatInterval = 60
   let targetName = "CancelOrder"
   let schedule = None
 }

package/tests/components/automationslice/AutomationSweepFixtures.res.mjs

@@ -62,7 +62,6 @@ let CancelUnshippedSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 2,
-  heartbeatInterval: 60,
   targetName: "CancelOrder",
   schedule: undefined,
   authorizationOf: authorizationOf,

package/tests/components/automationslice/MixedSourceAutomationSliceFixtures.res

@@ -53,7 +53,6 @@ module AutoFulfillSpec = {
       })
 
   let maxRetries = 3
-  let heartbeatInterval = 60
   let targetName = "MarkFulfilled"
   let schedule = None
 }

package/tests/components/automationslice/MixedSourceAutomationSliceFixtures.res.mjs

@@ -80,7 +80,6 @@ let AutoFulfillSpec = {
   todoItemSchema: todoItemSchema,
   commandSchema: commandSchema,
   maxRetries: 3,
-  heartbeatInterval: 60,
   targetName: "MarkFulfilled",
   schedule: undefined,
   authorizationOf: authorizationOf,

package/tests/components/inboundtranslationslice/InboundTranslationSliceCallbackTest.res

@@ -215,6 +215,7 @@ describe("InboundTranslationSlice Callback", () => {
 
           let targetName = "ConfirmPayment"
           let externalSystem = None
+          let endpoint = None
 
           let translate = (input: externalInput) => Ok(
             input.items->Array.map(
@@ -285,6 +286,7 @@ describe("InboundTranslationSlice Callback", () => {
 
           let targetName = "ConfirmPayment"
           let externalSystem = None
+          let endpoint = None
 
           let translate = (_input: externalInput) => Ok([])
 

package/tests/components/inboundtranslationslice/InboundTranslationSliceCallbackTest.res.mjs

@@ -26,7 +26,8 @@ let Callback = InboundTranslationSlice_Callback$ReventlessCore.Make({
   commandSchema: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.commandSchema,
   targetName: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.targetName,
   externalSystem: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.externalSystem,
-  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.authorizationOf
+  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.authorizationOf,
+  endpoint: InboundTranslationSliceFixtures$ReventlessLocal.PaymentWebhookSpec.endpoint
 })(PaymentWebhookTranslation);
 
 globalThis.describe("InboundTranslationSlice Callback", () => {
@@ -46,7 +47,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         orderId: "ord-1",
         status: "completed"
       };
-      let result = await Callback.receive(mockPublish, inputJson, undefined);
+      let result = await Callback.receive(mockPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         let match = result._0;
         globalThis.expect(match.targetIds).toEqual(["ord-1"]);
@@ -77,7 +78,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         orderId: "ord-1",
         status: "pending"
       };
-      let result = await Callback.receive(mockPublish, inputJson, undefined);
+      let result = await Callback.receive(mockPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         globalThis.expect(true).toBe(false);
       } else {
@@ -94,7 +95,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
       let inputJson = {
         unexpected: "data"
       };
-      let result = await Callback.receive(mockPublish, inputJson, undefined);
+      let result = await Callback.receive(mockPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         globalThis.expect(true).toBe(false);
       } else {
@@ -112,7 +113,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         orderId: "ord-1",
         status: "completed"
       };
-      let result = await Callback.receive(failingPublish, inputJson, undefined);
+      let result = await Callback.receive(failingPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         globalThis.expect(true).toBe(false);
       } else {
@@ -131,7 +132,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         paymentId: "pay-1",
         orderId: "ord-1",
         status: "completed"
-      }, undefined);
+      }, undefined, undefined);
       let firstId = InboundTranslationSlice_Callback$ReventlessCore.requestIdOf(first);
       globalThis.expect(Stdlib_Option.isSome(InboundTranslationSlice_Callback$ReventlessCore.takeAuditRow(Callback.auditLog, firstId))).toBe(true);
       globalThis.expect(Object.entries(Callback.auditLog).length).toBe(0);
@@ -139,7 +140,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         paymentId: "pay-1",
         orderId: "ord-1",
         status: "completed"
-      }, undefined);
+      }, undefined, undefined);
       let secondId = InboundTranslationSlice_Callback$ReventlessCore.requestIdOf(second);
       globalThis.expect(secondId === firstId).toBe(false);
       globalThis.expect(Object.entries(Callback.auditLog).length).toBe(1);
@@ -152,7 +153,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         paymentId: "pay-1",
         orderId: "ord-1",
         status: "pending"
-      }, undefined);
+      }, undefined, undefined);
       let id = InboundTranslationSlice_Callback$ReventlessCore.requestIdOf(result);
       let row = InboundTranslationSlice_Callback$ReventlessCore.takeAuditRow(Callback.auditLog, id);
       if (row !== undefined) {
@@ -198,7 +199,8 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         commandSchema: commandSchema,
         targetName: "ConfirmPayment",
         externalSystem: undefined,
-        authorizationOf: authorizationOf
+        authorizationOf: authorizationOf,
+        endpoint: undefined
       })(MultiTranslation);
       let publishedCommands = {
         contents: []
@@ -214,7 +216,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
           "pay-3"
         ]
       };
-      let result = await MultiCallback.receive(mockPublish, inputJson, undefined);
+      let result = await MultiCallback.receive(mockPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         let match = result._0;
         globalThis.expect(match.targetIds).toEqual([
@@ -260,7 +262,8 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
         commandSchema: commandSchema,
         targetName: "ConfirmPayment",
         externalSystem: undefined,
-        authorizationOf: authorizationOf
+        authorizationOf: authorizationOf,
+        endpoint: undefined
       })(EmptyTranslation);
       let publishedCommands = {
         contents: []
@@ -271,7 +274,7 @@ globalThis.describe("InboundTranslationSlice Callback", () => {
       let inputJson = {
         orderId: "ord-1"
       };
-      let result = await EmptyCallback.receive(mockPublish, inputJson, undefined);
+      let result = await EmptyCallback.receive(mockPublish, inputJson, undefined, undefined);
       if (result.TAG === "Ok") {
         let match = result._0;
         globalThis.expect(match.targetIds).toEqual([]);
@@ -300,7 +303,8 @@ let CatalogFeedCallback = InboundTranslationSlice_Callback$ReventlessCore.Make({
   commandSchema: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.commandSchema,
   targetName: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.targetName,
   externalSystem: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.externalSystem,
-  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.authorizationOf
+  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.authorizationOf,
+  endpoint: InboundTranslationSliceFixtures$ReventlessLocal.CatalogFeedSpec.endpoint
 })(CatalogFeedTranslation);
 
 function caller(groups) {
@@ -336,7 +340,7 @@ globalThis.describe("receive checks each command against its own rule", () => {
     published.contents = [];
   });
   globalThis.test("a caller lacking one command's role is refused, and nothing is published", async () => {
-    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), caller(["Merchandiser"]));
+    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), caller(["Merchandiser"]), undefined);
     if (result.TAG === "Ok") {
       globalThis.expect(true).toBe(false);
     } else {
@@ -351,22 +355,22 @@ globalThis.describe("receive checks each command against its own rule", () => {
     let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), caller([
       "Merchandiser",
       "Admin"
-    ]));
+    ]), undefined);
     globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
     globalThis.expect(published.contents.length).toBe(2);
   });
   globalThis.test("the role one command needs is enough when the input yields only it", async () => {
-    let result = await CatalogFeedCallback.receive(publish, catalogInput("product"), caller(["Merchandiser"]));
+    let result = await CatalogFeedCallback.receive(publish, catalogInput("product"), caller(["Merchandiser"]), undefined);
     globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
     globalThis.expect(published.contents.length).toBe(1);
   });
   globalThis.test("no caller is the platform itself, and publishes", async () => {
-    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), undefined);
+    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), undefined, undefined);
     globalThis.expect(Stdlib_Result.isOk(result)).toBe(true);
     globalThis.expect(published.contents.length).toBe(2);
   });
   globalThis.test("a refusal answers CommandRejected with Forbidden", async () => {
-    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), Identity$Reventless.anonymous);
+    let result = await CatalogFeedCallback.receive(publish, catalogInput("both"), Identity$Reventless.anonymous, undefined);
     let match = InboundTranslationSlice_Callback$ReventlessCore.receiveResultToOutcome(result);
     switch (match.TAG) {
       case "Rejected" :
@@ -396,7 +400,8 @@ let NoteFeedCallback = InboundTranslationSlice_Callback$ReventlessCore.Make({
   commandSchema: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.commandSchema,
   targetName: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.targetName,
   externalSystem: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.externalSystem,
-  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.authorizationOf
+  authorizationOf: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.authorizationOf,
+  endpoint: InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.endpoint
 })(NoteFeedTranslation);
 
 globalThis.describe("receive encodes commands with their schema", () => {
@@ -410,7 +415,7 @@ globalThis.describe("receive encodes commands with their schema", () => {
     await NoteFeedCallback.receive(publish, Object.fromEntries([[
         "orderId",
         "ord-1"
-      ]]), undefined);
+      ]]), undefined, undefined);
     let commandJson = published.contents[0].commandJson;
     let decoded = Sury.parseOrThrow(commandJson, InboundTranslationSliceFixtures$ReventlessLocal.NoteFeedSpec.commandSchema);
     globalThis.expect(decoded).toEqual({

package/tests/components/inboundtranslationslice/InboundTranslationSliceFixtures.res

@@ -28,6 +28,7 @@ module PaymentWebhookSpec = {
 
   let targetName = "ConfirmPayment"
   let externalSystem = None
+  let endpoint = None
 
   let translate = (input: externalInput) =>
     switch input.status {
@@ -52,6 +53,7 @@ module CatalogFeedSpec = {
 
   let targetName = "AddProduct"
   let externalSystem = None
+  let endpoint = None
 
   type role = Reventless.Role.name
   let merchandiser = Reventless.Role.make("Merchandiser")
@@ -89,6 +91,7 @@ module NoteFeedSpec = {
 
   let targetName = "Annotate"
   let externalSystem = None
+  let endpoint = None
 
   let translate = (input: externalInput) => Ok([
     (input.orderId, Annotate({orderId: input.orderId, note: None})),