@reventlessdev/reventless-local 3.0.0-alpha.320 → 3.0.0-alpha.321

package/CHANGELOG.md

@@ -3,6 +3,14 @@
 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.321 (2026-11-05)
+
+### Features
+
+* each command's outcome is written as a line of its own ([84e5e3f](https://github.com/ReventlessDev/reventless-core/commit/84e5e3fa4d77e629c6f72d9079a8f82f6b26a5ac))
+* **local:** the command outcomes can be read by the flows they started ([e43819d](https://github.com/ReventlessDev/reventless-core/commit/e43819da448ab09ea39a39636a0ef065e3f0c34b))
+
+
 # 3.0.0-alpha.320 (2026-11-02)
 
 ### Features

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-local",
-  "version": "3.0.0-alpha.320",
+  "version": "3.0.0-alpha.321",
   "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-graphql-yoga": "1.0.0-alpha.31",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.13",
-    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.24",
     "@reventlessdev/rescript-effect": "1.0.0-alpha.1",
+    "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.24",
     "@reventlessdev/rescript-node": "2.0.0-alpha.26",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.328",
-    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.176",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.277",
     "@reventlessdev/rescript-pulumi-pulumi": "3.0.0-alpha.0",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.222",
+    "@reventlessdev/reventless-core": "3.0.0-alpha.329",
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.278",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.223",
+    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.177",
+    "@reventlessdev/reventless-postgres": "3.0.0-alpha.193",
     "@reventlessdev/reventless-seed": "1.0.0-alpha.41",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.193",
-    "@reventlessdev/reventless-postgres": "3.0.0-alpha.192"
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.194"
   },
   "devDependencies": {
     "rescript": "12.3.1",

package/src/Platform.res

@@ -120,6 +120,9 @@ module MakeWithConfig = (
   LocalViewChangeLog.install()
   // And what became of every command, for the same reason.
   LocalCommandOutcomeLog.install()
+  // The tap carries each outcome, so the line a deployed platform writes for it would only
+  // repeat it.
+  ReventlessCore.CommandTopic_Helpers.outcomeLines := false
 
   // What this platform provides for the roles its plugins need: every account it
   // can sign in as, built-in and loaded alike, or the file the store will load

package/src/Platform.res.mjs

@@ -78,6 +78,7 @@ import * as LocalViewChangeLog$ReventlessLocal from "./adapter/ViewChangeLog/Loc
 import * as PlatformMCP_Server$ReventlessLocal from "./adapter/PlatformMCP_Server.res.mjs";
 import * as ResourceAttribution$ReventlessCore from "@reventlessdev/reventless-core/src/ResourceAttribution.res.mjs";
 import * as Auth_GraphqlContext$ReventlessLocal from "./adapter/Auth/Auth_GraphqlContext.res.mjs";
+import * as CommandTopic_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/components/CommandTopic/CommandTopic_Helpers.res.mjs";
 import * as PgProjectionCatchup$ReventlessLocal from "./adapter/PgProjectionCatchup.res.mjs";
 import * as PluginsReadModelSpec$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/lifecycle/PluginsReadModelSpec.res.mjs";
 import * as StorePrefixCollision$ReventlessCore from "@reventlessdev/reventless-core/src/util/StorePrefixCollision.res.mjs";
@@ -160,6 +161,7 @@ function MakeWithConfig(Config) {
   LocalTapLines$ReventlessLocal.install();
   LocalViewChangeLog$ReventlessLocal.install();
   LocalCommandOutcomeLog$ReventlessLocal.install();
+  CommandTopic_Helpers$ReventlessCore.outcomeLines.contents = false;
   Role$Reventless.provideGroupsFrom(AccountStore$ReventlessLocal.providedGroups);
   OwnerScope$Reventless.defaultElevatedRoles([Role$Reventless.admin]);
   TestRunner$ReventlessLocal.setup();
@@ -1972,6 +1974,7 @@ function Make($star) {
   LocalTapLines$ReventlessLocal.install();
   LocalViewChangeLog$ReventlessLocal.install();
   LocalCommandOutcomeLog$ReventlessLocal.install();
+  CommandTopic_Helpers$ReventlessCore.outcomeLines.contents = false;
   Role$Reventless.provideGroupsFrom(AccountStore$ReventlessLocal.providedGroups);
   OwnerScope$Reventless.defaultElevatedRoles([Role$Reventless.admin]);
   TestRunner$ReventlessLocal.setup();

package/src/adapter/CommandOutcomeLog/CommandOutcomeLogEntry.res

@@ -10,15 +10,24 @@ type t = {
   item: JSON.t,
 }
 
-/** What a read asks for: every field narrows, none reads every outcome. */
-type filter = {correlationId?: string, msgId?: string}
+/** What a read asks for: every field narrows, none reads every outcome. `startsFlow` keeps the
+    commands that started a flow: an API request, an inbound translation, a timer's work item. */
+type filter = {correlationId?: string, msgId?: string, startsFlow?: bool}
+
+/** A flow's first command is the one whose flow id is its own message id. */
+let startsFlow = (e: t) => e.flow == Some(e.msgId)
 
 let matches = (f: filter, e: t) =>
   f.correlationId->Option.mapOr(true, c => e.flow == Some(c)) &&
-    f.msgId->Option.mapOr(true, m => e.msgId == m)
+  f.msgId->Option.mapOr(true, m => e.msgId == m) &&
+  (f.startsFlow != Some(true) || startsFlow(e))
 
 let filterOfJson = (j: option<JSON.t>): filter => {
   let d = j->Option.flatMap(JSON.Decode.object)->Option.getOr(Dict.make())
   let s = k => d->Dict.get(k)->Option.flatMap(JSON.Decode.string)
-  {correlationId: ?s("correlationId"), msgId: ?s("msgId")}
+  {
+    correlationId: ?s("correlationId"),
+    msgId: ?s("msgId"),
+    startsFlow: ?(d->Dict.get("startsFlow")->Option.flatMap(JSON.Decode.bool)),
+  }
 }

package/src/adapter/CommandOutcomeLog/CommandOutcomeLogEntry.res.mjs

@@ -4,9 +4,17 @@ import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
 import * as Primitive_object from "@rescript/runtime/lib/es6/Primitive_object.js";
 
+function startsFlow(e) {
+  return Primitive_object.equal(e.flow, e.msgId);
+}
+
 function matches(f, e) {
-  if (Stdlib_Option.mapOr(f.correlationId, true, c => Primitive_object.equal(e.flow, c))) {
-    return Stdlib_Option.mapOr(f.msgId, true, m => e.msgId === m);
+  if (Stdlib_Option.mapOr(f.correlationId, true, c => Primitive_object.equal(e.flow, c)) && Stdlib_Option.mapOr(f.msgId, true, m => e.msgId === m)) {
+    if (Primitive_object.notequal(f.startsFlow, true)) {
+      return true;
+    } else {
+      return startsFlow(e);
+    }
   } else {
     return false;
   }
@@ -17,11 +25,13 @@ function filterOfJson(j) {
   let s = k => Stdlib_Option.flatMap(d[k], Stdlib_JSON.Decode.string);
   return {
     correlationId: s("correlationId"),
-    msgId: s("msgId")
+    msgId: s("msgId"),
+    startsFlow: Stdlib_Option.flatMap(d["startsFlow"], Stdlib_JSON.Decode.bool)
   };
 }
 
 export {
+  startsFlow,
   matches,
   filterOfJson,
 }

package/src/adapter/CommandOutcomeLog/CommandOutcomeLogStorage_Sqlite.res

@@ -52,6 +52,9 @@ let read = (db, ~filter: CommandOutcomeLogEntry.filter, ~before: option<int>, ~f
   }
   filter.correlationId->Option.forEach(c => add("flow = ?", str(c)))
   filter.msgId->Option.forEach(m => add("msg_id = ?", str(m)))
+  if filter.startsFlow == Some(true) {
+    where->Array.push("flow = msg_id")
+  }
   before->Option.forEach(b => add("seq < ?", JSON.Encode.int(b)))
   let sql = `SELECT seq, flow, msg_id, item FROM ${table}${where == []
       ? ""

package/src/adapter/CommandOutcomeLog/CommandOutcomeLogStorage_Sqlite.res.mjs

@@ -56,6 +56,9 @@ function read(db, filter, before, first) {
   };
   Stdlib_Option.forEach(filter.correlationId, c => add("flow = ?", c));
   Stdlib_Option.forEach(filter.msgId, m => add("msg_id = ?", m));
+  if (Primitive_object.equal(filter.startsFlow, true)) {
+    where.push("flow = msg_id");
+  }
   Stdlib_Option.forEach(before, b => add("seq < ?", b));
   let sql = `SELECT seq, flow, msg_id, item FROM ` + table + (
     Primitive_object.equal(where, []) ? "" : " WHERE " + where.join(" AND ")

package/src/adapter/LocalPlatformObserve.res

@@ -126,6 +126,7 @@ let viewChangeTypes = [
   `input Platform_CommandOutcomeFilter {
   correlationId: String
   msgId: String
+  startsFlow: Boolean
 }`,
   `type Platform_CommandOutcomeEdge {
   node: AWSJSON!

package/src/adapter/LocalPlatformObserve.res.mjs

@@ -123,6 +123,7 @@ let viewChangeTypes = [
   `input Platform_CommandOutcomeFilter {
   correlationId: String
   msgId: String
+  startsFlow: Boolean
 }`,
   `type Platform_CommandOutcomeEdge {
   node: AWSJSON!

package/src/reexport/CommandTopic.res.mjs

@@ -16,6 +16,10 @@ let registerCommandOutcome = CommandTopic$ReventlessCore.registerCommandOutcome;
 
 let clearCommandOutcome = CommandTopic$ReventlessCore.clearCommandOutcome;
 
+let outcomeLines = CommandTopic$ReventlessCore.outcomeLines;
+
+let logOutcome = CommandTopic$ReventlessCore.logOutcome;
+
 let fireCommandOutcome = CommandTopic$ReventlessCore.fireCommandOutcome;
 
 let acceptedResultChannel = CommandTopic$ReventlessCore.acceptedResultChannel;
@@ -56,6 +60,8 @@ export {
   nextOutcomeHookId,
   registerCommandOutcome,
   clearCommandOutcome,
+  outcomeLines,
+  logOutcome,
   fireCommandOutcome,
   acceptedResultChannel,
   rejectedResultChannel,

package/tests/adapter/LocalPlatformObserveTest.res

@@ -236,7 +236,7 @@ describe("the platform API's watching fields", () => {
     SqliteDriver.close(db)
   })
 
-  // Three commands: two in one flow, one rejected.
+  // Three commands: two in one flow, which the first started, one rejected.
   let keepOutcomes = () => {
     let report = (
       ~flow,
@@ -252,11 +252,11 @@ describe("the platform API's watching fields", () => {
       entityId: Some("o-1"),
       eventCount: 1,
     })
-    LocalCommandOutcomeLog.record(report(~flow="k-1", ~outcome=accepted, "c-1"))
+    LocalCommandOutcomeLog.record(report(~flow="c-1", ~outcome=accepted, "c-1"))
     LocalCommandOutcomeLog.record(report(~flow="k-2", ~outcome=accepted, "c-2"))
     LocalCommandOutcomeLog.record(
       report(
-        ~flow="k-1",
+        ~flow="c-1",
         ~outcome=OutcomeRejected({
           errorCode: "AlreadyShipped",
           errorDetail: "",
@@ -285,13 +285,21 @@ describe("the platform API's watching fields", () => {
         )
       })
     }
-    (await ask(`{"filter":{"correlationId":"k-1"}}`), await ask(`{"filter":{"msgId":"c-2"}}`))
+    (
+      await ask(`{"filter":{"correlationId":"c-1"}}`),
+      await ask(`{"filter":{"msgId":"c-2"}}`),
+      await ask(`{"filter":{"startsFlow":true}}`),
+    )
   }
 
-  let outcomesExpected = ([("c-3", "rejected"), ("c-1", "accepted")], [("c-2", "accepted")])
+  let outcomesExpected = (
+    [("c-3", "rejected"), ("c-1", "accepted")],
+    [("c-2", "accepted")],
+    [("c-1", "accepted")],
+  )
 
   testPromise(
-    "the command outcomes answer an admin by flow and by command, newest first",
+    "the command outcomes answer an admin by flow, by command and by flow start, newest first",
     async () => {
       BackendState.setMemory()
       LocalCommandOutcomeLog.resetForTests()

package/tests/adapter/LocalPlatformObserveTest.res.mjs

@@ -246,12 +246,12 @@ globalThis.describe("the platform API's watching fields", () => {
       entityId: "o-1",
       eventCount: 1
     };
-    LocalCommandOutcomeLog$ReventlessLocal.record(report("k-1", accepted, "c-1"));
+    LocalCommandOutcomeLog$ReventlessLocal.record(report("c-1", accepted, "c-1"));
     LocalCommandOutcomeLog$ReventlessLocal.record(report("k-2", accepted, "c-2"));
     LocalCommandOutcomeLog$ReventlessLocal.record({
       component: "Order",
       reference: "c-3",
-      correlationId: "k-1",
+      correlationId: "c-1",
       outcome: {
         TAG: "OutcomeRejected",
         errorCode: "AlreadyShipped",
@@ -275,8 +275,9 @@ globalThis.describe("the platform API's watching fields", () => {
       });
     };
     return [
-      await ask(`{"filter":{"correlationId":"k-1"}}`),
-      await ask(`{"filter":{"msgId":"c-2"}}`)
+      await ask(`{"filter":{"correlationId":"c-1"}}`),
+      await ask(`{"filter":{"msgId":"c-2"}}`),
+      await ask(`{"filter":{"startsFlow":true}}`)
     ];
   };
   let outcomesExpected_0 = [
@@ -293,11 +294,16 @@ globalThis.describe("the platform API's watching fields", () => {
       "c-2",
       "accepted"
     ]];
+  let outcomesExpected_2 = [[
+      "c-1",
+      "accepted"
+    ]];
   let outcomesExpected = [
     outcomesExpected_0,
-    outcomesExpected_1
+    outcomesExpected_1,
+    outcomesExpected_2
   ];
-  globalThis.test("the command outcomes answer an admin by flow and by command, newest first", async () => {
+  globalThis.test("the command outcomes answer an admin by flow, by command and by flow start, newest first", async () => {
     BackendState$ReventlessLocal.setMemory();
     LocalCommandOutcomeLog$ReventlessLocal.resetForTests();
     globalThis.expect(await outcomesRead()).toEqual(outcomesExpected);