@reventlessdev/reventless-aws 3.0.0-alpha.167 → 3.0.0-alpha.169

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.169 (2026-07-02)
+
+**Note:** Version bump only for package @reventlessdev/reventless-aws
+
+
+
+
+
+# 3.0.0-alpha.168 (2026-06-29)
+
+**Note:** Version bump only for package @reventlessdev/reventless-aws
+
+
+
+
+
 # 3.0.0-alpha.167 (2026-06-27)
 
 **Note:** Version bump only for package @reventlessdev/reventless-aws

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-aws",
-  "version": "3.0.0-alpha.167",
+  "version": "3.0.0-alpha.169",
   "description": "AWS adapters for Reventless",
   "license": "Apache-2.0",
   "dependencies": {
@@ -9,15 +9,15 @@
     "sury": "11.0.0-alpha.4",
     "uuid": "^13.0.0",
     "@reventlessdev/rescript-aws-sdk": "2.2.0-alpha.20",
-    "@reventlessdev/rescript-jest": "1.0.0-alpha.3",
+    "@reventlessdev/rescript-effect": "0.1.0-alpha.24",
+    "@reventlessdev/rescript-jest": "1.0.0-alpha.5",
     "@reventlessdev/rescript-pulumi-aws": "2.4.0-alpha.44",
-    "@reventlessdev/rescript-effect": "0.1.0-alpha.23",
     "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.14",
     "@reventlessdev/rescript-uuid": "1.1.0-alpha.13",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.134",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.61",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.81",
-    "@reventlessdev/reventless-interop": "3.0.0-alpha.21"
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.83",
+    "@reventlessdev/reventless-core": "3.0.0-alpha.136",
+    "@reventlessdev/reventless-interop": "3.0.0-alpha.22",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.63"
   },
   "devDependencies": {
     "rescript": "^12.3.0",

package/src/adapter/EventLog/EventLogStorage_DynamoDb_Runtime.res

@@ -40,7 +40,9 @@ let appendWithCondition = (tableName, jsons) => {
   if count > 100 {
     Effect.succeed(
       Error(
-        `EventLog.append: max 100 events per command, got ${count->Int.toString}`,
+        ReventlessCore.EventLog.StorageFailure(
+          `EventLog.append: max 100 events per command, got ${count->Int.toString}`,
+        ),
       ),
     )
   } else if count == 1 {
@@ -58,10 +60,13 @@ let append = table =>
     appendWithCondition(table.name, jsons)
     ->Effect.catchAll(err =>
       switch err {
-      | DynamoDb_Error.StaleState(_) => Effect.succeed(Error("conflict"))
+      | DynamoDb_Error.StaleState(_) =>
+        Effect.succeed(Error(ReventlessCore.EventLog.Conflict))
       | _ =>
         let msg = DynamoDb_Error.message(err)
-        Effect.succeed(Error(`DynamoDB conditional append failed: ${msg}`))
+        Effect.succeed(
+          Error(ReventlessCore.EventLog.StorageFailure(`DynamoDB conditional append failed: ${msg}`)),
+        )
       }
     )
     ->Effect.runPromise

package/src/adapter/EventLog/EventLogStorage_DynamoDb_Runtime.res.mjs

@@ -51,7 +51,10 @@ function appendWithCondition(tableName, jsons) {
   if (count > 100) {
     return Effect$1.succeed({
       TAG: "Error",
-      _0: `EventLog.append: max 100 events per command, got ` + count.toString()
+      _0: {
+        TAG: "StorageFailure",
+        _0: `EventLog.append: max 100 events per command, got ` + count.toString()
+      }
     });
   } else if (count === 1) {
     return Effect$1.map(Effect.tryPromise(DynamoDb_Error$ReventlessAws.classify, () => putItemConditional(tableName, jsons[0])), param => ({
@@ -69,7 +72,7 @@ function append(table) {
       case "StaleState" :
         return Effect$1.succeed({
           TAG: "Error",
-          _0: "conflict"
+          _0: "Conflict"
         });
       case "Transient" :
       case "Permanent" :
@@ -78,7 +81,10 @@ function append(table) {
     let msg = DynamoDb_Error$ReventlessAws.message(err);
     return Effect$1.succeed({
       TAG: "Error",
-      _0: `DynamoDB conditional append failed: ` + msg
+      _0: {
+        TAG: "StorageFailure",
+        _0: `DynamoDB conditional append failed: ` + msg
+      }
     });
   }));
 }

package/src/components/ReadModel_Builder_NoResolver.res

@@ -49,6 +49,7 @@ module Make = (
   }
 
   let sourceNames = Inner.sourceNames
+  let consumedEventNames = Inner.consumedEventNames
   let outputs = Inner.outputs
   let operations = Inner.operations
   let finish = () => EventCollectorRuntimeBuilder.finish()

package/src/components/ReadModel_Builder_NoResolver.res.mjs

@@ -41,6 +41,7 @@ function Make(Spec) {
     return {
       Spec: Inner.Spec,
       sourceNames: Inner.sourceNames,
+      consumedEventNames: Inner.consumedEventNames,
       make: make,
       outputs: Inner.outputs,
       operations: Inner.operations,

package/src/components/ReadModel_Builder_NoResolver_Stream.res

@@ -54,6 +54,7 @@ module Make = (
   }
 
   let sourceNames = Inner.sourceNames
+  let consumedEventNames = Inner.consumedEventNames
   let outputs = Inner.outputs
   let operations = Inner.operations
   let finish = () => EventCollectorRuntimeBuilder.finish()

package/src/components/ReadModel_Builder_NoResolver_Stream.res.mjs

@@ -41,6 +41,7 @@ function Make(Spec) {
     return {
       Spec: Inner.Spec,
       sourceNames: Inner.sourceNames,
+      consumedEventNames: Inner.consumedEventNames,
       make: make,
       outputs: Inner.outputs,
       operations: Inner.operations,

package/src/components/ReadModel_Builder_PerReadModel.res

@@ -47,6 +47,7 @@ module Make = (
   }
 
   let sourceNames = Inner.sourceNames
+  let consumedEventNames = Inner.consumedEventNames
   let outputs = Inner.outputs
   let operations = Inner.operations
   let finish = () => EventCollectorRuntimeBuilder.finish()

package/src/components/ReadModel_Builder_PerReadModel.res.mjs

@@ -43,6 +43,7 @@ function Make(Spec) {
     return {
       Spec: Inner.Spec,
       sourceNames: Inner.sourceNames,
+      consumedEventNames: Inner.consumedEventNames,
       make: make,
       outputs: Inner.outputs,
       operations: Inner.operations,

package/src/components/ReadModel_Builder_Single.res

@@ -46,6 +46,7 @@ module Make = (
   }
 
   let sourceNames = Inner.sourceNames
+  let consumedEventNames = Inner.consumedEventNames
   let outputs = Inner.outputs
   let operations = Inner.operations
   let finish = () => EventCollectorRuntimeBuilder.finish()

package/src/components/ReadModel_Builder_Single.res.mjs

@@ -43,6 +43,7 @@ function Make(Spec) {
     return {
       Spec: Inner.Spec,
       sourceNames: Inner.sourceNames,
+      consumedEventNames: Inner.consumedEventNames,
       make: make,
       outputs: Inner.outputs,
       operations: Inner.operations,

package/src/components/ReadModel_Builder_Single_Stream.res

@@ -54,6 +54,7 @@ module Make = (
   }
 
   let sourceNames = Inner.sourceNames
+  let consumedEventNames = Inner.consumedEventNames
   let outputs = Inner.outputs
   let operations = Inner.operations
   let finish = () => EventCollectorRuntimeBuilder.finish()

package/src/components/ReadModel_Builder_Single_Stream.res.mjs

@@ -43,6 +43,7 @@ function Make(Spec) {
     return {
       Spec: Inner.Spec,
       sourceNames: Inner.sourceNames,
+      consumedEventNames: Inner.consumedEventNames,
       make: make,
       outputs: Inner.outputs,
       operations: Inner.operations,

package/tests/EventLogStorage_DynamoDb_RuntimeTest.res

@@ -17,9 +17,10 @@ describe("Runtime.append", () => {
     let jsons = Array.fromInitializer(~length=101, mkJson)
     let result = await Runtime.append(table)(0, "test-id", jsons)
     switch result {
-    | Error(msg) =>
+    | Error(ReventlessCore.EventLog.StorageFailure(msg)) =>
       expect(msg->String.includes("max 100 events per command"))->toBe(true)
       expect(msg->String.includes("101"))->toBe(true)
+    | Error(Conflict) => expect("expected StorageFailure, got Conflict")->toBe("")
     | Ok(_) => expect("expected Error, got Ok")->toBe("")
     }
   })

package/tests/EventLogStorage_DynamoDb_RuntimeTest.res.mjs

@@ -27,8 +27,13 @@ globalThis.describe("Runtime.append", () => {
       return;
     }
     let msg = result._0;
-    globalThis.expect(msg.includes("max 100 events per command")).toBe(true);
-    globalThis.expect(msg.includes("101")).toBe(true);
+    if (typeof msg !== "object") {
+      globalThis.expect("expected StorageFailure, got Conflict").toBe("");
+      return;
+    }
+    let msg$1 = msg._0;
+    globalThis.expect(msg$1.includes("max 100 events per command")).toBe(true);
+    globalThis.expect(msg$1.includes("101")).toBe(true);
   });
 });